VB6.0程序问题 至少有一个参数没有被指定
来源:百度知道 编辑:UC知道 时间:2024/07/05 14:55:19
我编了个查询数据库的命令,但好文本输入数字时, 按 command2出来至少有一个参数没有被指定的错误
assess 数据库 设置ID为 自动编号 设置名称为 文本
我不知道如何改,我是初学者
'查询数据库
Private Sub Command2_Click()
Adodc1.RecordSource = "查询1 where ID = Text4.Text"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh
If Adodc1.Recordset.EOF Then
MsgBox "无此记录"
Adodc1.RecordSource = "查询1"
Adodc1.Refresh
Exit Sub
End If
End Sub
assess 数据库 设置ID为 自动编号 设置名称为 文本
指的是数据类型
三断笛3 用你的程序 出来错误提示 表达式中数据类型不匹配, ID的数据类型是自动编号 长整型。 这么编啊?
assess 数据库 设置ID为 自动编号 设置名称为 文本
我不知道如何改,我是初学者
'查询数据库
Private Sub Command2_Click()
Adodc1.RecordSource = "查询1 where ID = Text4.Text"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
DataGrid1.Refresh
If Adodc1.Recordset.EOF Then
MsgBox "无此记录"
Adodc1.RecordSource = "查询1"
Adodc1.Refresh
Exit Sub
End If
End Sub
assess 数据库 设置ID为 自动编号 设置名称为 文本
指的是数据类型
三断笛3 用你的程序 出来错误提示 表达式中数据类型不匹配, ID的数据类型是自动编号 长整型。 这么编啊?
你得先去学一下SQL语句,这个问题会变得非常简单
问题出在这句:
Adodc1.RecordSource = "查询1 where ID = Text4.Text"
去看一下SQL的Select 语句吧
例如:Adodc1.RecordSource = "Select * From 你的表名 where ID = " & val(Text4.Text)
大哥你先看下SQL吧 要不就算我的语句对了又怎样呢>?