Foxtable(狐表)用户栏目专家坐堂 → 入门者问:这样的代码怎么写?


  共有7789人关注过本帖树形打印复制链接

主题:入门者问:这样的代码怎么写?

帅哥哟,离线,有人找我吗?
jxx0418
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:66 积分:758 威望:0 精华:0 注册:2012/4/20 10:24:00
入门者问:这样的代码怎么写?  发帖心情 Post By:2012/7/8 12:47:00 [只看该作者]

在窗口中有两个录入控件,如图:控件“商品名称”有生铁、铁矿石、粗砂等,用目录树选择录入,“计量单位”有立方米、吨,生铁单位是吨,其它单位是立方米。怎样用代码实现根据“商品名称”选择的内容“计量单位”自动填充,不用录入?最好简单说下为什么这么写。谢谢!
图片点击可在新窗口打开查看此主题相关图片如下:001.jpg
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
mr725
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2012/7/8 13:13:00 [只看该作者]

怎么都喜欢用文字提问呢,纸上谈兵那是智者的学问,这里多数是实战学生出道,上传一个示列,你这个简单的问题会有很多人帮你解决的。


 回到顶部
帅哥哟,离线,有人找我吗?
jxx0418
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:66 积分:758 威望:0 精华:0 注册:2012/4/20 10:24:00
  发帖心情 Post By:2012/7/8 13:33:00 [只看该作者]

没有实例啊,学习的时候就整这么个窗口。对前辈们来说,这问题也太过简单了,我以为他们一看就能明白,呵呵

 回到顶部
帅哥哟,离线,有人找我吗?
mr725
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2012/7/8 13:50:00 [只看该作者]

也就是说,你要的都是没有来源的,那怎么帮你呢。  看帮助有关列表项目吧,还有ComboListGetComboListStringGetUniqueValues ······


 回到顶部
帅哥哟,离线,有人找我吗?
jxx0418
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:66 积分:758 威望:0 精华:0 注册:2012/4/20 10:24:00
  发帖心情 Post By:2012/7/8 14:02:00 [只看该作者]

谢谢你的热情!不知道狐爸可不可以看哈~


 回到顶部
帅哥哟,离线,有人找我吗?
mr725
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2012/7/8 14:08:00 [只看该作者]

呵呵,狐爸一般都会给你一个连接···图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
jxx0418
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:66 积分:758 威望:0 精华:0 注册:2012/4/20 10:24:00
  发帖心情 Post By:2012/7/8 14:09:00 [只看该作者]

图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
sloyy
  8楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2180 积分:13816 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By: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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
jxx0418
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:66 积分:758 威望:0 精华:0 注册:2012/4/20 10:24:00
  发帖心情 Post By:2012/7/8 22:21:00 [只看该作者]

谢谢sloyy,我试试


 回到顶部
帅哥哟,离线,有人找我吗?
jxx0418
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:66 积分:758 威望:0 精华:0 注册:2012/4/20 10:24:00
  发帖心情 Post By: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


 回到顶部