Несоответствие типа данных редактора VBA

Я продолжаю получать «несоответствие типа данных» при запуске этого в доступе 2007,

Я смотрю на это некоторое время и не могу понять это.

Private Sub Combo7_AfterUpdate()
    Dim clString As Integer
    clString = Me![Combo7].Value
    strSQL = "SELECT [Categorized Tables].[Name of Table] " & _
             "INTO [catTemp] " & _
             "FROM [Categorized Tables] " & _
             "WHERE [Categorized Tables].[Category] = " & clString
    DoCmd.SetWarnings False
    DoCmd.RunSQL strSQL
    DoCmd.SetWarnings True
End Sub

Отладчик указывает на строку DoCmd.RunSQL strSQL.

У кого-нибудь есть идея, где я ошибаюсь?


types vba mismatch
person BadgerBeaz    schedule 04.05.2012    source источник
comment
Попробуйте это clString = Val(Me![Combo7].Value)   -  person Siddharth Rout    schedule 04.05.2012
comment
что исправил спасибо!   -  person BadgerBeaz    schedule 04.05.2012
comment
@Siddharth Вместо этого вы должны опубликовать это как ответ.   -  person JimmyPena    schedule 07.05.2012
comment
@JP.: Да, я могу, или, если пользователь хочет, он может опубликовать это как ответ и принять его :)   -  person Siddharth Rout    schedule 07.05.2012
comment
Хорошо, но это ваш ответ, вы должны получить за это признание.   -  person JimmyPena    schedule 07.05.2012

Ответы (1)


arrow_upward
0
arrow_downward

Ответ Сиддхарта Раута:

"Попробуйте это clString = Val(Me![Combo7].Value)"

person BadgerBeaz    schedule 30.05.2012