用SQL 编写实现在Combo1里选择一个“年级”,在Combo2里自动显示学号所对应的年级1.2.3.4
结果datagrid 中显示,要是有多个选择的条件的 编码是不是一样的?
菜鸟求助!!!
结果datagrid 中显示,要是有多个选择的条件的 编码是不是一样的?
菜鸟求助!!!
解决方案 »
- 一点有用的东西
- 关于wininet.dll上传文件InternetCloseHandle函数超时的问题
- 快当老爸了,为宝宝求名,好名字另开贴重谢!!!!!!!!!
- 数据库创建,数据表创建?
- 如何屏蔽windows2000或者xp的“win” 键 和 “ctrl+alt+del”键
- 数据不能在msflexgrid中显示(附代码)
- 数据库查询很慢的问题。急!
- MSFlexGrid 控件中如何象“资源管理器”中的一样进行排序
- VB已死.delphi还没死透,c/c++/vc都活的好好的
- 济南地区的同行、同好请看。
- 为什么progressbar找不到PercentPosition?
- 大家谁可以提供一个可用的wav转mp3的控件,或者dll.我找了好多都不能用
如果是后者,可以用
sql="select 学号 from 表 where 年级='" & combo1.text & "'" --->该语句要写在combo1的click事件中至于要在datagrid控件中显示数据,只要把打开的记录集赋值给datagrid的datasource就可以了!打开记录集之前要先把记录集的CursorLocation 设为adUseClient如果还不明白,可以去csdn里搜索一下,应该很多相关的!
结果datagrid 中显示,要是有多个选择的条件的 编码是不是一样的?不是很明白你的意思Private Sub Form_Load()
On Error Resume Next
Set adoRecordset = New adodb.Recordset
adoRecordset.Fields.Append combo1.text, adVariant, , adFldMayBeNull + adFldIsNullable + adFldUpdatable
adoRecordset.Fields.Append "数", adVariant, , adFldMayBeNull + adFldIsNullable + adFldUpdatable
adoRecordset.Open
for i=0 to combo2.listcount-1
adoRecordset.AddNew
adoRecordset(0)=combo1.text
adoRecordset(1)=combo2.list(i)
next i
adoRecordset.updatebatch
set datagrid1.datasource=adoRecordset
datagrid1.refresh
End Sub