包含vblistbox的词条
VB里如何逐行读取listbox中的数据
VB可通过循环来获取ListBox控件的List属性。
List属性，返回或设置控件的列表部分的项目。列表是一个字符串数组，数组的每一项都是一列表项目。
下列代码读取ListBox控件的List属性。
Option?Explicit
????Dim?I?As?Long
Private?Sub?Form_Click()
????For?I?=?1?To?10
????????Print?List1.List(I)?'输出ListBox的前10项内容
????Next
End?Sub
Private?Sub?Form_Load()
????Dim?Entry?As?String??'?声明变量。
????For?I?=?1?To?30???'?计数值从?1?到?30。
????????Entry?=?"Entry?"??I???'?创建输入项。
????????List1.AddItem?Entry???'?添加该输入项。
????Next?I
End?Sub
VB LISTBOX 详解有哪些？
1）List Box控件常用的方法
参数：
AddItem
向列表框添加新项目，其格式为：
ListBox控件名．AddItem＜项目＞[，＜索引值＞]
其中：
为字符串表达式，表示添加到列表框中的新项目。
为数值表达式，指定在列表框中插入新项目的位置。若为0，则插入到第一个项目位置；若缺省且Sorted属性为False，则插入到最后一个项目位置；
若缺省且Sorted属性为True，则插入到合适的排序位置。
RemoveItem
从列表框中删除项目，其格式为：
ListBox控件名．RemoveItem＜索引值＞
Clear
清除列表框中所有项目，其格式为：
ListBox控件名.Clear
例如添加代码到List1列表框中，运行后的结果如下：
Private Sub Form_Load()
List1.AddItem "Germany"
List1.AddItem "India"
List1.AddItem "France"
List1.AddItem "USA"
List1.AddItem "Japan", 0
List1.AddItem "China", 1
End Sub
要从列表中删除项目，可使用RemoveItem方法，如要删除列表中的第一个项目，可添加如下代码：
Private Sub Command1_Click()
List1.RemoveItem 0
End Sub
要删除连结版或标准版的列表框、组合框中的所有项目。可使用Clear方法：
List1.Clear
注意：
1）可以在设计时添加项目。做法：选列表框“属性”窗口中[List]属性，在下拉的空白框中输入项目，并按[CTRL]+[回车]键进行换行。
2）只能在列表末端添加项目。
3）如果要将列表按字母顺序排序，则应将“Sorted”属性设置为“True”，且省略索引（否则，使用带有index参数的AddItem方法可能会导致不可预料的非排序结果），排序时不区分大小写。
（2）常用属性
属性 描述 代码及界面显示
List （1）在设计时可向列表框中添加新项目，输人时用Ctrl+Enter组合键换行（2）在代码中可用来访问列表框中的所有项目，它包含了一个字符串数组，列表框中的每个项目都是这个数组的元素。其引用格式为：
s$=ListBox控件名．List(索引值)
其中：为数值表达式，指定项目在列表中的位置，它是从0开始的。
例：s$=list1.list(6)将列出list1的第七项内容。
Private Sub Command1_Click()
Text1.Text = List1.List(2)
End Sub
也可改变数组中已有的值，格式：
ListBox控件名．List(索引值)=s$
例list1.list(3)="AAAA"将把list1的第四项的内容设为AAAA。 Option Explicit
Private Sub Command1_Click()
Text1.Text = "You have" List1.ListCount "_entrifs lister"
End Sub
Private Sub Command2_Click()
Text1.Text = List1.List(3)
End Sub
Private Sub Command3_Click()
Text1.Text = List1.ListIndex
End Sub
Private Sub Form_Load()
List1.AddItem "Germany"
List1.AddItem "India"
List1.AddItem "France"
List1.AddItem "Canada"
List1.AddItem "USA"
List1.AddItem "Japan", 0
RList1.AddItem "China", 1
End Sub
Private Sub List1_Click()
If List1.Text = "Canada" Then
Text1.Text = "Canada have 24 million people."
End If
End Sub
ListCount 返回列表框中项目的总数，只在运行时可用。例：
Private Sub Command2_Click()
Text1.Text = "You have" List1.ListCount "_entrifs lister"
End Sub
ListIndex 返回在列表框中当前选定项目的位置，只在运行时可用。未选定任何项目时，其值为-l。例：
Private Sub Command3_Click()
Text1.Text = List1.ListIndex
End Sub
Text 存放当前在列表框中选定的项目，即List(ListIndex)的值。例：
Private Sub List1_Click()
If List1.Text = "Canada" Then
Text1.Text = "Canada have 24 million people."
End If
End Sub
Columns 指定列表框中的列数。其值为0时，列表框以垂直滚动的单列方式显示；为l时，列表框以水平滚动的单列方式显示；大于l时，列表框以水平滚动的多列方式显示。 Option Explicit
Private Sub Form_Load()
Dim i As Integer
For i = 0 To Screen.FontCount - 1
List1.AddItem Screen.Fonts(i)'“Columns”属性0
List2.AddItem Screen.Fonts(i)'“Columns”属性1
Next i
End Sub
MultiSelect 表明是否允许用户从列表框中选定多个项目以及选定的方式。其值为0时，只允许选择一个项目，不允许复选；为1时，允许用户通过单击或按下空格键选定或撤消多个项目；为2时，允许用户使用Shift和Ctrl组合操作来选定或撤消多个项目。
语法结构： object.MultiSelect = [ Number ]
Sorted 为True时，自动将列表按字母顺序重新排列，排序时不区分大小写。
Style 表示列表框中项目的显示形式，运行时只读。其值为0时，为标准方式显示；为1时，在每个项目前加上一个复选框。
Selected 该属性实际上是一个数组，各个元素的值为True或False，表明是否选择了该项。
用下面的语句可以检查指定的表项是否被选择（其中“索引值从0开始）：
ListBox控件名．Selected(索引值)
用下面的语句可以选择或取消指定的表项：
ListBox控件名．Selected(索引值)=Ture│False
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怎么用？
laod事件中，你写错了一些内容
给你具体代码，你直接用即可：
private
sub
command1_click()
if
list1.listindex
then
list1.listindex
=
list1.listindex
-
1
else
list1.listindex
=
list1.listcount
-
1
end
if
end
sub
private
sub
command2_click()
if
list1.listindex
=
list1.listcount
-
1
then
list1.listindex
=
else
list1.listindex
=
list1.listindex
+
1
end
if
end
sub
private
sub
form_load()
list1.additem
"a"
list1.additem
"b"
list1.additem
"c"
list1.additem
"d"
command1.caption
=
"向上移"
command2.caption
=
"向下移"
end
sub
vblistbox赋值方法
vblistbox赋值方法如下：
1、在打开的软件中，新建一个WPF，添加一个listBox。
2、点击编辑项，在打开的编辑窗口中，输入内容，点击确定。
3、这时就可以看到listBox中就有内容了，赋值完成。
VB Listbox添加项
在编辑状态，可以在listBox的属性list中添加，直接点击list属性右侧下拉箭头后输入即可；在运行状态，可以使用语句
list1.AddItem
添加内容。