| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1304 人关注过本帖
标题:VB中的多个combobox的选值进行相加的问题
取消只看楼主 加入收藏
lliiss681
Rank: 1
等 级:新手上路
帖 子:32
专家分:0
注 册:2021-8-18
结帖率:66.67%
收藏
已结贴  问题点数:20 回复次数:4 
VB中的多个combobox的选值进行相加的问题
举例:新建combobox1,2,3,每个combobox都有两个选项分别是A和B,每当选A的时候,赋值为1,每当选B的时候赋值为2,最终将三个COMBOBOX控件里所选的选项对应的数值相加,再把这个和赋值给一个变量X,怎么写啊?求大神指教
搜索更多相关主题的帖子: 多个 相加 VB combobox 赋值 
2021-08-18 17:20
lliiss681
Rank: 1
等 级:新手上路
帖 子:32
专家分:0
注 册:2021-8-18
收藏
得分:0 
回复 2楼 风吹过b
哇!版主回复,受宠若惊啊,小白试一下,感谢赐教
2021-08-19 08:46
lliiss681
Rank: 1
等 级:新手上路
帖 子:32
专家分:0
注 册:2021-8-18
收藏
得分:0 
回复 2楼 风吹过b
版主,还是上面这个问题,我怎么看这个x被加成功了,就是想用把x赋值给label进行显示结果,是Label1.Caption = x吗?x是不是首先要先定义一下是个变量啊,Dim x As Integer
2021-08-19 09:13
lliiss681
Rank: 1
等 级:新手上路
帖 子:32
专家分:0
注 册:2021-8-18
收藏
得分:0 
按照建议的思路,在一个combo控件里编写了以下语句,怎么把这个X赋值给其它窗体来用啊?
Private Sub combo1_Change(Index As Integer)
x = 0
If combo1.Text = "4" Then
x = x + 4
ElseIf combo1.Text = "8" Then
  x = x + 8
ElseIf combo1.Text = "16" Then
  x = x + 16
ElseIf combo1.Text = "32" Then
  x = x + 32
ElseIf combo1.Text = "64" Then
  x = x + 64
ElseIf combo1.Text = "0" Then
  x = x + 0
  Else: x = x + 0
End If
x = x + 1
MsgBox x
End Sub

[此贴子已经被作者于2021-8-19 13:36编辑过]

2021-08-19 13:17
lliiss681
Rank: 1
等 级:新手上路
帖 子:32
专家分:0
注 册:2021-8-18
收藏
得分:0 
回复 7楼 风吹过b
感谢!已经实现了功能,我想把   水果的价格= 变量a赋值给textbox怎么写,我写的老有错
2021-08-20 15:15
快速回复:VB中的多个combobox的选值进行相加的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.033075 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved