我刚学vb不久 要做一个学生成绩查询程序
源代码：
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

窗体有2个ado控件 adodc1 adodc2 1个datagrid控件 1datacombo个控件 两个命令按钮以及 一个标签
运行后提示 过程声明与同名事件或过程的描述不匹配
我感觉好像是index 的问题 把 index as integer 删除后能运行但不能实现查询功能
各位高手帮帮忙吧

你想实现什么样的功能?
这种方法不行可以尝试另一种方法.钻牛角尖往往事倍功半.

我是想知道index的值为1  2   3  时的含义  它是怎样在case 语句中 实现检索功能的

两个按钮应是数组，而不是Command1,Command2

一个command只有一个索引.(一般单个command检索没意义)
command数组检索才有意义.
如你上面的:
private sub command1_click(index as integer)
select case command(index)
case 0
adodc1.recordsource="select * from 成绩表"
case 1
adodc1.recordsource ="select * from 成绩表 where "&"学号"='"& datacombo1.text&"'"
end select
adodc1.refresh
end sub

前提:你必须建立一个command1的数组:command1(0),command1(1)

要是还不是很明白就参考下,下面的例子:

这里是用到了控件数组.两个COMMAND是一个控件数级.用INDEX来标示每一个按钮.Command1(0),Command1(1).括号里面的数据就是INDEX的值!

谢谢大家帮忙啦 ~~~