请假问题
下面的代码哪里错误??菜鸟请教,谢谢。
Try
SQLOPEN()
YGapa = New SqlDataAdapter("select * from 车辆信息 where 车辆编号='" & TextBox1.Text & "'", YGconn)
YGset = New DataSet
YGapa.Fill(YGset)
If YGset.Tables(0).Rows.Count > 0 Then
TextBox2.Text = YGset.Tables("车辆车型").ToString
End If
Catch ex As Exception
MsgBox("程序错误,提示!")
End Try