2013年4月3日 星期三

[物件] ListBox



ListBox 是許多初心者最頭痛的物件

之前的我找到一個很好的網站,讓我清楚的知道如何使用 ListBox 
但很可惜的,那個網站關閉了
所以我在此分享之前留下的常用 ListBox 應用!



程式碼
說明
例子
ListBox1.Items.Add("aaa")
ListBox1中加入"aaa”

ListBox1.SelectedIndex = -1
判斷是否有選取項目
If ListBox1.SelectedIndex = -1 Then
MsgBox( "未選取" )
End If
ListBox1.Items.Clear()
刪除ListBox1中的所有項目

ListBox1.Items.Count
計算ListBox1中有幾個項目

ListBox1.Items(0)
查詢ListBox1的第1筆資料

ListBox1.SelectedIndex = 1
選取ListBox1的第 2

ListBox1.Text = "aaa"
選取ListBox1中的 aaa

aaa = ListBox1.Text
aaa=目前選取資料沒有選= ""

ListBox1.Items.Insert(1, "aaa")
插入第1筆為"aaa"

ListBox1.Items.Contains("aaa")
尋找是否有aaa :True,:False

ListBox1.Items.Remove("aaa")
刪除 aaa 這筆資料

ListBox1.Items.RemoveAt(1)
刪除第 2 筆資料

ListBox1.ClearSelected()
清除選擇狀態

ListBox1.FindString(“0”)
搜尋ListBox1中開頭為「0」的項目,如有一個以上,則會回傳找到第一個項目的索引編號;如未找到符合的項目,則回傳「-1」。
Dim abc As Integer
abc = ListBox1.FindString( "0" )
If abc = -1 Then
       MsgBox( "未搜尋到項目" )
Else
       MsgBox(abc)
End If


ListBox 在 VB 是一個很好用的物件,期望大家看到這份表格可以很快就可以學起來囉~
有任何文章錯誤歡迎提出,本人將會儘快改進。