❶ 在VB中怎样获取LIST中的一个内容
用list1.list(i)可以获取列表了某一项,i是列表项的索引,从0开始,由上到下.你的问题可以用如下代码实现:
Private Sub List1_Click()
Dim i As Integer
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then
Text1.Text = List1.List(i)
End If
Next
End Sub
❷ VB 控件 List 中的全部数据如何取出
ReDim A(List1.ListCount - 1)
For i = 0 To List1.ListCount - 1
A(i) = List1.List(i)
Next
❸ vb提取LIST中的数字
Private Sub Command1_Click()
Dim i As Integer, N As Integer, NM As Integer
For i = 0 To List1.ListCount - 1
N = StrReverse(Val(StrReverse(List1.List(i))))
Debug.Print N
NM = NM + N
Next
MsgBox NM
End Sub
Private Sub Form_Load()
List1.AddItem "ABC123"
List1.AddItem "BCD456"
List1.AddItem "谢谢567"
End Sub
❹ VB 怎么读取listbox里的数值
比如我有个txtbox输入了100,然后我选中了listbox里的10,我要怎么写该能读取listbox里的10,然后来计算100*10?
解答:当你选中的值是:List1.List(List1.ListIndex)
你只要
100 * Format(List1.List(List1.ListIndex), 0)
就能得到100乘以你选中的值了。
❺ 在VB中怎样获取LIST中的一个内容
某一项内容等于list1.list(index)
,index是项序号,从0开始,代表第一项
如:list1.list(1)
获取第二项的内容
s
=
List1.List(0)
'把List1的第1项赋值给变量s
s
=
List1.List(List1.ListCount
-
1)
'把List1的最后1项赋值给变量s
s
=
List1.List(i)
'把List1的第i-1项赋值给变量s
s
=
List1.List(List1.ListIndex)
'把List1的当前选项赋值给变量s
s
=
List1.Text
'也是把List1的当前选项赋值给变量s
❻ 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 6.0 如何取list选中的值
用List1.ListIndex属性。
这个属性即为当前被选定的项目序号,从0开始。
如果没有项目被选中,该属性=-1。
所以如有必要,需要判断一下。