Ðề: 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]
Lễ cúng mưa đầu mùa (Bư brah mih rah bôk năm) là một trong những nghi lễ nông nghiệp quan trọng, thể hiện tín ngưỡng phồn thực mà đồng bào M’nông vẫn còn lưu giữ. Theo quan niệm của đồng bào, mưa...
Lễ cúng mưa đầu mùa của đồng bào M’nông