close
For Each.In.Next敘述
會將集合物件包括陣列中的元素逐一放入指定的變數名稱
以下的範例是將student_score陣列資料copy給number,並且加以計算
須留意 For Each.In.Next的變數名稱的資料型別和集合物件中元素的資料型別一致
Public Class Form1
Dim student_score() As Integer = {100, 90, 80, 70, 60, 50, 40}
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim upper As Integer = student_score.GetUpperBound(0)
Dim lower As Integer = student_score.GetLowerBound(0)
For num = lower To upper
ListBox1.Items.Add("第" & num & "位的學生成績為" & student_score(num))
Next
For Each number As Integer In student_score
'將student_score陣列資料copy給number
If number >= 40 And number <= 60 Then
'如果數字在40與60之間 則繼續
Continue For
End If
ListBox2.Items.Add("符合及格學生成績為" & number)
Next
End Sub
End Class
全站熱搜