vb 数据表查询到底怎么用
查了好长时间也没找到PrivateSubCommand5_Click()DimsAsStrings="select日期起始fromtb_eventswhere"&b2If...
查了好长时间也没找到
Private Sub Command5_Click()
Dim s As String
s = "select 日期起始 from tb_events where" & b2
If rs.State = 1 Then rs.Close
rs.Open s, cnn, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = rs
End Sub
这么用吗?这句话有错,但又不知道错在哪。(where子句语法错误)(b2就是日期)
这么说吧,我打开数据表将他显出在datagrid上,然后我想根据日期查询数据,再重新显示在datagrid上,这两个怎么同时做到。
还有删除数据表的一行数据,这行数据是我在datagrid中选的一行,又怎么做到?
如果都用最初定义的数据表rs,就会说不能重复打开之类的,换一个新的连不上表
还有有的where子句为什么最后要带“ ”
改了,成了
Private Sub Command5_Click()
Dim s As String
s = "select * from tb_events where 日期起始=" + b2 + ""
If rs.State = 1 Then rs.Close
rs.Open s, cnn, 1, 1
Set DataGrid1.DataSource = rs
End Sub
一点数据全没了,根本不能实现查询功能
应该怎么弄呢?感谢各位大神 展开
Private Sub Command5_Click()
Dim s As String
s = "select 日期起始 from tb_events where" & b2
If rs.State = 1 Then rs.Close
rs.Open s, cnn, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = rs
End Sub
这么用吗?这句话有错,但又不知道错在哪。(where子句语法错误)(b2就是日期)
这么说吧,我打开数据表将他显出在datagrid上,然后我想根据日期查询数据,再重新显示在datagrid上,这两个怎么同时做到。
还有删除数据表的一行数据,这行数据是我在datagrid中选的一行,又怎么做到?
如果都用最初定义的数据表rs,就会说不能重复打开之类的,换一个新的连不上表
还有有的where子句为什么最后要带“ ”
改了,成了
Private Sub Command5_Click()
Dim s As String
s = "select * from tb_events where 日期起始=" + b2 + ""
If rs.State = 1 Then rs.Close
rs.Open s, cnn, 1, 1
Set DataGrid1.DataSource = rs
End Sub
一点数据全没了,根本不能实现查询功能
应该怎么弄呢?感谢各位大神 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询