Foxtable(狐表)用户栏目专家坐堂 → 请教一个低级问题


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

主题:请教一个低级问题

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


加好友 发短信
等级:小狐 帖子:360 积分:3233 威望:0 精华:2 注册:2012/1/17 10:55:00
请教一个低级问题  发帖心情 Post By:2017/3/17 10:54:00 [只看该作者]

控件1 NumericComboBox1 
控件2 NumericComboBox2
控件3 NumericComboBox3


如何实现  NumericComboBox1  和 NumericComboBox2 TextChanged变动时 实时显示 NumericComboBox3 =  NumericComboBox1 + NumericComboBox2

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


加好友 发短信
等级:六尾狐 帖子:1249 积分:9474 威望:0 精华:0 注册:2013/5/12 9:22:00
  发帖心情 Post By:2017/3/17 11:04:00 [只看该作者]

你这是需要值相加还是文本内容相加?

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


加好友 发短信
等级:小狐 帖子:360 积分:3233 威望:0 精华:2 注册:2012/1/17 10:55:00
  发帖心情 Post By:2017/3/17 11:10:00 [只看该作者]

当然是值 

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/3/17 11:15:00 [只看该作者]

TextChanged事件写代码

 

n3.Value = val(n1.text) + val(n2.text)


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


加好友 发短信
等级:六尾狐 帖子:1249 积分:9474 威望:0 精华:0 注册:2013/5/12 9:22:00
  发帖心情 Post By:2017/3/17 11:50:00 [只看该作者]

'窗口的全局事件(TextChanged)

Dim n1 As WinForm.NumericComboBox = e.Form.Controls("NumericComboBox1")
Dim n2 As WinForm.NumericComboBox = e.Form.Controls("NumericComboBox2")
Dim n3 As WinForm.NumericComboBox = e.Form.Controls("NumericComboBox3")
Select Case e.Sender.Name
    Case "NumericComboBox1","NumericComboBox2"
        n3.Value = Val(n1.Text) + Val(n2.Text)
End Select

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


加好友 发短信
等级:小狐 帖子:360 积分:3233 威望:0 精华:2 注册:2012/1/17 10:55:00
  发帖心情 Post By:2017/3/17 12:17:00 [只看该作者]

棒棒的 谢谢啦 两位大神

 回到顶部