代碼如下：

　　Dim Max As Integer

　　Dim Min As Integer

　　Max=Num(0)

　　Min=Num(0)

　　For i= 1 To 99

　　If Num(i)>Max Then Max = Num(i)

　　If Num(i)

　　Next 1

　　Print“最高分是：” & Max

　　Print“最低分是：” & Min

　　代碼中定義了變量Max來保存最高分，并且將第一個學生的成績(保存在元素Num(0)中)賦給它。然后使用For循環語句讓變量Max與數組的其他元素依次比較。在循環語句中又使用了If…Then語句來判斷其他元素與Max的大小，如果某元素比Max大，則將該元素的值賦給Max,Max再以這個值同其他元素進行比較。因此，在比較結束后，Max中保留的是所有元素中最大的值。

　　變量Min用來保存最低分，算法與求最高分的算法類似。

　　2.多維數組

　　聲明多維數組的形式如下

　　Dim<數組名>(下標1,下標2,…)As<數據類型>.

　　其中下標的形式與一維數組中的下標相同，下標的個數決定了數組的維數。

　　多維數組的大小為每一維的大小乘積，每一維大小為(上界一下界)+1.

　　例如：

　　Dim A(3,3 To 5) As Integer.

　　聲明了一個整型二維數組，數組的大小為(3-O+l)X(5-3+1)=12.其中各元素如表3.10所示。

　　又如：

　　Dim B(2,3,4) As String

　　聲明了一個字符串型三維數組，數組的人小為3*4*5=60.

　　與變量相同，數組的作用范圍也是由其聲明方式與聲明位置決定的，即：

　　建立全局數組，在模塊的聲明段用Public語句聲明數組。

　　建立模塊級數組，在模塊的聲明段用Private語句聲明數組。

　　建立局部數組，在過程中用Dim語句或Static語句聲明數組。

　　2010年9月計算機等級考試成績查詢時間匯總

　　2011計算機等級考試二級VB考點及習題匯總

　　2011年計算機等級考試二級VB復習指導匯總