我有一个COMBOBOX控件(combo1)
使用如:
combo1.AddItem "Judy Phelps"
combo1.ItemData(List1.NewIndex) = 42310
combo1.AddItem "Chien Lieu"
combo1.ItemData(List1.NewIndex) = 52855
combo1.AddItem "Mauro Sorrento"
combo1.ItemData(List1.NewIndex) = 64932
combo1.AddItem "Cynthia Bennet"
combo1.ItemData(List1.NewIndex) = 39227
现在我已经知道combo1的itemdata的值是52855,如何在程序启动时让"chien lieu"成为默认条目呢?谢谢。
使用如:
combo1.AddItem "Judy Phelps"
combo1.ItemData(List1.NewIndex) = 42310
combo1.AddItem "Chien Lieu"
combo1.ItemData(List1.NewIndex) = 52855
combo1.AddItem "Mauro Sorrento"
combo1.ItemData(List1.NewIndex) = 64932
combo1.AddItem "Cynthia Bennet"
combo1.ItemData(List1.NewIndex) = 39227
现在我已经知道combo1的itemdata的值是52855,如何在程序启动时让"chien lieu"成为默认条目呢?谢谢。
解决方案 »
- 一个让我郁闷了好多天的问题,请朋友们指点迷津!
- 有高手知道下面的加密程序的原理吗?
- 谁食堂考勤机管理的原代码?我想买……
- ◎请教高手◎ 在VB中获取Return参数和多记录集的奇怪问题。
- 求教各位高人,关于捕获消息
- 有那位知道智能ABC漏洞的解决办法阿
- 用Vb开发时怎样微调控件在窗体中的位置??
- 1000分借用主页空间200KB!不会影响您的主页!
- 怎样在代码中控制文本框中的光标的位置?真的很急!
- 请问WebBrowser控件的Navigate和Navigate2的用法有什么区别,还有Stop和Quit及Refresh和Refresh2的用法有什么区别?望高手告之,还有哪位大侠有WebBrowser的详细资料。请发给我[email protected]谢谢
- 高难问题,估计得几天才能解决,唉...
- 我用installshield8.0做vb程序的安装程序的问题谢谢!
combo1.Text="Chien Lieu"
Dim intI As Integer
For intI = 0 To Combo1.ListCount - 1
If Combo1.ItemData(intI) = 52855 Then
Combo1.ListIndex = intI
End If
Next