access ×éºÏ¿òÄ£ºý²éѯ - ÆäËûÊý¾Ý¿â¿ª·¢ / Access
ÓÉÓÚ×éºÏ¿òµÄÐÐÀ´Ô´Êý¾ÝºÜ¶à,ËùÒÔÎÒдÁËÒÔÏ´úÂë:
Private Sub F_NAME_Change()
Me.F_NAME_±êÇ©.SetFocus
Me.F_NAME.Requery
Me.F_NAME.SetFocus
If Nz(F_NAME) <> "" Then Me.F_NAME.SelStart = Len(Me.F_NAME)
Me.F_NAME.Dropdown
End Sub
µ«ÊÇ,ÎÞ·¨ÊµÏÖÏñSQLÓï¾äÖÐµÄ LIKE "* x *" ÕâÑùµÄÈκÎλÖõÄ×Ö·û´®Ä£ºý²éѯ,Ö»ÄÜ×öµ½Ê××Ö·û´®µÄÄ£ºý²éѯ
ÇëÎÊ,ÒªÏë×öµ½ÈκÎλÖõÄ×Ö·û´®Ä£ºý²éѯ(ÏñSQLÓï¾äÖÐµÄ LIKE "* x *" )
ÔõÃ´Ð´ÄØ?
Óе㼱,ÄÜ·ñ°ï°ïæ
ÔÚ²éѯµÄSQLÖÐÄã¿ÉÒÔÕâÑùÓÃmid(×Ö¶ÎÃû £¬num)as XXX
ÔõÑù·ÖÀà²éѯ£¿
ûÓзÖÀà²éѯ,
×Ö¶ÎÖµÖ»Êǵ¥Î»Ãû³Æ¶øÒÑ,
ÔÚ×éºÏ¿òµÄÐÐÀ´Ô´ÉÏ×öÒ»¸öÄ£ºýËÑË÷
ºóÀ´ÎÒÓָijÉÕâÑù
Private Sub F_NAME_Change()
Dim a As String
a = "*" & Me.F_NAME.Text & "*"
Me.F_NAME.RowSource = "SELECT F_NAME from Ftab Where F_NAME like ''''" & a & "''''"
Me.F_NAME.Dropdown
End Sub
µ«»¹ÊÇÎÞ·¨ËÑË÷
²»Ì«Ã÷°×ÄãËù˵µÄ£¬Äã²»¾ÍÊÇÐèÒªÒ»¸öÄ£ºý²éѯÂ
SQL code:
strSql="f_name like '*" & f_name.value & "*'"
Form.filter=strsql
form.filteron=true
{{
Ïà¹ØÎÊ´ð£º
ÎÒÓÃAccessÊý¾Ý¿â×öÁËÒ»¸öͼÊéÊý¾Ý¿â£¬ÀïÃæÓÐÒ»¸ö×Ö¶ÎÊÇISBN£¬¾ÍÊÇISBNºÅ£¬µ«ÊÇÖ»µÄÒ»×Ü·ÖͼÊéдµÄISBNºÅ£¬ÓеÄûд£¬Ð´µÄÄÇÒ»²¿·ÖÓеÄISBNÊÇÖØ¸´µÄ£¬ÄÜ·ñÓÃSQLÓïÑÔ°ÑÖØ¸´µÄ¹ýÂ˵ô£¬µ«Ã»Ð´ISBNºÅµÄͼÊé²»ÄܹýÂ˵ô£¬È ......
ÎÊÌ⣱
ÎÒÓÃADOÁ¬½ÓÉèÁËÓû§ÃûÃÜÂëµÄÊý¾Ý¿â
µ«ÊÇÎÒ·¢ÏÖÎÒ²»ÊäÈë Óû§ÃûºÍÃÜÂë ¶¼¿ÉÒÔÁ¬½Ó³É¹¦ ¶øÇÒ»¹ÄܰÑÊý¾Ý¶Á³öÀ´
¼ôÁËÒ»¸öÃûΪtestÊý¾Ý¿â ½¨ÁËÒ»¸öÃûΪpeopleµÄ±í
¼ûÁËÒ»¸ö Óû§Ãû1234 ÃÜÂë1234 µÄ ......
ÓÐÒ»¸öÊý¾Ý¿âÀïÖ»ÓÐ2WÌõÊý¾Ý²»µ½£¬È´ÓÐ500MÄÇô´ó,Ôõô»ØÊ°¡£¿ÊÇACCESSµÄÊý¾Ý¿â¡£ºóÀ´ÎÒ°ÑACCESSµ¼Èëµ½MSSQLÖУ¬Ò²Õ¼ÓÃÁË500M×óÓҵĿռ䣬Èç¹ûѹËõÊý¾Ý¿âÄØ£¿Çë¸ßÊÖÖ¸µã
ѹËõÊý¾Ý¿â£¿ÄÜ×öµ½Ã´...
ÆÚ´ý¸ßÈËÖ¸µã ÎÒ ......
ÒÑÖªAccessÊý¾Ý¿â a.mdb´æÔÚÒ»¸ö±í£ºcc£¬¼ÙÈçccµÄ±í½á¹¹ÈçÏ£º
×Ö¶ÎÃû³Æ Êý¾ÝÀàÐÍ ËµÃ÷
tName Îı¾ Ö¸¶¨ÈËÔ±µÄÐÕÃû
tAge Êý×Ö ......
ÎÒÕâÀïÓÐÒ»¸öscore.mdbµÄaccessÊý¾Ý¿â¡£ÀïÃæÓпγ̡¢ÐÕÃû¡¢Ñ§ºÅ¡¢³É¼¨ËÄÏî¡£ÎÒÏëͨ¹ýVCÁ¬½ÓaccessÊý¾Ý¿â£¬²¢ÔÚVCÖеõ½0-59¡¢60-69¡¢70-79¡¢80-89¡¢90-100Õ⼸¸ö·ÖÊý¶ÎµÄÈËÊýºÍ×ÜÈËÊý¡£ËÄܰïæ¡£±¾È˲ËÄñ¡£Ï£ÍûÏêϸ ......