Giúp về vấn đề Listbox trong Form (2 người xem)

[congnguyen88]

Mình có tạo 1 Listbox trong Form, mình có 2 vấn đề nhờ anh em giúp :
1. Mình muốn sau khi Form hiện lên thì làm sao điểm chọn ( Select ) trên Listbox nằm trên cùng
2. Thay vì kéo con trượt lên trượt xuống trong Listbox em muốn dùng chuột lăn lên Lăn xuống thì phải làm sao

 

[Hoàng Trọng Nghĩa]

Mình có tạo 1 Listbox trong Form, mình có 2 vấn đề nhờ anh em giúp :
1. Mình muốn sau khi Form hiện lên thì làm sao điểm chọn ( Select ) trên Listbox nằm trên cùng
2. Thay vì kéo con trượt lên trượt xuống trong Listbox em muốn dùng chuột lăn lên Lăn xuống thì phải làm sao

Chú mày thích nghiên cứu ListBox nhỉ?

Trả lời:

1) Trong UserForm, giả sử có 1 ListBox có tên là ListBox1, thì sự kiện của Form:

Private Sub UserForm_Initialize()
   [COLOR=#ff0000]''................[/COLOR]
[COLOR=#0000ff]    ''Thủ tục này đặt dưới thủ tục nạp list cho ListBox:[/COLOR]
    If ListBox1.ListCount Then
        ListBox1.ListIndex = 0
    End If
End Sub

2) Tham khảo bài viết này:

Scroll Wheel cho ListBox & ComboBox

 

[congnguyen88]

Chú mày thích nghiên cứu ListBox nhỉ?

Trả lời:

1) Trong UserForm, giả sử có 1 ListBox có tên là ListBox1, thì sự kiện của Form:

Private Sub UserForm_Initialize()
   [COLOR=#ff0000]''................[/COLOR]
[COLOR=#0000ff]    ''Thủ tục này đặt dưới thủ tục nạp list cho ListBox:[/COLOR]
    If ListBox1.ListCount Then
        ListBox1.ListIndex = 0
    End If
End Sub

2) Tham khảo bài viết này:

Scroll Wheel cho ListBox & ComboBox

Cảm ơn anh nha, em làm được rồi, những bài anh trả lời em đều ngâm cứu hằng đêm, giờ em đọc Code em hiểu rồi, chẳng còn ngơ ngác như hoài trước nữa hihihi