按键精灵下拉框 怎么做。。 10

我下拉框1有3个选项分别是类型1类型2类型3要实现下拉框1选择类型1下拉框显示类型一等等对应的选择类型2就显示类型2对应选项(不显示其他类型选项)。。--怎么做。。用的是... 我下拉框1 有3个选项分别是 类型1 类型2 类型3
要实现下拉框1 选择类型1 下拉框显示 类型一 等等对应的 选择类型2 就显示 类型2对应选项(不显示其他类型选项)。。 - - 怎么做。。 用的是按键精灵的。。
展开
 我来答
shihoumacili
高粉答主

2016-01-04 · 每个回答都超有意思的
知道大有可为答主
回答量:1.1万
采纳率:87%
帮助的人:485万
展开全部
方法如下:
除了输入框为字符串,界面返回值大多数是0123456789其中一个,根据这个值再变化即可。
如:
Dim a
MessageBox "下拉框值是"&Form1.ComboBox1.ListIndex
If Form1.ComboBox1.ListIndex = 0 Then
a="我"
ElseIf Form1.ComboBox1.ListIndex = 1 Then
a="你"
ElseIf Form1.ComboBox1.ListIndex = 2 Then
a="他"
Else
a="其它"
End If
MessageBox "a的值为 "&a
hc浊世佳公子
2013-03-22 · TA获得超过1.2万个赞
知道大有可为答主
回答量:1576
采纳率:60%
帮助的人:755万
展开全部
代码如下:
Event Form1.ComboBox1.SelectChange
If Form1.ComboBox1.ListIndex = 0 Then
Form1.ComboBox2.List = "数据1|数据2|数据3"
ElseIf Form1.ComboBox1.ListIndex = 1 Then
Form1.ComboBox2.List = "参数1|参数2|参数3"
ElseIf Form1.ComboBox1.ListIndex = 2 Then
Form1.ComboBox2.List = "选项1|选项2|选项3"
End If
End Event
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式