我建立了一个数据库,表名为db2,字段名为:学生,科目,成绩。内有重复行,现在我想通过以下代码查出一组无重复的结果集。但运行以下代码时出现Adodc1出错提示“至少一个参数没有被指定值”,是否语句有问题,还是缺少定义。请各位看看,先谢谢大家!Private Sub Command5_Click()
Dim strQuery As String
strQuery = "SELECT max(rowid) FROM db2 GROUP BY 学生,科目,成绩"
Adodc1.RecordSource = strQuery
Adodc1.Refresh
End Sub
Dim strQuery As String
strQuery = "SELECT max(rowid) FROM db2 GROUP BY 学生,科目,成绩"
Adodc1.RecordSource = strQuery
Adodc1.Refresh
End Sub
解决方案 »
- VB里的Kill功能和cmd的del命令有什么区别
- 这可以定义成数组吗???
- vb获取系统时间问题?????
- 关于list控件的一个小问题!
- 请教在VB中如何屏蔽“ctrl+p"与"ctrl+shift+s"
- vb打印报表的字体大小可不可以设到6号字啊,天啦我的报表大小才44mm,怎么挤得下啊?给点办法啊?
- TAPI, 如何用程序选择播放声卡
- 怎么样从EXEXL文件中读取数据到数据库中,这个程式要一次处理批量的.xls文件?有做过这个项目的能给段代码么?
- 各位哪位知道方正阅读器是用什么写`!
- Help me,Help me Vb大侠们,一个access和vb的编程问题(急急急)
- 关于VB模拟多线程处理的一些问题
- 如何在VB 中实现多线程。
strQuery = "SELECT distinct 学生,科目,成绩 FROM db2 "
Adodc1.RecordSource = strQuery
Dim strQuery As String
strQuery = "SELECT distinct max(rowid) FROM db2 GROUP BY 学生,科目,成绩"
Adodc1.RecordSource = strQuery
Adodc1.Refresh
End Sub
或者
Private Sub Command5_Click()
Dim strQuery As String
strQuery = "SELECT max(rowid) FROM dual"
Adodc1.RecordSource = strQuery
Adodc1.Refresh
End Sub
Dim strQuery As String
strQuery = "SELECT E.学生,E.科目,E.成绩 FROM (select 学生,科目,成绩 from db2 order by 成绩) E where rownum <= 6"
Adodc1.RecordSource = strQuery
Adodc1.Refresh
End Sub