ÈçºÎÌáÈ¡AccessÖÐij¸ö±íÖÐij¸ö×Ö¶ÎÖаüº¬µÄÊý×Ö£¿
ACCESSÊý¾Ý¿âÖÐÓиö±íµÄ×Ö¶ÎÖµÓеİüº¬Êý×Ö£¬ÈçºÎÌáÈ¡ÕâЩÊý×Ö£¿
±ÈÈ磬Êý¾Ý±íAÖдæÔÚB×ֶΣ¬×Ö¶ÎÖµÓУºabc123;bagag456;ga81ha;89hahaµÈµÈ
ÈçºÎÌáÈ¡³öÊý×Ö123;456;81;89
ллָ½Ì£¡
ûÓбê×¼µÄÄÚ½¨º¯Êý£¬ÄãÐèҪͨ¹ýVBA×Ô¶¨ÒåÒ»¸öº¯ÊýÀ´ÊµÏÖ¡£
»òÕßÓÃ26¸ö replace(b,'a','') À´Ç¶Ìס£
¿´À´Ö»ÄÜÓÃVBA×Ô¶¨Ò庯ÊýÁË£¬replaceº¯ÊýǶÌײ»¿ÉÄÜ£¬ÒòΪ»¹ÓÐÖÐÎľͲ»ºÃ´¦ÀíÁË
SELECT cc("123rrtropo56")
Function cc(dd As String) As String
cc = ""
For i = 1 To Len(dd)
If IsNumeric(Mid(dd, i, 1)) Then
cc = cc + Mid(dd, i, 1)
End If
Next
End Function
Ïà¹ØÎÊ´ð£º
ÎÒµÄÊý¾Ý¿âÊǼòÌåsqlserver2000 ,ÎÒÏëÔÚ·±ÌåaccessÏÂÁ¬½Ó,ͨ¹ýodbcÊÇ¿ÉÒÔÁË,µ«ÔÚaccessϳöÏÖ´ò¿ªµÄ±íÈ«ÖÐ"#ÒÑɾ³ý"
²»ÖªµÀÒªÔõô²Ù×÷²Å¿ÉÒÔÓÃACCESS·±ÌåÁ¬½Ó¼òÌåsqlserver2000.лл!!!
´ó¼Ò¶¼ ......
ÎÒÓÃAccessÊý¾Ý¿â×öÁËÒ»¸öͼÊéÊý¾Ý¿â£¬ÀïÃæÓÐÒ»¸ö×Ö¶ÎÊÇISBN£¬¾ÍÊÇISBNºÅ£¬µ«ÊÇÖ»µÄÒ»×Ü·ÖͼÊéдµÄISBNºÅ£¬ÓеÄûд£¬Ð´µÄÄÇÒ»²¿·ÖÓеÄISBNÊÇÖØ¸´µÄ£¬ÄÜ·ñÓÃSQLÓïÑÔ°ÑÖØ¸´µÄ¹ýÂ˵ô£¬µ«Ã»Ð´ISBNºÅµÄͼÊé²»ÄܹýÂ˵ô£¬È ......
×î½ü×¼±¸Îª¹«Ë¾ÍøÕ¾ÓÃVB×ö¸ö²úƷչʾÉú³É£¬Éú³É²¿·Ö»ù±¾Ã»ÎÊÌ⣬
ÎÊÌâ³öÏÖÔÚ²éѯ²¿·Ö£¬Ê¹ÓÃÁËMSHFelxGrid(DATAGrid²»ÄÜÂú×ã²Ù×÷ÐèÇó)£¬±¾À´ÒÔΪÊÕ¹¤ÁË£¬×òÌìÔٴβâÊÔµÄʱºò·¢ÏÖÁËÒÔÏÂÎÊÌâ
µ±Êý¾Ý¿â×Ö¶ÎÎ ......
Êý¾Ý¿âÁ¬½ÓÌáʾÈçϱ¨´í£¬¿´µÄ³öÀ´ÊÇÒ³ÃæÓëÊý¾Ý¿âÁ¬½ÓµÄÎÊÌ⣬ÏÖÔÚÎÒµÄÊÇÏà¶ÔÁ¬½Ó¡£
ÒªÔõô½«Æä¸Ã³É¾ø¶ÔÁ¬½ÓÄØ£¿ÎÒµÄÊý¾Ý¿âÎļþ·¾¶ÔÚ£º
D:\web\db
»¹ÊÇÒªÏÈлл´óÈËÃǰïÖúС°×²ËÎÒ
Microsoft O ......