là 0.
- Dim a([0) as Integer
- Hàm UBound(mảng) trả về phân tử cuỗi cùng của mảng - Hàm LBound(máng) trả về phần tử đầu tiên của mảng
b. Mảng nhiều chiều
- Ta khai báo mảng 2 chiêu: Dim a(10.10) as integer c. Máng động
- Mảng này có thê thay đổi kích cỡ, là một trong những ưu điểm của VB, mảng động giúp quán lý bộ nhớ một cách hiệu quả. Ta có thể dùng một mảng lớn trong thời gian ngắn, sau đó xóa bỏ đề trả vùng nhớ cho hệ thống.
- Khai bảo:
+ Khai báo Public hoặc Dim trong module, hoặc khai Static hay Dim trong thủ tục. Khai
báo một mảng động băng cách cho nó một danh sách không theo chiêu nào cả. Dim a()
+ Cấp phát số phần tử thực sự băng dòng lệnh Redim Redim a(6})
* Dòng lệnh Redim chỉ có thê xuất hiện trong thủ tục. Nó là một dòng lệnh thì hành, nó làm ứng dụng phải thực hiện một hành động lúc chạy chương trình.
* Mỗi lần gọi Redim tất cả giá trị chứa trong mảng hiện hành bị mất. Muốn thay
đổi kích cỡ của mảng mà không mất dữ liệu thì phải sử dụng thêm từ khóa Preserve.
- Ví dụ: Nhập vào một mảng các phân tử, sử dụng hàm inputbox. Sắp xếp mảng đó theo chiêu tăng dân.
5q phan tụ: B
Day truac khi sap xep: 148268 Day sau khi sap xep: =...
San xep ị Thnat
- Code:
Private Sub Commandl_ Click()
Dim n Ás Integer
Dim a() As Inteper
n= ClInt(TextI.Text)
ReDIm a(n) For1I= I Ton
a(1) = InputBox(" Nhap phan tu thu") Next
ForI= 1 Ton
Label3.Caption = Label3.Caption & CStr(a(1)) & ” ” Next
ForI= ITon- l For J=1+ Ï Ton
Ifa(¡) > a(j) Then
tg = a()
a4) = aÑ)
a(]) = tg
Next Next
For1I= I Ton
Label5.Caption = Label5.Caption & CStr(a()) & " "
Next
End Sub £
Private Sub Command2_ Click() End
