sphm.net
当前位置:首页 >> vB 选中指定 ComBo1 >>

vB 选中指定 ComBo1

Dim i As Integer For i = 0 To Combo1.ListCount If Text1.Text = Combo1.List(i) Then Combo1.ListIndex = i End If Next

Private Sub Combo1_Change() 改为 Private Sub Combo1_Click() 前者在用键盘修改Combo1的文字时触发; 后者在用鼠标点击Combo1的选项时触发。

VB下拉框ComboBox 控件需要使用 AddItem 或 RemoveItem 方法。设置 List、ListCount、和 ListIndex 属性,使访问 ComboBox 中的项目成为可能。也可以在设计时使用 List 属性将项目添加到列表中。 ComboBox 控件,ComboBox 控件将 TextBox 控件和...

Private Sub Combo1_Change() Select Case Combo1.Index 改成: Private Sub Combo1_Click() Select Case Combo1.ListIndex Combo1的Style属性改为:2 - Dropdown List ,可以让Combo1只能选择,不能修改文本

Private Sub Combo1_Click()Text1.Text = Text1.Text & Combo1.Text & vbCrLfEnd Sub

Private Sub Command1_Click() Label1.Caption = Combo1.ItemData(Combo1.ListIndex) + Combo2.ItemData(Combo2.ListIndex) End Sub

这个问题太大,要求“任何一个窗口”,注定你在这里找不到答案的,如果固定某一个种程序还有点可能 如果固定在某一种程序上使用,就可以直接用findwindow获取句柄,然后进行后续操作 可是要求“任何一个窗口“就难了,你的监控鼠标轨迹,然后在去获...

Combo控件,可以用他的方法AddItem动态添加,也可以到属性里面设置

Private Sub Form_Load() Combo1.List(0) = "第一" Combo1.List(1) = "第二" Combo1.List(2) = "第三" End Sub 那就是你的vb有问题了 这个肯定是可以的,我都测试了 不可能,我的都可以,这个代码肯定没问题,你看看是不是你vb有问题

Private Sub Text1_Change() Dim i As Integer Combo1.Clear For i = 1 To Val(Text1.Text) Combo1.AddItem i Next Combo1.ListIndex = Combo1.ListCount - 1 '把最大值设为当前项 End Sub

网站首页 | 网站地图
All rights reserved Powered by www.sphm.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com