strsql = "select * from 用户表 where name='" & user & "'and pwd='" & pwd & "'and usertype='" & usertype & "'"
Set rs = cn.Execute(strsql)
怎么在visdata中添加表，使得上面的语句可以执行，name，pwd，usertype在前面已经输入利润
vb select求助！！！！！！在线等
- 写回答
- 好问题 0 提建议
- 追加酬金
- 关注问题
分享- 邀请回答
-
1条回答 默认 最新
- 2021-06-28 14:54回答 1 已采纳 Private Sub Check1_Click() If Checkl .Value = 1 Then Textl.FontName = "楷体 _GB2312” Else
- 2021-06-28 14:47回答 1 已采纳 Dim i As Integer Private Sub Command1_Click() i = Val(Label2) i = InputBox("请输入一个整数：", "VB") If i Mo
- 2021-07-27 10:11回答 2 已采纳 Class spd'定义爬虫类 Public url as String'定义url Sub sp()'定义方法 With CreateObject("Microsoft.XMLHTTP") .Ope
- 2008-12-27 22:09mohongmao的博客 求助! 如何将数据库中数据给某一个变量呢?? __________________________________________________________________________ object x = 取出的数据 ______________________________________________________________...
- 2019-06-14 15:18回答 1 已采纳 在服务器上执行nethogs命令就可以看到了
- 2020-06-04 17:29回答 1 已采纳 ``` （1） s = 0 for i = 2 to 100 step 2 s = s + i next msgbox s （2） s = 0 n = 1 while s x
- 2021-05-26 18:07回答 2 已采纳 vb有点难，python倒是可以，参考一下：https://zhuanlan.zhihu.com/p/335476050
- 2008-12-28 15:26mohongmao的博客 100分求助！！！急！！！！！！！！！！！！！！！我基本不太会VB，想问些比较简单的问题 我有三个TEXT控件，程序代码中我把它们存成Text(i)数组.下面是我的读取access数据库student表的内容代码，我想根据这三个...
- 2021-06-02 18:54回答 2 已采纳 Command1_Click表示按钮按下开始执行了，首先For循环中引用GetValue 参数为变量，GetValue中S为静态变量表明，每次引用GetValue函数，S不清零能够保持上一次的值参与本
- 2018-04-23 04:41回答 2 已采纳 我写了一个，你可以参照下,每次重新加载页面后,可以更改echar数据(根据你的需要) Private Sub Button1_Click(sender As Object, e A
- 2017-12-29 03:04回答 1 已采纳 rs.Open sql1, cn, adOpenKeyset, adLockOptimistic 和 rs.Open sql1, cn, adOpenKeyset, adLockOptimistic前
- 2013-08-15 10:03博文视点的博客 章，主要介绍了类的应用、读取网页数据、制作菜单、开发插件、保护代码、制作安装程序，及开发具有撤销功能的插件等内容。疑难解答篇即本书第 23 章，该章提供了 365 个疑难问答，帮助读者解决日常工作中的一些...
- 2007-06-18 18:58Hu2007的博客 sqlstr = "select * from KC where Data between '2001-1-1' and '2000-5-1'" Dim myda As OleDb.OleDbDataAdapter myda = New OleDb.OleDbDataAdapter(sqlstr, OleDbConnection1) DataSet11.Clear() myda.Fill...
- 2008-12-27 22:44mohongmao的博客 100分继续求助，急，在线等！！！！！！！！！！！！！！！ 要对数据库的内容进行排序，为什么老是提示我属性使用无效呢？？？？？？？？ Private Sub Command6_Click() Dim SQLString As String Dim S As String...
- 2014-01-04 16:32陈刚12的博客 Adodc1.RecordSource = "select*from 库存 where " & condition & "='" & Text1.Text & "'" Adodc1.Refresh Text1.Text = Adodc1.Recordset.Fields("货物编号") Text2.Text = Adodc1.Recordset.Fields("货物...
- 没有解决我的问题, 去提问
悬赏问题
- ¥15 如何在scanpy上做差异基因和通路富集？
- ¥20 关于#硬件工程#的问题，请各位专家解答！
- ¥15 关于#matlab#的问题：期望的系统闭环传递函数为G(s)=wn^2/s^2+2¢wn+wn^2阻尼系数¢=0.707，使系统具有较小的超调量
- ¥15 FLUENT如何实现在堆积颗粒的上表面加载高斯热源
- ¥30 截图中的mathematics程序转换成matlab
- ¥15 动力学代码报错，维度不匹配
- ¥15 Power query添加列问题
- ¥50 Kubernetes&Fission&Eleasticsearch
- ¥15 報錯：Person is not mapped，如何解決？
- ¥15 c++头文件不能识别CDialog