C. SỬ DỤNG CÁC HÀM AP
2. Tham số tuỳ chọn
Ta có thể sử dụng tham số tuỳ chọn trong các phương thức, thậm chí các thủ tục của thuộc tính. Ví dụ, ta có thể thêm tham số màu cho phương thức DrawBox. Khi đó, chỉ với phương thức
DrawBox, ta có thể vẽ hoặc xố hộp mà khơng cần gọi ClearBox.
Ví dụ mẫu – Dùng tham số tuỳ chọn
1. Dừng chương trình. Trong cửa sổ Project Explorer, nhấn đúp chuột lên clsBox để mở cửa sổ Code.
3. Sửa phương thức DrawBox để thêm vào tham số tuỳ chọn màu: Public Sub DrawBox(Canvas As Object, Optional lColor As Long) If IsMissing(lColor) Then
Canvas.Line (mvarX, mvarY)-(mvarX + mvarWidth, mvarY + _ mvarHeight),, B
Else
Canvas.Line (mvarX, mvarY)-(mvarX + mvarWidth, mvarY + _ mvarHeight), lColor, B
End If End Sub
4. Đến đây, chương trình chưa thể biên dịch, vì vẫn cịn một dịng lệnh tham chiếu đến phương thức ClearBox.
.DrawBox Me
Xố dịng này và thay thế bằng dòng lệnh .DrawBox Me, Me.BackColor
5. Thi hành chương trình. Khơng có thay đổi trong kết quả.
Từ khoá Optional cho biết tham số phía sau nó khơng nhất thiết phải truyền khi gọi phương thức. Để biết được khi nào có tham số được truyền, ta dùng hàm IsMissing. Hàm này trả về giá trị True/False. Nếu khơng có tham số truyền, nó trả về True; nếu có, nó trả về False. Tuỳ theo trường hợp mà ta có xử lý tương ứng. Ở đây, khi có tham số truyền, ta gọi hàm Line có chỉ định
màu.
Lưu ý rằng tham số tuỳ chọn phải là tham số cuối cùng trong danh sách được truyền. Ví dụ, dịng lệnh sau đây không được chấp nhận:
Public Sub MyRoutine (Optional sName As String, nAge As Integer) Ta phải sửa thành:
Public Sub MyRoutine (nAge As Integer, Optional sName As String)