- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 入门者问：这样的代码怎么写？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=21289)
-- 发布时间：2012/7/8 12:47:00
-- 入门者问：这样的代码怎么写？
在窗口中有两个录入控件，如图：控件“商品名称”有生铁、铁矿石、粗砂等，用目录树选择录入，“计量单位”有立方米、吨，生铁单位是吨，其它单位是立方米。怎样用代码实现根据“商品名称”选择的内容“计量单位”自动填充，不用录入？最好简单说下为什么这么写。谢谢！
此主题相关图片如下：001.jpg
-- 发布时间：2012/7/8 13:13:00
--
怎么都喜欢用纯文字提问呢，纸上谈兵那是智者的学问，这里多数是实战学生出道，上传一个示列，你这个简单的问题会有很多人帮你解决的。
-- 发布时间：2012/7/8 13:33:00
--
没有实例啊，学习的时候就整这么个窗口。对前辈们来说，这问题也太过简单了，我以为他们一看就能明白，呵呵
-- 发布时间：2012/7/8 13:50:00
--
也就是说，你要的都是没有来源的，那怎么帮你呢。 看帮助有关列表项目吧，还有ComboList、GetComboListString、GetUniqueValues ······
-- 发布时间：2012/7/8 14:02:00
--
谢谢你的热情！不知道狐爸可不可以看哈~
-- 发布时间：2012/7/8 14:08:00
--
呵呵，狐爸一般都会给你一个连接···
-- 发布时间：2012/7/8 14:09:00
--
-- 发布时间：2012/7/8 22:13:00
--
在combobox1的SelectedIndexChanged事件里写代码:
if e.Form.Controls("ComboBox1").value="生铁" then \'如果选择 生铁
e.Form.Controls("textbox6").text="吨" \'单位赋值 吨
else
e.Form.Controls("textbox6").text="立方米" \'其他的 统统赋值 立方米
endif
[此贴子已经被作者于2012-7-8 22:23:17编辑过]
-- 发布时间：2012/7/8 22:21:00
--
谢谢sloyy，我试试
-- 发布时间：2012/7/8 22:41:00
--
以下是引用在2012-7-8 22:13:00的发言：
在combobox1的SelectedIndexChanged事件里写代码:
if e.Form.Controls("ComboBox1").value="生铁" then \'如果选择 生铁
e.Form.Controls("textbox6").text="吨" \'单位赋值 吨
else
e.Form.Controls("textbox6").text="立方米" \'其他的 统统赋值 立方米
endif
[此贴子已经被作者于2012-7-8 22:23:17编辑过]
正是我想实现的结果，虽然老鸟们不屑于回答，但我就写不正确，再次谢谢sloyy