tailieunhanh - Các bài tập Microsoft .NET 1 phần 10

Kế đó chúng ta cho đặt một ContextMenu tên ContextMenu1 vào form và assign nó vào property DropDownMenu của button thứ ba như trong hình dưới đây: | Các bài tập Microsoft .NET 163 You clicked the third button End If Kế đó chúng ta cho đặt một ContextMenu tên ContextMenul vào form và assign nó vào property DropDownMenu của button thứ ba như trong hình dưới đây Nếu không muốn assign ContextMenu1 vào button thứ ba trong lúc thiết kế bạn có thể thực hiện việc ấy bằng code lúc form mới load như sau Private Sub frmToolbar_Load ByVal sender As ByVal e As Handles ContextMenu1 End Sub Bạn hãy edit hai menuItems cho ContextMenu1 một cái tên mnuXám với Text là Xám và cái kia tên mnuTrắng với Text là Trắng. Khi chạy chương trình nếu bạn click cái thanh có dấu tam giác đen nằm bên phải button thứ ba ContextMenu1 sẽ hiện ra để bạn dùng. Nếu bạn click button thứ ba chương trình cũng generate một Click Event nhưng hiện giờ ta không dùng nó chỉ hiển thị một sứ điệp nhỏ để xác định là có Event Click ấy. Như thế ta thấy .NET ghép một ContextMenu vào một ToolbarButton để biến nó thành một DropDownMenu. Có điều sau khi user đã chọn một Item trong ContextMenu DropDownMenu Text của Item đó không được hiển thị giống như trong một ComboBox. Nếu bạn khó tính và muốn có chuyện đó thì phải tự làm lấy như cho thấy trong code dưới đây Private Sub frmToolbar_Load ByVal sender As ByVal e As Handles ContextMenu1 Xám End Sub Private Sub mnuXám_Click ByVal sender As ByVal e As Handles Bạn chọn màu Xám Các bài tập Microsoft .NET 164 Xám End Sub Private Sub mnuTrắng_Click ByVal sender As ByVal e As Handles Bạn chọn màu Trắng Trắng End Sub Khi chạy chương trình bạn sẽ thấy như sau ListBox Items là một collection of Strings Mới dùng đến ta sẽ thấy .NET ListBox rất giống ListBox trong VB6. Tiện ở chỗ bây giờ ta có .