vb list里数据的计算

2024-12-15 10:34:01
推荐回答(3个)
回答1:

Private Sub Command1_Click()

'For i = 0 To List1.ListCount - 1
Select Case List3.ListIndex
Case 0'点第一行时
MsgBox "6"
Case 1
MsgBox "4"
End Select

End Sub

回答2:

Private Sub Command1_Click()
If List1.ListIndex = 0 Then
MsgBox 6
ElseIf List1.ListIndex = 1 Then
MsgBox 4
End If
End Sub

回答3:

没明白为何为-5