Tham khảo tài liệu 'giáo trình lập trình cơ sở dữ liệu với visual basic part 4', công nghệ thông tin, kỹ thuật lập trình phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả | Che mnuXanh vi màu xanh đang là màu nền form False Cho phép chọn màu đó và màu trẵng mnuDo. Enable True True End Sub Thù tục mnLiDo_Click Thủ tục được thực hiện khi ta chọn lệnh Đỏ . Thủ tục có nhiệm vụ đổi màu nền của form thành màu đỏ và cho ẩn đi không cho chọn mục Đỏ đồng thời bật các mục Xanh và Trắng lên cho phép ta chọn. Sub mnuDD_Click Đặt lại màu nên là màu đò QBColors 4 Che mnuDo vì màu đỏ đang là màu nền Form False Cho phép chọn màu xanh và màu trắng True True End Sub Thù tục mnuTrang_Click Thủ tục được thực hiện khi ta chọn lệnh Trắng . Thù tục có nhiệm vụ đồi màu nền cùa form thành màu trắng và cho ẩn đi không cho chọn mục Trắng đồng thời bật các mục Đò và Xanh lên cho phép ta chọn. Sub mnuTrang_ClickO Đặt lại màu nen là màu trắng 5 QBCÕÍors 15 Che mnuTrang vỉ màu trắng đang là màu nên Form - False Cho phép chọn màu xanh và mằu đỏ mnuXanh Enable True True End Sub 74 Thù tục mnuPhongTo_Click Thủ tục thực hiện khi ta chọn mục Phóng-To . Thù tục làm nhiệm vụ đưa cửa sổ form về dạng lớn và che mục Phóng-To đi dồng thời bật mục Thu-Nhò . Sub mnuPhongTo_Click Đặt cửa so Form ở dạng lởn írmMenu. Windowstate 2 Che mnuPhongTo vì cửa sô Form đang ớ kích thước lớn mnuPhongToĨEnable False Cho phép đổi sang dạng cứa sô có kích thước nhỏ True End Sub Thù tục mnuThuNho_Click Thủ tục thực hiện khi ta chọn mục Thu-Nhò . Thủ tục làm nhiệm vụ đưa cửa so form về dạng nhò và che mục Thu-Nhỏ đi đồng thời bật mục Phóng-To . Sub mnuThuNho_Click Đặt cứa số Form ở dạng nhỏ frm Menu. Windowstate 0 Che mnuThuNho vì cứa sổ Form đang ở kích thước nhỏ False Cho phép đổi sang dạng cửa số có kích thước íớn True End Sub Lưu ý Kích thước form phụ thuộc vào thuộc tinh WmdowsSlale. Khi WlndowSlate O form có kích thước như lúc thiết kế giao diện Normal WlndowState 2 Form chiệm toàn bộ màn hình .
