|
![]() | 作者: fcyk [fcyk]
![]() |
登录 |
我想用VB做一个3重查询:第一个控件是Combo,第二个是List,第三个也是List,在程序的编写上请问有什么诀窍吗?我的程序涉及到数据库的录入,举个例子:我在Combo中选择了专业,List1中会出现该专业的所有班级,选种了我要的班级后,在List2中可以出现我要的班级中的学生名单。 我用的Access数据库,知道的请帮忙。最好能附部分代码加以说明。 |
地主 发表时间: 04-08-05 08:57 |
![]() | 回复: lqfrla [lqfrla] ![]() |
登录 |
呵呵,不告诉你![]() |
B1层 发表时间: 04-08-05 15:43 |
![]() | 回复: fcyk [fcyk] ![]() |
登录 |
同志,我觉得你是来凑热闹的啊。没看到你能给个好的回复? |
B2层 发表时间: 04-08-05 16:12 |
![]() | 回复: windflower [windflower] ![]() |
登录 |
这个很容易实现,但不知你的数据库结构如何,请把它说明在此。 表,字段,是如何组织的,这有关代码的实现。 |
B3层 发表时间: 04-08-05 19:56 |
![]() | 回复: fcyk [fcyk] ![]() |
登录 |
不好意思,我在办公室所以没法把抓图带上。只好写一下(房产系统) 我的字段是:1 户型--Combo 2 地段--List1 3 价格--List2 (这三个是要实现3重查询的主要元素) 4 户主 5 联系电话 我希望是在Access数据库的情况下,先用DO Whlie not 实现在Combo的所有数据录入,及在Combo中可以选择所有户型,这时,在List1中要能够随着我选择Combo中数据的不同而显示不同的信息。当我选择List1中信息时,List2也要同上出现不同对应的信息。及每个户型要对应每个地段和它的价格。这样是否详细了啊??知道的请告诉我,我在公司急用。最好是能运行成功后再告诉我,我自己写的出现过“有行或段未定义”的提示。 |
B4层 发表时间: 04-08-06 08:25 |
![]() | 回复: kert_t8 [kert_t8] ![]() |
登录 |
没有编译器,但是写段代码可以表现一个意思 dim AdoC as new adodb.connection dim AdoR as new adodb.recordset adodc.connectionstring=""/////此处加入与数据库联接的连接字符串 adodc.open set ador=adodc.execute("select 地价 from <表名> where 户型='"+<combo1.text>+"'") while not ador.eof combo2.additem(ador.filed(0).value) ador.movenext wend 以上程序需要在控件列表中添加adodc控件方可使用。同时,连接字符串也需要先将adodc控件连接设好,然后将该字符串拷贝到程序中。拷贝完后,就不需要在窗体中再存在该控件了,但不要将其从控件列表中删除。另外,由于我不太清楚list空间的用法,所以全部使用combo代替,表达个意思哈 另,注意combo控件的事件有click和change两种,两种区别很大,前者是当使用键盘在其中输入字符导致改变时被激发,而后者是用鼠标在列表框中单击选择文本导致改变时被激发,所以,上面的代码放在哪一个事件当中要根据你自己设置combo属性而定,combo可以给予许键盘输入又允许鼠标选择,也可以只允许键盘输入或者只允许鼠标选择 再次声明,以上代码未经过编译器编译,如果不能用,不要用臭鸡蛋砸我 |
B5层 发表时间: 04-08-06 09:47 |
![]() | 回复: fcyk [fcyk] ![]() |
登录 |
多谢,此方法运行失败,但是提醒了我,现已搞定,老板发奖金我请客。 |
B6层 发表时间: 04-08-06 11:14 |
![]() | 回复: kenter1643 [kenter1643] ![]() |
登录 |
我~~~~~~~~~~~~倒,这个我大一就已经做过了~~~~~~~响应combo事件然后查询seclet |
B7层 发表时间: 04-08-06 17:30 |
![]() | 回复: fcyk [fcyk] ![]() |
登录 |
这个我也知道,但是3重查询在实现上有些问题,而且我是逐步查询同时要实现模糊查询,不信可以自己试试,不要在这里讲风凉话 |
B8层 发表时间: 04-08-07 09:55 |
![]() | 回复: zl215 [zl215] ![]() |
登录 |
不是只要在“文件”“打开”打开一个已经存在的数据库,在把他们连接起来吗? |
B9层 发表时间: 04-08-07 15:02 |
![]() | 回复: vc_java [vc_java] ![]() |
登录 |
问题解决了。 |
B10层 发表时间: 04-08-11 22:41 |
|
20CN网络安全小组版权所有
Copyright © 2000-2010 20CN Security Group. All Rights Reserved.
论坛程序编写:NetDemon
粤ICP备05087286号