為了回答這個問題,我們可以建立一個簡單的工程,窗體中只有一個控制元件list1,然後寫入下列程式碼:
Private Sub Form_Load()
Dim i As Integer
For i = 0 To 8
List1.AddItem "專案" & Str(i)
Next i
End Sub
Private Sub List1_Click()
Print "List1.ListIndex="; List1.ListIndex
Print "List1.List("; List1.ListIndex; ")= "; List1.List(List1.ListIndex); ""
透過單擊列表框,我們得到如圖所示的結果。
從結果可看出:
一、List1.ListIndex 返回的是單擊專案的行號,範圍是從【0】到【專案數量-1】的整數,當沒有專案被選中時,該值為-1
二、List1.List()[注意它的後面一定有一個括號,括號內一定是一個正整數,取值範圍是從【0】—【專案數-1】],返回的是某個行號下的的專案文字。比如:
List1.ListIndex=5,這裡的5是一個整數,
List1.List(5)=“學生 5”,這是一個字串。
為了回答這個問題,我們可以建立一個簡單的工程,窗體中只有一個控制元件list1,然後寫入下列程式碼:
Private Sub Form_Load()
Dim i As Integer
For i = 0 To 8
List1.AddItem "專案" & Str(i)
Next i
End Sub
Private Sub List1_Click()
Print "List1.ListIndex="; List1.ListIndex
Print "List1.List("; List1.ListIndex; ")= "; List1.List(List1.ListIndex); ""
End Sub
透過單擊列表框,我們得到如圖所示的結果。
從結果可看出:
一、List1.ListIndex 返回的是單擊專案的行號,範圍是從【0】到【專案數量-1】的整數,當沒有專案被選中時,該值為-1
二、List1.List()[注意它的後面一定有一個括號,括號內一定是一個正整數,取值範圍是從【0】—【專案數-1】],返回的是某個行號下的的專案文字。比如:
List1.ListIndex=5,這裡的5是一個整數,
List1.List(5)=“學生 5”,這是一個字串。