收录日期:2019/01/20 03:14:45 时间:2016/05/22 08:22:01 标签:数据库(包含打印,安装,报表)
Private Sub Command2_Click()
 Dim Conn As New ADODB.Connection
 Dim Rst As New ADODB.Recordset
       Conn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=shiyan;Data Source=" & strserver & " "
       Conn.Open
       Rst.Open "SELECT * FROM user1 ", Conn, adOpenKeyset, adLockOptimistic
 Print Rst.Fields(0).Value
If Rst.Fields(0).Value = "user" Then
 c = MsgBox("cc")
End If
End Sub



我建的数据库名是shiyuan,表名user。 两个字段user_id="user"(字符型)
Print Rst.Fields(0).Value  的值是 user
而却不显示c = MsgBox("cc")的效果
请问这是为什么?


 
检查是否有空格的存在
Trim("user")也是过,可是还是那样
估计是表中的字段有空格,定义一个字符串变量
dim aaa as string
aaa = trim$(Rst.Fields(0).Value)
If aaa = "user" Then
 c = MsgBox("cc")
End If
End Sub

菜鸟一问 如何存储既包含文字又包含图片的文件内容? 长沙笑话《阿呆转行》完整版 我创建了一个菜单,运行不显示,请问应该设置哪个属性 ems不能够启动!! 如何释放一个class的对象? 提示 : 23115: 国别目录的代码集是不一样的 该怎么解决 ? 大家幫忙看看這個怎麼實現? 北京哪里可以找到合租房子的真实消息,急! 我的浏览器 怎么了 bgcolor 只能是 白色 设置为任何颜色都没用 怎么设置呀 是xp 6.0 请问各位大侠 这个:衣服标签上的加大xl,加加大xxl,x指的是什么? 在实例化sqlparameter[]数组时,出错,附上源码 获得窗口大小的问题 如何在VB中打开一张网页? 硬盘安装Linux的问题。 在REDHAT9.0中如何共享一目录给Windows用户 04年春节后计划在北京成立软件公司,请各位高手支招!! socket和singleton的问题 大家来讨论一下,什么样的处理放在业务外观层,什么样的处理放在业务逻辑层好一些?大家顶呀 textBox显示数组的问题 我写了一个类,调用时为什么会返回这个值,望大家看看这是什么原因 哪位大哥知道window2003可以和xp或98,ME共存吗?如果可以该怎么装系统啊?谢谢了! winsocket缓冲区有多大? 大家帮我出个主意(UP有分) 怎样知道一个文本文件有多少行? 一个应用程序,主窗体是form1,怎么样在这个form1窗体出来之间,界面显示一段mpg文件? 主键生成策略的优略比较 那个有CDC双缓冲画图类的代码,我的程序中有多处用到双缓冲画图 如何使用CFileDialog文件过滤功能?