标题: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



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-506565-1-1.html




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

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