Office中国论坛/Access中国论坛

标题: [原创原码]示例(行政区划):三级联动组合框——一点小错误,已修正 [打印本页]

作者: tz-chf    时间: 2007-3-21 04:45
标题: [原创原码]示例(行政区划):三级联动组合框——一点小错误,已修正
内容是全国行政区划,可使用常规的鼠标选择,也可拼音首字母输入(此乃另一看点)。

也可扩展为更多级,道理是一样的。

想看,先顶一下。

原:

Private Sub Combo0_KeyPress(KeyAscii As Integer)
    '只接受小写字母
    If KeyAscii < Asc("a") Or KeyAscii > Asc("z") Then
        Exit Sub
    End If
   
    pp = pp & Chr(KeyAscii)
   
    KeyAscii = 0
   
    Me.Combo0 = GetVar(pp, "tblProvince", "roID", "province")
   
    If Me.Combo0 = 0 Then
        Me.countyID = 0
        pp = ""
    End If

    Me.Combo2 = 0
    Me.Combo4 = 0
    Me.Combo2.Requery
    Me.Combo4.Requery

End Sub

改成:

。。。

    If Me.Combo0 = 0 Then
        pp = ""
    End If
   
    Me.countyID = 0
。。。

[此贴子已经被作者于2007-7-22 14:58:34编辑过]


作者: 一点通    时间: 2007-3-21 08:32
谢谢分享,获得焦点自动打开组合框会更加完美
作者: wang1950317    时间: 2007-3-21 16:28
非常好!谢谢!
作者: tz-chf    时间: 2007-3-21 23:51
以下是引用一点通在2007-3-21 0:32:00的发言:
谢谢分享,获得焦点自动打开组合框会更加完美



用拼音首字母输入,应用在对选项比较熟悉(因为要求从第一个字开始输入,通用的如行政区划),而且选项比较多,要用滚动条拉动的时候。否则就用鼠标直接了当。

也能接受字母或其它的输入,可以用在其它的地方。
作者: silkzhou    时间: 2007-3-24 21:20
12
作者: z123456789    时间: 2007-3-24 23:55
hi
作者: szcid007    时间: 2007-3-26 01:32
谢谢共享
作者: lfxwolf    时间: 2007-3-26 17:18
学习
作者: davidcsw    时间: 2007-3-26 18:11
dgfd
作者: wu8313    时间: 2007-3-26 19:14


如果,想要增加一个省或者一个城市怎么办?

[此贴子已经被作者于2007-3-26 11:27:43编辑过]


作者: clmkjszx123    时间: 2007-3-26 19:31
ok ok
作者: zyz218    时间: 2007-3-26 19:38
看看!
作者: kevindeng    时间: 2007-3-26 22:25
kan akn

和我以前的那个差不多啊

[此贴子已经被作者于2007-3-26 14:46:40编辑过]


作者: hangin    时间: 2007-3-26 22:40
学习
作者: fengrh    时间: 2007-3-26 23:21
看看
作者: goto2008    时间: 2007-3-28 23:43
?
作者: tz-chf    时间: 2007-3-28 23:57
以下是引用wu8313在2007-3-26 11:14:00的发言:



如果,想要增加一个省或者一个城市怎么办?

在表里加
作者: 小何    时间: 2007-3-29 00:03
谢谢分享
作者: ishining    时间: 2007-3-29 00:04
[em02]
作者: a0101115    时间: 2007-3-29 04:35
我自己做了很久还是无法进行联动,只能进来看看拉...
作者: fgwhy    时间: 2007-3-29 05:23
标题: vvb0nb0n
h1gh1gh1g1h
作者: fgwhy    时间: 2007-3-29 05:23
1h21h12h21
作者: chang    时间: 2007-3-29 06:07
看一下
作者: frankfu    时间: 2007-3-29 06:29
dingding
作者: frankfu    时间: 2007-3-29 06:33
dingding
作者: wzh    时间: 2007-3-29 17:09
谢谢分享
作者: YZQ2005    时间: 2007-3-30 05:10
OK
作者: 5988143    时间: 2007-3-30 16:14
i see
作者: alloy486    时间: 2007-3-30 16:21
谢谢分享
作者: wql027    时间: 2007-3-30 23:16
收集看看
作者: hqh21    时间: 2007-3-31 04:18
1111
作者: poly    时间: 2007-4-2 09:47
看看
作者: fbw9o27    时间: 2007-4-5 20:15
rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr
作者: jxjxjx    时间: 2007-4-6 03:19
恍恍惚惚含含糊糊好好坏坏
作者: guowj_ywk_sist    时间: 2007-4-6 04:18
学习学习!
作者: zhoyojsnt    时间: 2007-4-6 05:57
哈哈哈啊哈哈,不错
作者: conikua    时间: 2007-4-6 07:35
学习一下
作者: anxi185    时间: 2007-4-6 17:45
学习一下!
作者: 真主    时间: 2007-4-6 18:33
看看
作者: emml    时间: 2007-4-6 20:06
回复回复!
作者: weipdxy    时间: 2007-4-6 21:44
学习中
作者: houlijun    时间: 2007-4-7 08:01
ll
作者: sllk    时间: 2007-4-7 09:28
谢谢
作者: dasxsf    时间: 2007-4-7 18:19

