各位前輩：
小弟正在用VB2008寫一個作業中用的查詢工具，該工具中有很多模塊，其中一個模塊的代碼是：
但是運行時老是出現上圖中的錯誤對話框！！！！折騰了三天了，也沒明白是怎么個事！！
最讓我郁悶的是：
這些代碼中，除了code變數和“www”，其他的全都是我直接從其他模塊中復制過來的，包括兩個Imports。在其他模塊中，代碼運行一切正常！！！
uj5u.com熱心網友回復：
Dim code As Stringcode = "select top 8 * from a2h4"
Dim objConnection_w As New SqlConnection("server=128.192.38.34;database=MyDataBase;user id=sa;password=123456")
MsgBox(objConnection_w Is Nothing)
Dim objDataAdapter_w As New SqlDataAdapter()
MsgBox(objDataAdapter_w Is Nothing)
Dim objDataSet_w As New DataSet()
MsgBox(objDataSet_w Is Nothing)
MsgBox(objDataAdapter_w.SelectCommand.Connection.ToString)
objDataSet_w.Clear()
objDataAdapter_w.SelectCommand.CommandText = code
objDataAdapter_w.Fill(objDataSet_w, "www")
主界面.DGV1.DataSource = objDataSet_w
主界面.DGV1.DataMember = "www"
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/108030.html
上一篇：初學VBScript
下一篇：計算機做哪種運算快？