标题:如何通过数据如何通过数据库某个表中的某列的信息来查询出这一行的所有信息 ...
只看楼主
childH
Rank: 1
等 级:新手上路
帖 子:25
专家分:0
注 册:2019-1-7
结帖率:66.67%
已结贴  问题点数:20 回复次数:1 
如何通过数据如何通过数据库某个表中的某列的信息来查询出这一行的所有信息并且显示出来库某个表中的某列的信息来查询出这一行的所有信息并且显示出来
如何通过数据库某个表中的某列的信息来查询出这一行的所有信息并且显示出来
SQL Server中 数据库名:bill 表为:dbo.student  如下图:
VB界面如下图:
如何通过输入ID来查询对应的ID所在行的信息。 我不知道哪里写的不对,一晚上没找出原因,求大神帮忙看看。
Private Sub Command1_Click()
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=bill;"
  Adodc1.RecordSource = "select id,name,sex,age from dbo.student where id=" & Val(Text1)
  Adodc1.Refresh
  Set DataGrid1.DataSource = Adodc1
End Sub
搜索更多相关主题的帖子: 某列 某个表 信息 显示 查询 
2020-03-06 22:54
kinger1219
Rank: 2
等 级:论坛游民
帖 子:14
专家分:40
注 册:2019-10-24
得分:20 
Private Sub Command1_Click()
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=bill;"
If IsNumeric(Text1.Text) = False Then
 ' 判断文本框内容是否为数字  最好加上文本输入判断,否则输入查询的不是数字,点击还是会出现你上面的错误
MsgBox "数量只能输入数字", 17, "错误提示"
Exit Sub
End If
 Adodc1.RecordSource = "select id,name,sex,age from student where id='" + Text1.Text + "'"  
  Adodc1.Refresh
  Set DataGrid1.DataSource = Adodc1
End Sub  
2020-03-12 10:42



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-499599-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.159696 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved