Khai báo hai biến mảng để lưu danh sách họ tên và điểm của 100 SV.
Viết lệnh: Hãy gõ đoạn code sau vào trong Form:
Option Explicit
Dim HT(100) As String '/// Mảng chứa được 101 phần tử từ 0 đến 100
Dim Diem(1 To 100) As Single '/// Mảng chứa được 100 phần tử từ 1 đến 100
Dim MaTran1(4, 4) As Single '/// Ma trận (mảng 2 chiều) có 5 hàng 5 cột
Dim MaTran2(1 To 4, 1 To 4) As Single '/// Mảng 2 chiều có 4 hàng, 4 cột
PrivateSubForm_Load()
HT(0) = "Bill"
HT(1) = "John"
HT(2) = "Gorge"
Diem(1) = 7
Diem(2) = 9
Diem(3) = 10
MaTran1(0, 0) = 5
MaTran1(0, 1) = 6
MaTran1(0, 4) = 8
MaTran2(1, 1) = 8
MaTran2(1, 2) = 9
MaTran2(4, 4) = 10
MsgBox "Giá trị của phần tử đầu tiên của mảng HT là : " & HT(0)
MsgBox "Diem(2) = " & Diem(2)
MsgBox "MaTran1(0,4)=" & MaTran1(0, 4)
MsgBox "MaTran2(4,4) = " & MaTran2(4, 4)
End sub