qzgx.net
当前位置:首页 >> VB6.0 ExECutESQL函数或子集未定义 怎么解决 >>

VB6.0 ExECutESQL函数或子集未定义 怎么解决

你复制别人代码的时候,要复制完整,你漏了一个模块文件,里面就有自定义的ExecuteSQL函数.你光复制窗体代码没用的.

ExecuteSQL这个函数确实没有定义啊,也没有adodb.connection对象,怎么可能得到结果集呢

sql问题,userid如果是数字型不是这样子写,如果是字符型就可以这样子写 字符型txtsql = "select * from user_info where user_ID='" & username.Text & "'" 数字型txtsql = "select * from user_info where user_ID=" & cint(username.Text)

这个问题是由于子过程未定义引起的,不知道你的“班级设置_Click”是什么控件的Click事件,如果是按钮控件,也就是CommandButton控件,那么请将这个控件的名称属性(Name)改为“班级设置”.以此类推

你好!Ctrl+v来的QueryExt在代码中应该是自定义函数.所以你需要看看在你参照的代码中QueryExt这个函数是怎么定义的,估计你的代码是Ctrl+c我的回答你还满意吗~~

VB子程序或函数未定义,怎么办程序走到下面就报错了 Private Sub Form_Load() Left = (Screen.Width - Width) \ 2 Top = (Screen.Height - Height) \ 2 Dim txtSQL As String Dim MsgText As String txtSQL = "select * from material " Set mrc =

你有定义ExecuteSQL函数吗?或者是Command.ExecuteSQL吧?如果是自己定义的函数,有返回值的,要用function定义,不能用sub定义.

这个函数就不要考虑了,只能在调试下运行,生成EXE就不能用了.放弃它吧

写个连接数据库和数据表的公用函数,储存在标准模块,供过程调用.你这代码是别处抄来的.具体的代码需要依据实际情况写的.

没有引用 Microsoft ActiveX Data Objects 2.0 LIbrary造成的 菜单“工程”-“引用” PS:实时错误'438'在哪一句? ps:这个程序是哪里拷贝的?StatusBar1(0)是状态栏控件数组,你添加了该控件么? 菜单“工程”-“部件” Microsoft windows commom controls 6.0 注意是 控件 数组另外Panels(4)也是要通过StatusBar1(0).Panels.Add增加Panels的数量,否则会下标越界晕倒……

ddng.net | pznk.net | btcq.net | ceqiong.net | 9371.net | 网站首页 | 网站地图
All rights reserved Powered by www.qzgx.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com