vb6.0:提示至少一个参数没有被指定值
PrivateSubForm_Load()Adodc1.RecordSource="select*from库存"Adodc1.RefreshEndSubPrivateSu...
Private Sub Form_Load()Adodc1.RecordSource = "select * from 库存"Adodc1.RefreshEnd Sub
Private Sub Command1_Click()Dim conditioncondition = Trim(Text1.Text)Adodc1.RecordSource = "select*from 库存 where " & condition & "=" & Text1.Text & ""Adodc1.RefreshText1.Text = Adodc1.Recordset.Fields("货物编号")Text2.Text = Adodc1.Recordset.Fields("货物名称")Text3.Text = Adodc1.Recordset.Fields("库存量")Text4.Text = Adodc1.Recordset.Fields("单位")End Sub
这段程序运行后,就提示adodc:至少一个参数没有被指定值!
请问什么原因啊? 展开
Private Sub Command1_Click()Dim conditioncondition = Trim(Text1.Text)Adodc1.RecordSource = "select*from 库存 where " & condition & "=" & Text1.Text & ""Adodc1.RefreshText1.Text = Adodc1.Recordset.Fields("货物编号")Text2.Text = Adodc1.Recordset.Fields("货物名称")Text3.Text = Adodc1.Recordset.Fields("库存量")Text4.Text = Adodc1.Recordset.Fields("单位")End Sub
这段程序运行后,就提示adodc:至少一个参数没有被指定值!
请问什么原因啊? 展开
6个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询