Giáo trình Thực hành với Visual Basic

➤ Gửi thông báo lỗi ⚠️ Báo cáo tài liệu vi phạm

Loại tài liệu: PDF

Số trang: 141 Trang

Tài liệu: ✅ ĐÃ ĐƯỢC PHÊ DUYỆT

TẢI VỀ

Nội dung chi tiết: Giáo trình Thực hành với Visual Basic

Giáo trình Thực hành với Visual Basic

zBài thực hành sô 4: Sử dụng các hộp thoạiSử dụng các hộp thoạiHiên thị các loại hộp thoại OPENHộp thoại Open (Open dialog) là một hõp thoại chuẩn cho

Giáo trình Thực hành với Visual Basic o phép người dũng chọn một file hay một thư mục.Thực hành: Viết chương trinh mở một file (Text hoặc rtf) và hiên thị trong điều khiên Richtext Box.Các

bước thực hiện:Bước 1: Tạo một Project mớiBước 2: Vào menu Project —* Components và tham chiếu đến 2 file OCX là Rích Textbox và Common Dialog như hì Giáo trình Thực hành với Visual Basic

nh 1Bước 3: Kéo điều khiển Dialog và Richtext vào FormCác điên khiên dùng trong chương trìnhThiết kê giao diện:71/139Giao diện và kẻt quà khi chqy chư

Giáo trình Thực hành với Visual Basic

ơng trìnhĐặt giá trị cho các thuộc tinh:Điều khiểnThuộc tinh Giá trịFormName : frmMainCaption: Sử dụng hộp thoại OpenStartup Position: 2- CenterScreen

zBài thực hành sô 4: Sử dụng các hộp thoạiSử dụng các hộp thoạiHiên thị các loại hộp thoại OPENHộp thoại Open (Open dialog) là một hõp thoại chuẩn cho

Giáo trình Thực hành với Visual Basic tFileCaption: Mỡ file &TextCommand ButtonName : cmdOpenRTFFileCaption: Mỡ file &RTFViết lênh:frmMain.lrmOption Explicit'/// Mớ các file Richtext Forma

t (các file có phần niơ rộng ỉà RTF)Pri\'»ịe sub cmdOpenRTFFile_Click()dlgHopThoai.DialogTitle = "Mo file Text" '///Tiêu đề của hộp rAớợ/dlglỉopThoai. Giáo trình Thực hành với Visual Basic

Filter = "Cac file Richtext (* RTF)|* rtf]" 7//Chi hiến tin các file /?7FdlgHopThoai Showopen 7// Hiến thị hộp r/?ỡợ?rtfEditor.LoadFile dlgHopThoai Fi

Giáo trình Thực hành với Visual Basic

leName. rtfRTF V//Mớ file vừa chọn trong J?TFEndSub7.7 Mở các file Text (các file có phần mờ rộng là TXT)Private sub cmdOpenTextFile_Click()dlgHopThoa

zBài thực hành sô 4: Sử dụng các hộp thoạiSử dụng các hộp thoạiHiên thị các loại hộp thoại OPENHộp thoại Open (Open dialog) là một hõp thoại chuẩn cho

Giáo trình Thực hành với Visual Basic TextEndSubGhi chú:•Phương thức LoadFilc cứa diều khiên Richtext dũng dè mờ một file. Nó dôi hơi 2 tham số. tham số thứ nhất Là dường dần dến file cẩn

mơ. tham số thứ hai là loại file cân mờ ( Tham sô này là luỳ chọn và có the bõ qua).•Thuộc lính 2- ('enter Screen dùng đê đật Form vào giừa màn hình k Giáo trình Thực hành với Visual Basic

hi hiên thị.•Thuộc tính AutoVerbMenu - True cùa diều khiên Richtext dể chơ phép hiến thị menu (Copy, cut. Paste, Undo) khi người dùng click chuột phái

Giáo trình Thực hành với Visual Basic

lên Richlcxl control.•Trong trường hợp. khi hộp thoại mở ra. nếu người dũng không chọn file nào (Chọn nút Cancel) thì thuộc tinh TileName sè có giá t

zBài thực hành sô 4: Sử dụng các hộp thoạiSử dụng các hộp thoạiHiên thị các loại hộp thoại OPENHộp thoại Open (Open dialog) là một hõp thoại chuẩn cho

Giáo trình Thực hành với Visual Basic như sau:Private sub cmdOpenRTFFile_Click()dlgHopThoaỉ.DialogTitle = "Mo file Text" dlgHopThoai.Filter = "Cac file Richtext (*.RTF)|*.rtf|" dlgHopThoa

i.FiieNaine = "" 7/z Khởi tạo trướcdlgHopThoai.Show openIfdlgHopThoai.FileName <> "" Then '///Đã chọn filerttEditor.LoadFile dlgllopThoai FileName. rt Giáo trình Thực hành với Visual Basic

fRTF

zBài thực hành sô 4: Sử dụng các hộp thoạiSử dụng các hộp thoạiHiên thị các loại hộp thoại OPENHộp thoại Open (Open dialog) là một hõp thoại chuẩn cho