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", 0List1.AddItem "China", 1End Sub
要從列表中刪除專案,可使用RemoveItem方法,如要刪除列表中的第一個專案,可新增如下程式碼:Private Sub Command1_Click()List1.RemoveItem 0End 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
Text1.Text = "You have" & List1.ListCount & "_entrifs lister"
End SubPrivate Sub Command2_Click()
Text1.Text = List1.List(3)
End Sub Private Sub Command3_Click()
Text1.Text = List1.ListIndex
End SubPrivate Sub Form_Load()
List1.AddItem "Germany"
List1.AddItem "India"
List1.AddItem "France"
List1.AddItem "Canada"
List1.AddItem "USA"
List1.AddItem "Japan", 0 R>List1.AddItem "China", 1
End Sub Private Sub List1_Click()
If List1.Text = "Canada" Then
Text1.Text = "Canada have 24 million people."
End If
ListCount 返回列表框中專案的總數,只在執行時可用。例:
Private Sub Command2_Click()
ListIndex 返回在列表框中當前選定專案的位置,只在執行時可用。未選定任何專案時,其值為-l。例:
Private Sub Command3_Click()
Text 存放當前在列表框中選定的專案,即List(ListIndex)的值。
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", 0List1.AddItem "China", 1End Sub
要從列表中刪除專案,可使用RemoveItem方法,如要刪除列表中的第一個專案,可新增如下程式碼:Private Sub Command1_Click()List1.RemoveItem 0End 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 SubPrivate Sub Command2_Click()
Text1.Text = List1.List(3)
End Sub Private Sub Command3_Click()
Text1.Text = List1.ListIndex
End SubPrivate Sub Form_Load()
List1.AddItem "Germany"
List1.AddItem "India"
List1.AddItem "France"
List1.AddItem "Canada"
List1.AddItem "USA"
List1.AddItem "Japan", 0 R>List1.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)的值。