Giáo trình hướng dẫn các trợ giúp về cú pháp trong quá trình viết mã lệnh khai báo biến trong VB p6

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ủa dò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:

Title Prompt Buttons 12.2 Hộp nhập liệu (Input Box – InputBox) InputBox sử dụng nhằm yêu cầu người dùng nhập chuỗi (String) theo gợi ý dòng nhắc (Prompt) tiêu đề (Title) InputBox gọi theo dạng hàm với giá trị trả chuỗi liệu mà người dùng nhập Cú pháp gọi InputBox thông thường 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ị InputBox XPos, YPos Kiểu Double Toạ độ góc trái InputBox hiển thị hình Đoạn mã sau 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 giá trị trả hàm InputBox chuỗi có giá trị “100000”, cịn bấm nút Cancel giá trị trả chuỗi rỗng 12.3 Hộp thoại dựa điều khiển Common Dialog Điều khiển Common Dialog cho phép hiển thị hộp thoại sau: Ø Hộp thoại Open, Save: phục vụ thao tác mở ghi tập tin 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ƯƠNG III: CƠ BẢN VỀ NGƠN NGỮ LẬP TRÌNH VISUAL BASIC  Để đưa điều khiển vào 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 điều khiển Common Dialog Thuộc tính Mơ tả Ghi DialogTitle Tiêu đề hộp thoại Kiểu String FileName Trả đường dẫn tên file chọn - Hộp thoại Open, Save Kiểu String FileTitle Trả tên file chọn (không chứa đường dẫn) - Hộp thoại Open, Save Kiểu String Filter Mô tả kiểu file hiển thị hộp thoại - Hộp thoại Open, Save Kiểu String FilterIndex Kiểu file mặc định hiển thị hộp thoại - Hộp thoại Open, Save Kiểu Integer DefaultExt Phần mở rộng mặc định gắn hộp thoại (khi người dùng không chọn mà nhập text vào phần tên file) - hộp thoại Open, Save Kiểu String InitDir Đường dẫn khởi tạo hộp thoại - Hộp thoại Open, Save Kiểu String CancelError Qui định có phát sinh lỗi hay khơng người dùng chọn nút Cancel hộp thoại Kiểu Boolean Color Trả màu chọn hộp thoại – Hộp thoại Color Tham khảo Object Browser Ø Các phương thức điều khiển Common Dialog Phương thức Mô tả Ghi ShowOpen Hiển thị hộp thoại mở file (Open) ShowSave Hiển thị hộp thoại ghi file (Save) Tham khảo Object Browser Help 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) 79 ShowPrinter Hiển thị hộp thoại in ấn (Printer) Ví dụ: Xây dựng UserForm gồm điều khiển hình dưới: Label Name: lbPath Common Dialog Name: cmDlg Command Button Command Button Name: cmdColor Name: cmdOpen Yêu cầu: Ø Người dùng bấm nút Open Path để lấy đường dẫn file sau hiển thị điều khiển lbPath Ø Người dùng chọn nút Select Color để đổi màu UserForm Mã lệnh tham khảo sau: Mã lệnh với thủ tục kiện Click 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 ShowOpen strPath = Filename ' lay ve ten day du cua file duoc chon End With lbPath.Caption = strPath End Sub Mã lệnh với thủ tục kiện Click cmdColor Private Sub cmdColor_Click() Dim lngColor As Long ‘ bien luu tru mau duoc chon With cmDlg ShowColor lngColor = color ‘ lay ve mau nguoi dung chon hop thoai End With Me.BackColor = lngColor End Sub 80 CHƯƠNG III: CƠ BẢN VỀ NGƠN NGỮ LẬP TRÌNH VISUAL BASIC  13 Lập trình xử lý tập tin Sử lý tập tin nhu cầu thiếu xây dựng phần mềm ứng dụng, hầu hết loại thơng tin máy tính lưu trữ tập tin khác Trong phần mềm ứng dụng sử dụng, liệu đầu vào chúng cung cấp hai hình thức: Ø Nhập trực tiếp từ bàn phím người sử dụng: cách phù hợp lượng số liệu không nhiều Ø Nhập từ tập tin liệu, ví dụ để dựng đồ số (để thiết kế đường ơtơ máy tính) số liệu điểm đo toàn đạc nhiều (có thể vài nghìn điểm đo) thường cung cấp dạng tập tin văn Việc nhập liệu từ tập tin làm cho mức độ tự động hóa nâng cao hơn, cho phép phần mềm ứng dụng kết nối với thơng qua hình thức truyền liệu Ngồi ra, để lưu lại thông tin hay kết sau phiên làm việc với phần mềm ứng dụng, việc sử dụng tập tin làm nơi lưu trữ phổ biến Các số liệu nhập vào kết tính tốn phần mềm lưu lại vào hay nhiều tập tin chúng gọi lại phiên làm việc Để xây dựng chương trình có khả nhập/xuất liệu từ tập tin, người lập trình cần phải nắm nội dung sau: Ø Kiểu tập tin: cách thức tổ chức liệu tập tin Hiện có vơ số định dạng cho tập tin người dùng tự định nghĩa Kiểu định dạng phổ biến dùng để trao đổi liệu tập tin văn (thường có phần mở rộng TXT, CSV) Với định dạng ta xem nội dung tập tin chương trình soạn thảo đơn giản Notepad.exe Windows Ø Thao tác lên tập tin: thao tác nhằm biến đổi nội dung tập tin cho phù hợp với mục đích người dùng Những thao tác thực theo trình tự định với chương trình chuyên trách cho nhiệm vụ Các thao tác bao gồm: ƒ Đọc liệu (Input) từ tập tin vào chương trình ƒ Ghi liệu (Output) từ chương trình tập tin ƒ Tìm kiếm liệu tập tin: đọc liệu có chọn lọc ƒ Tạo tập tin: tạo tập tin đĩa để ghi liệu lên ƒ Xóa tập tin khơng cịn dùng đến ƒ Di chuyển vị trí (Move) tập tin từ nơi đến nơi khác ƒ Tạo (Copy) cho tập tin: tạo tập tin thứ hai giống hệt tập tin gốc nội dung tên vị trí lưu trữ tập tin phải khác so với tập tin gốc 13.1 Các hình thức truy cập tập tin Truy cập tập tin bao gồm thao tác đọc ghi liệu Cách thức truy cập bao gồm: Ø Truy cập kiểu (Sequential): Quá trình đọc ghi liệu với tập tin theo khối liệu liên tục từ đầu đến cuối tập tin Các khối liệu liên tục ký tự, số, mẩu tin, chuỗi, dòng văn bản,…Các khối phân cách tập tin kí tự dấu phẩy (,) kí tự xuống dịng Ví dụ, muốn đọc dịng liệu thứ n tập tin văn có m dịng (m>n), khơng thể truy cập tới dịng thứ n mà phải đọc từ dòng (là dòng văn mà trỏ đọc liệu đó) tới dịng thứ n Kiểu truy cập thường áp dụng với tập tin văn (text file) 81 Hình III-24: Truy cập kiểu đọc tập tin văn Ø Truy cập kiểu ngẫu nhiên (Random): Quá trình đọc ghi liệu với tập tin thực dựa mẩu tin có kích thước xác định (đơn vị để đo lường mẩu tin Byte) Việc truy xuất đến mẩu tin tuỳ ý, không cần tuân theo trình tự mà theo thứ tự mẩu tin tập tin Q trình truy cập ngẫu nhiên thường áp dụng cho tập tin liệu tổ chức theo khối có cấu trúc (các mẩu tin) Ø Truy cập kiểu nhị phân (Binary): Quá trình đọc ghi liệu với tập tin thực theo khối không giống kích thước Q trình truy cập nhị phân thường áp dụng cho tập tin có cấu trúc khơng cố định liệu xác định thông qua byte liệu đọc vào Trong khn khổ giáo trình này, tập tin văn thao tác lên nó, trình bày chi tiết tính phổ biến hữu dụng loại tập tin làm việc với phần mềm ứng dụng ngành xây dựng cơng trình giao thơng Để việc thao tác với tập tin thuận lợi, VB cung cấp sẵn hai phương pháp bản: Ø Sử dụng hàm có sẵn để thao tác trực tiếp lên tập tin (dùng hàm I/O) Ø Sử dụng số điều khiển để thao tác gián tiếp lên tập tin (dùng đối tượng FSO) 13.2 Xử lý liệu tập tin với hàm I/O: Các hàm I/O (Input/Output) dùng để truy xuất tập tin, trình tự sau: Mở tập tin: yêu cầu bắt buộc phải thực trước đọc hay ghi liệu vào tập tin Thực thao tác với tập tin: đọc ghi liệu vào tập tin Đóng tập tin: bắt buộc phải thực kết thúc thao tác với tập tin Trong khn khổ giáo trình trình bày thao tác theo kiểu với tập tin, kiểu truy cập khác tìm tài liệu tham khảo ghi cuối giáo trình Help Online VBA IDE 13.2.1 Mở tập tin: Cú pháp: 82 ... với tập tin Trong khn khổ giáo trình trình bày thao tác theo kiểu với tập tin, kiểu truy cập khác tìm tài liệu tham khảo ghi cuối giáo trình Help Online VBA IDE 13.2.1 Mở tập tin: Cú pháp: 82 ... thước Q trình truy cập nhị phân thường áp dụng cho tập tin có cấu trúc khơng cố định liệu xác định thông qua byte liệu đọc vào Trong khn khổ giáo trình này, tập tin văn thao tác lên nó, trình bày... dùng bấm nút Open Path để lấy đường dẫn file sau hiển thị điều khiển lbPath Ø Người dùng chọn nút Select Color để đổi màu UserForm Mã lệnh tham khảo sau: Mã lệnh với thủ tục kiện Click cmdOpen