作者: zhaowen6699    时间: 2007-4-7 18:51
学习
作者: XWQ2000    时间: 2007-4-7 22:05
[em02][em02]
作者: hawangxd    时间: 2007-4-8 02:40
我一直想看这方面的例子
作者: chenwg    时间: 2007-4-8 07:57
好!
作者: lighters    时间: 2007-4-9 01:00



作者: blacklight    时间: 2007-4-9 04:47

作者: poly    时间: 2007-4-9 08:44
我有些晕了,不知道你想说明的是什么,是输入一样东东就弹出其它的东东还是什么?
作者: dmlrf    时间: 2007-4-9 08:46
我一直都在顶
作者: dmlrf    时间: 2007-4-9 08:56
标题: 在子窗体中请教怎样应用?
请教:在子窗体中怎么应用呢?这个问题困扰了我几天了,请教高手能否解决,若能解决,按地名和节育措施落实能否生成数字统计表呢?急盼![attach]23877[/attach]

作者: qdjqx    时间: 2007-4-13 03:32
谢谢分享。
作者: 峰火    时间: 2007-4-13 18:41
很好!
作者: niwj    时间: 2007-4-13 18:59
刚才发的就是这个问题,我来参考一下
作者: fjwen    时间: 2007-4-13 22:00
谢谢分享。
作者: superlirui    时间: 2007-4-17 06:46
hao
作者: chy1981    时间: 2007-4-17 16:41
学习,学习
作者: cangqiong    时间: 2007-4-17 16:49
学习一下
作者: Jean1288    时间: 2007-4-20 00:55
kk
作者: fenyake716    时间: 2007-4-20 04:40
看看
作者: kokimkyu    时间: 2007-4-20 07:32
收藏,谢谢


作者: ljcljc    时间: 2007-4-21 18:26
看看
作者: yhf    时间: 2007-4-22 07:57
看看
作者: WWWMEI100    时间: 2007-4-22 18:51
[em17][em17][em17][em17]
作者: icbc285    时间: 2007-4-23 06:38
看看。
作者: goodkj    时间: 2007-4-23 10:07
二额
作者: chinalyq    时间: 2007-4-23 17:50
顶呀,我最想学这个了。
作者: iamee    时间: 2007-4-23 19:33
学习
作者: thzbc    时间: 2007-4-24 03:26
想看看老师的杰作
作者: fly51771    时间: 2007-4-24 03:49
看看,顺便学习下
作者: denxiqing    时间: 2007-4-24 22:29
看看再说
作者: pop2008    时间: 2007-4-24 22:58
真好


作者: Threaten    时间: 2007-4-25 01:43
顶你一下,下来看看
作者: no1s    时间: 2007-4-25 02:48
kankan
作者: ls_hndd    时间: 2007-4-25 05:29
oo
作者: preen    时间: 2007-4-25 08:10
以下是引用wang1950317在2007-3-21 8:28:00的发言:
非常好!谢谢!


作者: yangxiang    时间: 2007-4-25 17:23
okokookokokk
作者: aaaaaa11    时间: 2007-5-3 01:14
kk
作者: aone    时间: 2007-5-3 05:10
学习一下
作者: 54kang    时间: 2007-5-3 18:30
ewr
作者: lion1133    时间: 2007-5-4 19:23
学习一下
作者: davidh    时间: 2007-5-4 21:09
我来看看
作者: squarrel0    时间: 2007-5-5 09:28
学习
作者: wxf16    时间: 2007-5-7 05:49
thanks
作者: glw    时间: 2007-5-7 16:07
LOOK
作者: tlauan    时间: 2007-5-8 16:54
标题: KK
KK
作者: tonygeng    时间: 2007-5-8 17:56
非常好,感謝!
作者: 99010007    时间: 2007-5-8 18:03
kk
作者: brothxb    时间: 2007-5-8 18:18
我正为这个组合框联动伤脑筋,谢谢
作者: zcjoy    时间: 2007-5-10 06:41
xuex
作者: iamwg    时间: 2007-5-10 06:57
谢谢分享
作者: hbsylee    时间: 2007-5-10 23:23
ding
作者: hbsylee    时间: 2007-5-10 23:24
好东东
作者: waterhouse    时间: 2007-5-11 19:23
hao


作者: xsu001    时间: 2007-5-12 05:02
谢谢分享,获得焦点自动打开组合框会更加完美
作者: baoer9179    时间: 2007-5-13 06:54
dddddddddd
作者: accessone1    时间: 2007-5-13 08:05
see
作者: sciermoon    时间: 2007-5-18 18:11
正需要这个,感谢楼主啊!




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3