close
For Each.In.Next敘述
會將集合物件包括陣列中的元素逐一放入指定的變數名稱
 
以下的範例是將student_score陣列資料copy給number，並且加以計算
 
須留意 For Each.In.Next的變數名稱的資料型別和集合物件中元素的資料型別一致
 
 

foreachin.png  

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
 
 
arrow
arrow
    全站熱搜

    興小弟讀書筆記 發表在 痞客邦 留言(0) 人氣()

    E-mail轉寄