VB中combobox怎么实现选择一项会触发对应的事件

要求VB中选择combobox中的一项然后触发对应的事件,但是要求在主要程序运行后才开始选择,因为触发的事件中的一部分变量是主要程序运行后才能计算出来的

dim price as interger=combo1.seleteditem '把选中的值存入price..
再用sql语句="select 单价 from 货品 where 货品名='price'
然后再把值赋给text控件。。

大概是这样,太久没有用vb了,我给的代码不完整或者有错误,你自己修改。。
温馨提示:内容为网友见解,仅供参考
第1个回答  2018-05-28
用change事件啊

在vb中使用下拉列表,当选中其中任意一项然后执行相应的可执行程序,这个...
在ComboBox的Click或Scroll事件里判断ComboBox的ListIndex属性。鱼:下面代码帮助理解 Private Sub Form_Load()For i = 0 To 10 Combo1.AddItem i Next i End Sub Private Sub Combo1_Click()Form1.Caption = Combo1.ListIndex End Sub Private Sub Combo1_Scroll()Form1.Caption = Combo1.List...

vb6.0中选择combobox下拉列表的选项,触发某个事件
Private Sub Combo1_Click()Select Case Combo1.TextCase "1#" '在这里设置1#温控仪的数据Case "2#" '在这里设置2#温控仪的数据Case "3#" '在这里设置3#温控仪的数据End SelectEnd Sub

VB中如何在点击ComboBox的某一项时,实现一些事件
Private Sub ComboBox_Click()Select Case ComboBox.Text Case "List1" '进行………操作 Case "List2" '进行………操作 Case "List3" '进行………操作End SelectEnd Sub

vb中combobox选中不同的项触发不同的事件的代码
Combo1.AddItem "关闭所有" '先建立一行选择项 For n = 1 To 12 Combo1.AddItem "点亮第 " & n & " 个" '循环建立其它项 Next n Combo1.ListIndex = 0 '设置列表框显示的内容 End Sub

VB.NET DataGridViewComboBoxCell 选择其中一行中的Item的事件
在datagridview的EditingControlShowing事件中给DataGridViewComboBoxCell绑定selectindexchanged事件,类似如下方式:(是用C#写的,改成vb.net就可以了)private void dataGridView1_EditingControlShowing(object sender, DataGridViewEditingControlShowingEventArgs e){ ComboBox cb = e.Control as ComboBox;if (...

VB中 首次给ComboBox赋值就引起Click事件.无法阻止?
要想用户改变选项时才引起事件,方法是有的:Dim Clicked As Boolean '定义一个布尔变量,True:程序改变;False:用户改变.Private Sub Combo5_Click()If Clicked Then Clicked = False: Exit Sub '如果Clicked=True则退出此事件 MsgBox "User Clicked!" '如果Clicked为flase,说明是用户改变的,继续往下执行...

vb combobox控件选择下拉某项,点击command控件后text显示ACCESS中对应的...
查询就好了嘛,你要引用部件,找到Microsoft ADO Control 6.0,工具箱上把Adodc1拖到窗体。在桌面上新建文件夹,把accdb文件放进去,在VB工程中把工程全部保存至刚刚建立的文件夹。然后双击查找按钮写代码:Private Sub Command1_Click()Adodc1.ConnectionString="Provider=Microsoft.ACE.OLEDB.12.0;Data ...

VB6.0combobox里面有两个我自定义的两个值,我想提取其中一个值进行公式...
Private Sub Command1_Click() Dim n As Integer n = Combo1.List(Combo1.ListIndex) '或者 MsgBox ("您选择的是数字 " & n & " 它的10倍是:" & n * 10)End SubPrivate Sub Form_Load() Combo1.Clear For I = 1 To 5 Combo1.AddItem I Next IEnd Sub ...

vb中如何用ComboBOX控件显示DataGridView中的一列; 选中ComboBOX下拉表...
Button2的Click事件代码,目的,把DataGridView1第一列的数据添到ComboBox里面:‍Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click For i = 1 To DataGridView1.RowCount - 1 ComboBox1.Items.Add(DataGridView1.Item(0...

VB里面怎么实现combobox的联动
最简单直接的办法就是:combo1选择事件中,清除原有内容,只添加需要的内容。

相似回答