Question

VB提示过程声明与同名事件或过程的描述不相符 提示句是 Private Sub Command1_Click(index As Integer)

全部代码是
Private Sub Command1_Click(index As Integer)
Select Case index
Case 0
Adodc1.RecordSource = "select * from 仓库存货对照表"
Case 1
Adodc1.RecordSource = "select * from仓库存货对照表 where" & "存货编码='" & DataCombo1.Text & "'"
End Select
Adodc1.Refresh
End Sub
是哪儿错了呢？帮忙看看呗，急呀。。。谢谢。。。

Answer 1

你的Command1 是不是数组控件 ,有几个这样名称的控件
如果不是你要改成数组控件 其实也就 名称相同 index 属性的编号不同
然后你再查看一下是不是你还有一个
Private Sub Command1_Click () 这样的过得 ,如果有你要把那个删除

数组控件的添加 就是先添加一个控件 ,命好名后 然后 复制 粘贴 有提示时 确定 就可以 了!