如何通过listindex访问listbox中的项目的text属性?? 如何通过listindex访问listbox中的项目的text属性 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 text1 = list1.list(list1.listindex) 即可 再加上这个在窗体上画: listbox textbox ,将下面代码粘入 即可Private Sub Form_Load() List1.AddItem "a" List1.AddItem "b" List1.AddItem "c" End SubPrivate Sub List1_Click() Text1 = List1.List(List1.ListIndex)End Sub 再加上这个在窗体上画: listbox textbox ,将下面代码粘入 即可Private Sub Form_Load() List1.AddItem "a" List1.AddItem "b" List1.AddItem "c" End SubPrivate Sub List1_Click() Text1 = List1.List(List1.ListIndex)End Sub 如果在VB里运行reg文件时不会弹出“是否确定”的对话框 如何制作界面控件? 求教鼠标移动的问题 哪里可以下载Vb5.0简体中文的版的帮助文件,要以前那种"hlp"文件格式的,不要Msdn那种 简单的文本框中输入字符直接为* 网上与各位交个朋友,UP者有分 多布OLE BD操作产生错误!如果可能请检查每个OLE BD状态值! 有关和ACCESS数据库连接的问题 关于MDI窗体菜单的问题 求助,vb 使用变量连结acess数据库查询问题 VB菜鸟请问如何写个Undo? dao ---update
在窗体上画: listbox textbox ,将下面代码粘入 即可
Private Sub Form_Load()
List1.AddItem "a"
List1.AddItem "b"
List1.AddItem "c"
End SubPrivate Sub List1_Click()
Text1 = List1.List(List1.ListIndex)
End Sub
在窗体上画: listbox textbox ,将下面代码粘入 即可
Private Sub Form_Load()
List1.AddItem "a"
List1.AddItem "b"
List1.AddItem "c"
End SubPrivate Sub List1_Click()
Text1 = List1.List(List1.ListIndex)
End Sub