проблема с построением SQL запроса VB.NET

Первое, что порекоменду, выведи более подробную информацию об исключении, заключи в блок try...catch:

Что касается запуска запроса сделай так:

Спасибо за Try - Catch...
Благодоря ему выяснилось что нужно где-то объявлять еще переменную @ID
Errors.Message "[Microsoft][ODBC SQL Server Driver][SQL Server]Must declare the variable '@ID'."
понимаю, что гляжу в книгу, а вижу, что-то непотребное, но никак не могу понять где еще описать эту переменную? Поле ctz_ID в БД имеет тип numeric. В коде @ID описал так же.



Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'OdbcSelectCommand2
Dim ID As Integer
Dim conn As Odbc.OdbcConnection
Dim selectCommand As Odbc.OdbcCommand
Dim odbcDataAdapter3 As Odbc.OdbcDataAdapter
ID = ComboBox1.SelectedValue

conn = New Odbc.OdbcConnection("Trusted_Connection=Yes;DSN=***;UID=***;DATABASE=school;APP=Microsoft® & Visual Studio .NET;WSID=***")
odbcdataadapter3 = New Odbc.OdbcDataAdapter
selectCommand = New Odbc.OdbcCommand("SELECT ctz_ID, ctz_family, ctz_name FROM citizen WHERE (ctz_ID = @ID)", conn)
selectCommand.Parameters.Add(New Odbc.OdbcParameter("@ID", Odbc.OdbcType.Numeric))
selectCommand.Parameters("@ID").Value = ID
odbcDataAdapter3.SelectCommand = selectCommand
conn.Open()
odbcDataAdapter3.SelectCommand.ExecuteNonQuery()
conn.Close()
odbcDataAdapter3.Fill(DataSet2)
End Sub

Мда уж, любопытная проблемка.... но вот что мне удалось получить из работы через ODBC: нельзя использовать именнованные параметры в SQL-запросе, необходимо использовать символ ?, например:

т.е. "?" мы заменяем "@"?
или если просто оставить "?", то не понятна тогда логика описания переменной. где указывать ее value?

[quote=ejnadall]т.е. "?" мы заменяем "@"?
или если просто оставить "?", то не понятна тогда логика описания переменной. где указывать ее value?[/quote]
Нет, именно знак ?. А value указываешь так:

Допустим, у тебя три знака ? в запросе, тогда при добавлении параметров ты должен указать три имени параметра.

уфффф...
заработало.
большое спасибо. получается типа так:

Dim ID As Integer
Dim conn As Odbc.OdbcConnection
Dim selectCommand As Odbc.OdbcCommand
Dim odbcDataAdapter3 As Odbc.OdbcDataAdapter
ID = CType(ComboBox1.SelectedValue, Integer)
conn = New Odbc.OdbcConnection("Trusted_Connection=Yes;DSN=***;UID=***;DATABASE=school;APP=Microsoft® & Visual Studio .NET;WSID=***")
odbcDataAdapter3 = New Odbc.OdbcDataAdapter
Dim queryString As String = "SELECT ctz_name FROM citizen WHERE (ctz_id = ?)"
selectCommand = New Odbc.OdbcCommand(queryString, conn)
selectCommand.Parameters.Add("@ID", Odbc.OdbcType.Numeric).Value = ID
selectCommand.Parameters("@ID").Value = ID
odbcDataAdapter3.SelectCommand = selectCommand
conn.Open()
odbcDataAdapter3.SelectCommand.ExecuteNonQuery()
conn.Close()
odbcDataAdapter3.Fill(DataSet3)

У тебя повторение в коде:
[quote=ejnadall]
[FONT=Courier New]selectCommand.Parameters.Add("@ID", Odbc.OdbcType.Numeric).Value = ID[/FONT]
[FONT=Courier New]selectCommand.Parameters("@ID").Value = ID[/FONT]
[/quote]
Два раза задаешь value параметру