Sử dụng Câu lệnh InputBox

Lệnh (hàm) InputBox có chức năng nhập dữ liệu từ người dùng, tương tự như Readln trong PAscal, scanf trong C, Accept trong Foxpro ... Hàm InputBox có thể nhận một trong 3 tham số quan trọng là: Dòng nhắc “Prompt”, Tiêu đề của hộp thoại “Title” và giá trị mặc định “Default”. Hàm này trả về giá trị mà người dùng vừa nhập.

• Thực hành 1 : nhập họ tên của người dùng bằng hàm InputBox

Gõ đoạn lệnh sau vào trong thủ tục Form_Load :

SubForm_Load

Dim HoTen As String

HoTen = InputBox(“Nhập họ tên”)

Msgbox “Bạn vừa nhập xâu là : “ &HoTen

End Sub

• Thực hành 2: Nhập Họ tên và tuổi, sau đó thông báo ra màn hình bằng MsgBox

SubForm_Load

Dim HoTen As String

Dim Tuoi As Integer

HoTen = InputBox(“Nhập họ tên”,”Tiêu đề: Nhập thông tin”)

Tuoi = InputBox(“Tuổi của bạn : “,”Nhập thông tin”, 20)

Msgbox “Bạn vừa nhập xâu là : “ &HoTen

MsgBox “Tuổi là : “ &Tuoi

End Sub

Một số nhận xét:

• Thủ tục SubForm_Load tương tự như hàm main trong C hay Begin … End. trong PAscal sẽ được gọi đầu tiên khi chương trình chạy.
• Hàm MsgBox, Debug.Print và InputBox được sử dụng như những lệnh nhập xuất dữ liệu đơn giản nhất trong Visual Basic.