Ошибка компиляции: ожидаемая функция или переменная с использованием Microsoft Word и MS-Access - PullRequest
0 голосов
/ 13 января 2020

Я новичок в VBA, и я хотел вставить немного данных в базу данных Access, используя форму VBA. Программа запускается без проблем, однако, когда я вставляю данные и посылаю кнопку, она выдает

Ожидаемая функция или переменная

. Вот что я попробовал:

Dim name1 As String
Dim surname1 As String
Dim affectedRow As Integer


Private Sub CommandButton1_Click()

name1 = ism.Text
surname1 = familya.Text

Dim con As ADODB.Connection
Set con = New ADODB.Connection
Dim rs As ADODB.Recordset
Set rs = con.Open("4IAT")

con.Open = "DRIVER={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=C:\Users\Pavilion\Documents\IAT.accdb;"

sql = "insert into 4IAT(Name,LastName) values('" & name & "','" & LastName & "')"

con.Execute sql, baza
If baza = 1 Then
MsgBox "barakala"
Else
MsgBox "O'xshamadi "
End If

con.Close

End Sub

1 Ответ

0 голосов
/ 14 января 2020

https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/expected-function-or-variable

Проверьте ссылку на сайте, Microsoft объясняет возможные причины ошибки.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...