Giáo trình hướng dẫn phân tích các cú pháp trong quá trình viết mã lệnh khai báo biến trong VBS p6

Tham khảo tài liệu giáo trình hướng dẫn phân tích các cú pháp trong quá trình viết mã lệnh khai báo biến trong vbs p6, công nghệ thông tin, tin học văn phòng phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả
Nội dung trích xuất từ tài liệu:
Giáo trình hướng dẫn phân tích các cú pháp trong quá trình viết mã lệnh khai báo biến trong VBS p6 Title Prompt Buttons12.2. Hộp nhập dữ liệu (Input Box – InputBox)InputBox được sử dụng nhằm yêu cầu người dùng nhập một chuỗi (String) theo gợi ý củadòng nhắc (Prompt) và tiêu đề (Title) trên đó. InputBox được gọi theo dạng hàm với giá trịtrả về là chuỗi dữ liệu mà người dùng nhập.Cú pháp gọi InputBox thông thường như sau:InputBox(Prompt, [Title], [Default], [XPos], [YPos])Tham số Mô tảPrompt Kiểu String. Nội dung dòng nhắc.Title Kiểu String. Nội dung tiêu đề.Default Kiểu Variant. Giá trị mặc định hiển thị trong InputBox.XPos, YPos Kiểu Double. Toạ độ góc trái trên của InputBox khi hiển thị ra màn hình.Đoạn mã sau sẽ minh hoạ cách thức gọi InputBox: Dim LngSodiemMax As Long LngSodiemMax = _ Val(InputBox(Nhập số lượng điểm tối đa (số nguyên dương), _ Số điểm tối đa, 100000))Nếu người dùng bấm nút OK thì giá trị trả về của hàm InputBox là một chuỗi có giá trị“100000”, còn nếu bấm nút Cancel thì giá trị trả về là một chuỗi rỗng.12.3. Hộp thoại dựa trên điều khiển Common Dialog.Điều khiển Common Dialog cho phép hiển thị các hộp thoại sau: Hộp thoại Open, Save: phục vụ thao tác mở và ghi tập tin một cách trực quan. Hộp thoại Color: phục vụ thao tác lựa chọn màu. Hộp thoại Font: phục vụ thao tác lựa chọn font chữ. Hộp thoại Print: phục vụ thao tác in ấn.78 CHƯƠNGIII:CƠBẢNVỀNGÔNNGỮLẬPTRÌNHVISUALBASICĐể đưa điều khiển này vào trong hộp công cụ điều khiển (Control Toolbox) chọn menu Tools Additional Controls, sau đó chọn Microsoft Common Dialog Control. Các thuộc tính của điều khiển Common Dialog.Thuộc tính Mô tả Ghi chúDialogTitle Tiêu đề của hộp thoại Kiểu StringFileName Trả về đường dẫn và tên của file được chọn - Hộp thoại Open, Kiểu String Save.FileTitle Trả về tên của file được chọn (không chứa đường dẫn) - Hộp Kiểu String thoại Open, Save.Filter Mô tả các kiểu file sẽ được hiển thị trong hộp thoại - Hộp thoại Kiểu String Open, Save.FilterIndex Kiểu file mặc định sẽ được hiển thị trong hộp thoại - Hộp thoại Kiểu Integer Open, Save.DefaultExt Phần mở rộng mặc định được gắn trong hộp thoại (khi người Kiểu String dùng không chọn mà nhập text vào trong phần tên file) - hộp thoại Open, Save.InitDir Đường dẫn khởi tạo trong hộp thoại - Hộp thoại Open, Save Kiểu StringCancelError Qui định có phát sinh lỗi hay không khi người dùng chọn nút Kiểu Boolean Cancel trong hộp thoại.Color Trả về màu được chọn trong hộp thoại – Hộp thoại Color Tham khảo Object Browser Các phương thức của điều khiển Common Dialog.Phương thức Mô tả Ghi chúShowOpen Hiển thị hộp thoại mở file (Open) Tham khảo trong Object Browser hoặc HelpShowSave Hiển thị hộp thoại ghi file (Save)ShowColor Hiển thị hộp thoại chọn màu (Color)ShowFont Hiển thị hộp thoại chọn font chữ (Font) 79ShowPrinter Hiển thị hộp thoại in ấn (Printer)Ví dụ: Xây dựng UserForm gồm các điều khiển như hình dưới: Label Name: lbPath Common Dialog Name: cmDlg Command Button Command Button Name: cmdColor Name: cmdOpenYêu cầu: Người dùng bấm nút Open Path để lấy về đường dẫn của một file sau đó hiển thị nó trên điều khiển lbPath. Người dùng chọn nút Select Color để đổi màu của UserForm.Mã lệnh tham khảo như sau:Mã lệnh với thủ tục sự kiện Click của cmdOpen Private Sub cmdOpen_Click() Dim strPath As String Xau luu tru duong dan cua file duoc chon Dim strFilter As String Xau bieu dien cac kieu file hien thi strFilter = App(*.exe)|*.exe|Text(*.txt)|*.txt|All files (*.*)|*.* With cmDlg .DialogTitle = Chon file .InitDir = C:Program Files duong dan mac dinh .Filter = strFilter .ShowO ...