Ðề: Xin trợ giúp sự kiện xảy ra trong Combox
1/ Trong combo nó tự động short theo chữ cái đầu của danh sách, chỉ cần gõ là nó hiện ra ngay
2/ Muốn làm theo tên thì không dùng hộip combo mà dùng một textbox rồi gán sự kiện afterupdate của nó để gọi một hàm tự tạo để tìm kiếm. Hàm tự tạo là hàm tìm một từ trong m,ột chuỗi từ cho trước. Nếu tìm thấy thì cho hiển thị, ngược lại thì không
Chắc bạn hiểu ý đồ này và vận dụng vào bài của mình
Thân
Thôi thì gửi cho bạn cái hàm tự tạo đó. Bạn tùy nghi sử dụng vào mục địch của mình
Thân
Mã nguồn PHP:
[COLOR=#000000]
[/COLOR][COLOR=#007700]Function [/COLOR][COLOR=#0000BB]TimChuoi[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiMe [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]String[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]ChuoiCon [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]String[/COLOR][COLOR=#007700]) As [/COLOR][COLOR=#0000BB]String
Dim i [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Long
Dim Lm [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Long
Dim Lc [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Long
Dim Tu [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]String
Dim Thay [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Boolean
Thay [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]False
ChuoiMe [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Trim[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiMe[/COLOR][COLOR=#007700]): [/COLOR][COLOR=#0000BB]ChuoiCon [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Trim[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiCon[/COLOR][COLOR=#007700])
[/COLOR][COLOR=#0000BB]Lm [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Len[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiMe[/COLOR][COLOR=#007700]): [/COLOR][COLOR=#0000BB]Lc [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Len[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiCon[/COLOR][COLOR=#007700])
For [/COLOR][COLOR=#0000BB]i [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]1 To Lm
Tu [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]Mid[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ChuoiMe[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]i[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]Lc[/COLOR][COLOR=#007700])
If [/COLOR][COLOR=#0000BB]Tu [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]ChuoiCon Then Thay [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]True[/COLOR][COLOR=#007700]: Exit For
[/COLOR][COLOR=#0000BB]Next
[/COLOR][COLOR=#007700]If [/COLOR][COLOR=#0000BB]Thay [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]True Then
TimChuoi [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]ChuoiMe
[/COLOR][COLOR=#007700]Else
[/COLOR][COLOR=#0000BB]MsgBox [/COLOR][COLOR=#DD0000]"Khong tim thay"
[/COLOR][COLOR=#007700]Exit Function
[/COLOR][COLOR=#0000BB]End [/COLOR][COLOR=#007700]If
[/COLOR][COLOR=#0000BB]End [/COLOR][COLOR=#007700]Function[/COLOR]
Volkswagen Touareg được nhập cảng từ nhà máy Bratislava ở Slovakia, nơi duy nhất lắp ráp mẫu xe này, cùng với sản phẩm hạng sang Audi Q7 và Porsche Cayenne. Bộ ba sản phẩm lovense lush "anh em" là...
SUV "khủng bố" chiếm thế phân khúc xe sang cho phái mạnh