ÓÃvb+accessÏëʵÏÖÄ£ºý²éѯ£¬³öÁ˵ãÎÊÌ⣬Çë´ó¼Ò°ïæ
ÎÒÊÇÓÃadodc1ÓëÒ»¸ödatagrid¿Ø¼þÖ±½ÓÓëaccessÊý¾Ý¿âÁ¬½Ó£¬Ä£ºý²éѯµÄ´úÂëÈçÏÂ
Private Sub Command1_Click()
Dim str As String
str = "select * from ½ÌʦÐÅÏ¢±í where ÐÕÃû Like '" & Text1 & "% '"
Adodc1.RecordSource = str
Adodc1.Refresh
End Sub
ÎÒ²»ÖªµÀÕâ¸öÓï¾äÄÄÀïд´íÁË£¬Ã»Óа취ʵÏÖÄ£ºý²éÕÒÊý¾Ý¡£
µ«ÊÇÈç¹û»»³É¾«È·²éÕÒµÄÓï¾ästr = "select * from ½ÌʦÐÅÏ¢±í where ÐÕÃû= '" & Text1 & " '"
¾ÍÄܽ«Êý¾Ýµ÷³öÀ´ÁË
Çë´ó¼Ò°ï棬ÎÒÊÇ×Ô¼ºÄÃ×ÅÊé¿´£¬Ã»ÓнøÐÐϵͳµÄvbºÍaccessµÄѧϰ¡£
ËùÒÔ»¹Çë¸÷λ¶à³öÖ÷Òâ°¡£¡
Like '" & Text1 & "% '"
¸Ä³É
Like '%" & Text1 & "% '%"
»ò
Like '*" & Text1 & "% '*"
¿´ÏÂ
²»ºÃÒâ˼£¬Ã»¿´Çå³þ¡£¡£
Like '" & Text1 & "% '"
¸Ä³É£¨×¢ÒâÄã¶à´òÁ˸ö¿Õ¸ñ£©
Like '" & Text1 & "%'"
»ò
Like '" & Text1 & "*'"
str = "select * from ½ÌʦÐÅÏ¢±í where ÐÕÃû Like '" & Text1 & "%'"
¶÷£¬ºÃÁË£¬Ð»Ð»´ó¼ÒÁË¡£
Ïà¹ØÎÊ´ð£º
³õѧ£¬´óµ¨ÌáÎÊ£¬Çë¸ßÊÖ²»ÁߴͽÌ
1¡¢¹ö¶¯Ìõµã»÷Óë»æÍ¼°å£¨ÆÁÄ»,Piceure1£©µÄÒÆ¶¯ÎÊÌâÒѾ½â¾ö¡£
Picture1.Top = -VScroll1.Value + bcW '´¹Ö±Òƶ¯
Picture1.Left = -HScroll1.Value + bcW ' ......
vbÊDz»ÊǺÜÅ£°¡ ÔõôÄÇô¶àµÄ²¡¶¾¶¼ÊÇvb×öµÄ°¡ c#Ðв»ÐУ¿
c#ÔÚXPÔËÐв»ÁË£¬³ý·ÇÈñðÈËÏÈ×°ÉÏ.net.
VBÏà¶ÔÓÚC,C++,ASMµÈµÈ£¬¾ÖÏÞÐÔ´ó¶àÁË¡£
±ðÔÙ˵ʲôÓïÑÔ²»ÈçʲôÓïÑԵϰÁË£¬Ö»ÓÐÄã²»»áÓûòÓÃ×Ų»Ë³ÊÖµÄÓ ......
ÎÒ½«Ò»¶Î4000À´×ÖµÄÎı¾¸³Öµ¸øËüÔõô¾Í³ö´íÁË,ÌáʾÔËÐÐʱ´íÎó2176 Õâ¸öÊôÐÔµÄÉèÖÃֵ̫³¤?
ÄãÊÇÔõÑù¸³ÖµµÄ£¿
²âÊÔÁËһϣ¬Óñ¸×¢×ֶθøÎı¾¿ò×öÊý¾ÝÔ´£¬Ã»ÓÐÌáʾÉèÖÃֵ̫³¤,14893×Ö·û
ÒýÓÃÎÒ½«Ò»¶Î4000À´×ÖµÄÎ ......
±¾ÈËʹÓõÄÊÇVB6.0°æ±¾
¼ÙÉèÓÐÒ»¸ö¶ÔÏóA£¬AÄÚÓÐÀàÐÍΪBµÄ¶ÔÏóÊôÐÔ¡£ÏÖÔÚµÄÎÊÌâÊÇ£¬ÐèÒªÌí¼ÓÈô¸É¸öB¶ÔÏó×÷ΪA¶ÔÏóµÄÊôÐÔ¡£È磬
A.B1,A.B2,...
µ«¾ßÌåÌí¼Ó¶àÉÙ¸öB¶ÔÏó×÷ΪA¶ÔÏóµÄÊôÐÔÔòÊÓ¾ßÌåÇé¿ö²»Í¬¶ø²»Í¬ ......
ÎÊÌ⣱
ÎÒÓÃADOÁ¬½ÓÉèÁËÓû§ÃûÃÜÂëµÄÊý¾Ý¿â
µ«ÊÇÎÒ·¢ÏÖÎÒ²»ÊäÈë Óû§ÃûºÍÃÜÂë ¶¼¿ÉÒÔÁ¬½Ó³É¹¦ ¶øÇÒ»¹ÄܰÑÊý¾Ý¶Á³öÀ´
¼ôÁËÒ»¸öÃûΪtestÊý¾Ý¿â ½¨ÁËÒ»¸öÃûΪpeopleµÄ±í
¼ûÁËÒ»¸ö Óû§Ãû1234 ÃÜÂë1234 µÄ ......