Đang chuẩn bị nút TẢI XUỐNG, xin hãy chờ
Tải xuống
Khả năng lập trình Drag-and-Drop (kéo-nhả) đã được hỗ trợ từ những phiên bản đầu tiên của Visual Basic, chương này trình bày kỹ thuật lập trình kéo-nhả trong Visual Basic 6.0. 1. Kéo-nhả tự động Visual Basic hỗ trợ hai chế độ kéo-nhả: tự động và bằng tay. Trong chế độ tự động, người lập trình chỉ cần gán một thuộc tính trong lúc thiết kế (design-time) hoặc trong lúc chạy chương trình (run-time), Visual Basic sẽ thực hiện mọi việc; ngược lại trong chế độ bằng tay, người lập trình phải viết lệnh trong một số. | Giáo trình Visual Basic 6.0 159 Chương 16 Lập trình Drag-and-Drop I. TỔNG QUAN Khả năng lập trình Drag-and-Drop kéo-nhả đã được hỗ trợ từ những phiên bản đầu tiên của Visual Basic chương này trình bày kỹ thuật lập trình kéo-nhả trong Visual Basic 6.0. 1. Kéo-nhả tự động Visual Basic hỗ trợ hai chế độ kéo-nhả tự động và bằng tay. Trong chế độ tự động người lập trình chỉ cần gán một thuộc tính trong lúc thiết kế design-time hoặc trong lúc chạy chương trình run-time Visual Basic sẽ thực hiện mọi việc ngược lại trong chế độ bằng tay người lập trình phải viết lệnh trong một số sự kiện xảy ra trong lúc đối tượng đang được kéo. Chế độ lập trình bằng tay cho phép người lập trình tác động lên qui trình kéo-nhả một cách linh hoạt hơn. Hầu hết các đối tượng điều khiển chuẩn và một số đối tượng điều khiển ActiveX hỗ trợ chế độ kéo-nhả. Một số chỉ có thể là đối tượng đích một số khác có thể vừa là đối tượng nguồn vừa là đối tượng đích. Chỉ có một số đối tượng có thể hoạt động ở chế độ kéo-thả tự động. Để xác định đối tượng là nguồn trong hoạt động kéo-nhả người lập trình sử dụng thuộc tính OLEDragMode. Để xác đối tượng là đích trong hoạt động kéo-nhả người lập trình sử dụng thuộc tính OLEDropMode. Bảng 16.1 tóm tắt mức độ hỗ trợ của các loại đối tượng trong hoạt động kéo-nhả. Bảng 16.1 Đối tượng OLEDragMode OLEDropMode TextBox PictureBox Image RichTextBox MaskEdBox vbManual vbAutomatic vbNone vbManual vbAutomatic ComboBox ListBox DirListBox FileListBox DBCombo DBList TreeView ListView ImageCombo DataList DataCombo vbManual vbAutomatic vbNone vbManual Form Label Frame CommandButton DriveListBox Data MSFlexGrid SSTab TabStrip Toolbar StatusBar ProgressBar Slider Animation UpDown MonthView DateTimePicker CoolBar Không hỗ trợ vbNone vbManual 160 Giáo trình Visual Basic 6.0 Đối với đối tượng hỗ trợ chế độ kéo-nhả tự động để lập trình kéo-nhả người lập trình chỉ cần gán các thuộc tính OLEDragMode và OLEDropMode có giá trị vbAutomatic. Ví dụ để viết một ứng dụng sử dụng RichTextBox .
