VB select语句问题和adodc.refresh问题 50
PrivateSubdisplay_Click()DimreccountAsIntegerAdodc2.RecordSource="selectreaderid1as"&...
Private Sub display_Click()Dim reccount As IntegerAdodc2.RecordSource = " select readerid1 as " & " 编码 " & " readername1 as " & " 名字 " & " from reader1 "Adodc2.Refreshreccount = Adodc1.Recordset.RecordCountIf reccount > 0 Then displaygrid ("显示所有")ElseMsgBox "没有", , "提示"displaygrid ("显示所有")Exit SubEnd IfEnd Sub
展开
1个回答
展开全部
Adodc2.RecordSource = " select readerid1 as " & " 编码 " & " readername1 as " & " 名字 " & " from reader1 "
字段间应该有个逗号吧
Adodc2.RecordSource = " select readerid1 as " & " 编码 ," & " readername1 as " & " 名字 " & " from reader1 "
字段间应该有个逗号吧
Adodc2.RecordSource = " select readerid1 as " & " 编码 ," & " readername1 as " & " 名字 " & " from reader1 "
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询