VB里面的listBox控件怎么用啊?
listBox是用来显示列表数据的控件
他的主要属性如下:
设已知控件为list1
list1.list为列表中显示的相关数据
list1.Backcolor为列表的背景颜色
list1.Forecolor为他的字体颜色
list1.front为他的字体
list1.style为控件的选中格式(0为默认,1为可以在其上打对号)
当要向其中加入字符窜时可以用这个命令
List1.AddItem
"xxx",
index
xxx为欲加入的字符,index为加入字符的位置(第几行)
删除其中的字符窜命令为:
list1.RemoveItem
index
index为已知欲删除行数。
基本的就这些了。。。。。。。。
VB里如何逐行读取listbox中的数据
VB可通过循环来获取ListBox控件的List属性。
List属性,返回或设置控件的列表部分的项目。列表是一个字符串数组,数组的每一项都是一列表项目。
下列代码读取ListBox控件的List属性。
OptionExplicit
DimIAsLong
PrivateSubForm_Click()
ForI=1To10
PrintList1.List(I)'输出ListBox的前10项内容
Next
EndSub
PrivateSubForm_Load()
DimEntryAsString'声明变量。
ForI=1To30'计数值从1到30。
Entry="Entry"&I'创建输入项。
List1.AddItemEntry'添加该输入项。
NextI
EndSub
vb中Listbox怎样绑定数据库
通过datasource属性绑定
比如使用数据库控件
datasource
控件会出现一个下拉框
选择需要绑定的数据控件,然后设置datamember绑定表,datafield绑定具体字段;也可以使用代码绑定
例如
t
list1.datasource=adodc1.recordt
list1.refresh'刷新
VB关于listbox的问题
1.用VB公用打开对话框向listbox列表添加文件名时怎样才能防止有重复的文件名出现.
可以先做个检测,先在末尾插入个代码:
Function CheckAA(ListBox As ListBox, Text As String) As Boolean
For i = 0 To (ListBox.ListCount - 1)
If ListBox.List(i) = Text Then
CheckAA = Fal
Exit Sub
End If
Next
CheckAA = True
End Function
然后在加项目时用CheckAA函数验证一下,如果没重复,则返回True
参数ListBox为要验证的列表框
参数Text为要检查的字符
2.在添加过程中如果想删除选中项要怎么办
先在末尾插入个代码:
Sub DeleteItem(ListBox As ListBox)
ListBox.RemoveItem ListBox.ListIndex
End Sub
然后在需要删除选择项时调用DeleteItem就可以了,
参数ListBox为要删除选择项的列表框
3.在添加完成后要点击完成按钮后,需要把该窗口中的listbox列表中内容保存在.INI文件中,还要把该窗口中的listbox列表中内容复制到主窗体的listbox列表中,并需要启动时将保存的文件名读取到主窗体的listbox列表中
可参照如下ini格式:
[TIP]
歌曲数=2
歌曲1=c:\东方红.mp3
歌曲2=c:\第二曲.mp3
......
读取时先取歌曲数,再用For x = l To u ... Next这种语句
For...Next语句样式:
For 记数用的变量名 = 起始数 To 终止数
[添加过程部分,当记数用的变量名<终止数时才会有效]
Next
请教vb listbox的使用方法
如果说,现在有个ListBox1
我已经向其中添加了若干项目。
如果要实现我双击其中一个项目,都跳出一个 Msgbox ,显示内容为我说双击的项目的 行号 & 该行的名称?
比如,我说选的第三个项目“武汉”,就会显示一个 msgbox 为“2武汉”
谢谢达人指点!!