VBAÕýÔò±í´ïʽÈëÃÅÓëÌá¸ß

ÕýÔò±í´ïʽÈëÃÅÓëÌá¸ß

(Æß)ASCIIÂë±íÖÐ×Ö·ûµÄÊ®Áù½øÖÆ×ªÒå±íʾ·¨: \\xnum

Ò»¸öСдµÄ\\Xºó¸úÁ½¸ö´óдʮÁù½øÖÆÊý×Ö¿ÉÒÔÆ¥ÅäASCII×Ö·û¼¯ÖеÄÒ»¸ö×Ö·û.

Ìáʾ:¿ÉÆ¥Å䷶Χ\\x00--\\xFF,µ«Ò»°ãÓÃ\\x00--\\x7F±íʾASCII×Ö·û¼¯ÖеÄǰ128¸ö×Ö·û.\\x80-\\xFF(ASCIIÀ©Õ¹Âë±í×Ö·û),Ò»°ãÓÃUnicode´úÂëµã±íʾ·¨Ìæ´ú.

(°Ë)UnicodeÂë±íÖÐ×Ö·ûµÄÊ®Áù½øÖÆ×ªÒå±íʾ·¨:\%unum

UnicodeÂëÒ»°ãÓóÆÖ®Îª´úÂëµãÀ´±íʾһ¸ö×Ö·û.ËüÊÇÒ»¸öÊ®Áù½øÖÆÊý.

ÕýÔò±í´ïʽÖÐ,Óá°\%u¡±ÐòÁкóÃæ½ô¸ú×Ö·ûunicode´úÂëµã(Ê®Áù½øÖÆÊý)±íʾ¸Ã×Ö·û. Àý:

Ìáʾ:

1.\%unum±íʾ·¨¿É±íʾ´úÂëµãÔÚU+0000--U+FFFF·¶Î§ÄÚµÄunicode×Ö·û.Unicode±¾ÉíÔÚ·¢Õ¹ÖÐ,ÒѾ­³öÏÖ³¬¹ý4λµÄ´úÂëµã,VBscriptÕýÔòÊDz»Ö§³Ö,µ«ËüÃÇÊǺÜÄÑÓöµ½µÄ×Ö·û.

2.ÓÃ×Ö·û×é[?]±íʾUnicode×Ö·û·¶Î§Ê±,Ò²¿ÉÖ±½ÓÓñíÖÐÆðµã×ÖÃæ×Ö·ûÓëÖÕµã×ÖÃæ×Ö·û±íʾ.±ÈÈç´ó½ÖÐÎÄ×Ö·ûÔÚUnicode±íÖÐ,Æðʼ´úÂëµãÊÇU+4e00,ÊDZíʾÖÐÎÄ×Ö·û¡±Ò»¡±,ÖÕµã´úÂëµãU+9fff,¸Ã´úÂëµã䶨Òå,¶ø¡±ý›¡±×ÖÔÚÖյ㸽½ü,ËùÒÔÎÒÃÇÒ²¿ÉÒÔÓá±[Ò»-ý›]¡±±íʾËùÓÐÖÐÎÄ×ÖÖ®Ò».˳±ãÌáʾһµã,ºº×ÖÔÚUnicodeÖеķֲ¼,»ù±¾ÎÞ¹æÂÉ.²»ÒªÏëÏñ\Ò»\ºóÃæ¾ÍÊÇ\¶þ\µÈµÈ.

3.ÓÐЩÁ÷ÅɵÄÕýÔò¿ÉÒÔÓÃUnicodeµÄÊôÐÔÀ´·½±ã±íʾ²»Í¬Àà±ðµÄºº×Ö»òÆäËüÓïÑÔÎÄ×Ö,µ«VBscript 5.5ÊDz»Ö§³ÖµÄ.

(¾Å)Ôª×Ö·û×ÖÃæ×Ö·û±íʾ·¨:תÒå·û¡±\\¡±

ÕýÔò±í´ïʽÓÃÁËÒ»²¿·Ö×Ö·û×÷ΪԪ×Ö·û,ÄÇôÔõÑùÔÚÕýÔò±í´ïʽÖбíʾÕâЩԪ×Ö·ûµÄ×ÖÃæ×Ö·ûÄØ?Ëü

23

VBAƽ̨µÄÕýÔòѧϰ²Î¿¼×ÊÁÏ

ÌṩÁËÒ»¸ö³ÆÎª×ªÒåÔª×Ö·û,¼´·´Ð±¸ÜÀ´±íʾ.Àý:±íʾ×ÖÃæµãºÅ¿ÉÓá±\\.¡±;±íʾ·´Ð±¸ÜµÄ×ÖÃæ×Ö·û,Óá±\\\\¡±±íʾ.ÏÂÃæÁоÙÁËÈç¹ûÆ¥Åä×ÖÃæ×Ö·û±ØÐëתÒåµÄÔª×Ö·û:

Ìáʾ:

1.×¢ÒⲢûÓаüÀ¨¡±]¡±,¡±-¡°,ºÍ¡±}¡±;

2.ÆÕͨ×Ö·û×é[?]ÄÚ²¿,Ôª×Ö·ûµÄתÒåÓÐ×Ô¼ºµÄ¹æÔò,ÔÚÏÂÒ»ÕÂרÃŽéÉÜ. Àý:ÕýÔò±í´ïʽ: \\d\\.\\d

¿ÉÒÔÆ¥Åä0.2,3.1?.µÈСÊý.

(Ê®)ÒýÓÃÇ°ÃæÀ¨ºÅ²¶»ñµÄÎı¾£­£­·´ÏòÒýÓÃ

ÕýÔòÖУ¬ÓÃÐÎÈç\\1,\\2?µÄÔª×Ö·ûÐòÁбíÊ¾Ç°Ãæ²¶»ñÐÔÀ¨ºÅÄÚµÄ×Ö´®(¿é),¡±\\1¡±½Ð·´ÏòÒýÓÃ.Èç: (abc)\\1

¿ÉÒÔÆ¥ÅäÄ¿±êÎı¾:abcabc,ÕâÀï\\1ʵ¼ÊÒýÓõÄÊÇËü×ó±ßÀ¨ºÅÖеÄÄÚÈÝ¡±abc¡±. (abc)(defg)\\2

¿ÉÒÔÆ¥ÅäÄ¿±êÎı¾:abcdefgdefg ,ÕâÀï\\2Ö¸µÄÊÇ´Ó×óÖÁÓÒµÚ¶þ¸öÀ¨ºÅÖеÄÄÚÈÝ. ʵÀý:ɾ³ýÒ»¶ÎÓ¢ÎÄÖÐÖØ¸´µÄµ¥´Ê. Ä¿±êÎı¾:This this Is is an example. ½á¹ûÎı¾:this is an example ÕýÔò±í´ïʽ: (\\w+)\\s+\\1 ´úÂë: Sub testrep() Dim reg, s$

s = \

Set reg =CreateObject(\ reg.Pattern = \ reg.Global = True reg.IgnoreCase = True s = reg.Replace(s, \

24

ÕýÔò±í´ïʽÈëÃÅÓëÌá¸ß

MsgBox s End Sub ÌÖÂÛ:

ÕýÔò±í´ïʽÖÐ,¡±\\w+¡±±íʾƥÅäÁ¬Ðø³öÏֵĵ¥´Ê×Ö·û.ÔÚ±¾ÀýÖÐ,Ëü»áÆ¥ÅäÖÁ¿Õ¸ñΪֹ;¡±\\s+¡±Æ¥ÅäÒ»¸ö»ò¶à¸ö¿Õ¸ñ; ¡°\\1¡±Ëü»áÆ¥Åä×ó±ßµÚÒ»¸ö³öÏÖµÄÀ¨ºÅÖеÄÏàͬÄÚÈÝ.ËùÒÔ,¸ÃÕýÔò»áÆ¥ÅäÖîÈ硱1 1¡± ¡°1111 1111¡±Ö®ÀàµÄÎı¾.

´úÂëÖÐGlobalÊôÐÔÉèÖÃΪTrue,±íʾËÑË÷ËùÓÐÆ¥Åä;IgnoreCaseÊôÐÔÉèÖÃΪTrue,±íʾºöÂÔ´óСд,È硱this¡± Ó롱THIS¡±ÊÓΪͬһµ¥´Ê.

´úÂëʹÓÃÁËÕýÔò¶ÔÏóµÄRepalce·½·¨,ÓÃ$1Ìæ»»ÕÒµ½µÄÆ¥Åä. Õâ¸öÀýÖÐ,¹²ÕÒµ½Á½¸öÆ¥Å䡱This this¡±Ó롱Is is¡±;¶ø$1ÔÚÇ°ÃæÒѾ­Ëµ¹ýËü±£´æµÄÊǵÚÒ»¸ö²¶»ñÐÔÀ¨ºÅÄÚµÄÄÚÈÝ.ÔÚ±¾ÀýÖзֱðÊÇThisÓëIs.×îÖÕͨ¹ýÌæ»»ÊµÏÖÁËɾ³ýÖØ¸´µ¥´ÊµÄÄ¿µÄ.

ÔÚVBAÖÐʹÓ÷´ÏòÒýÓÃҪעÒâ:

1. ÊDZíʾ°Ë½øÖÆ×ªÒåµÄ×Ö·û»¹ÊÇ·´ÏòÒýÓÃ?

ϸÐÄÅóÓÑÒѾ­·¢ÏÖ,·´ÏòÒýÓÃÓë×Ö·ûµÄ°ËÖÆ×ªÒå±íʾ·¨,Æä½á¹¹ÊÇÒ»ÑùµÄ.ÄÇôÔõÑùÇø·ÖËüÃÇÄØ?Æä¹æÔòÊÇ:

¡°\\num¡±:¼ÙÈçnumÊÇÒ»¸ö¿ÉÒÔ¿´×÷°Ë½øÖƵÄÊý×Ö.

Èç¹ûnumµÄÖµ´óÓÚÕýÔò×óǰ±ß²¶»ñÐÔÀ¨ºÅ¸öÊý,ÄÇô,ËüÊÇÒ»¸ö°Ë½øÖÆ×ªÒå·û; Èç¹ûnumµÄֵСÓÚ»òµÈÓÚÕýÔò×óǰ±ß²¶»ñÐÔÀ¨ºÅ¸öÊý,ÄÇô,ËüÊÇÒ»¸ö·´ÏòÒýÓÃ;

ÏÔÈ»,Èç¹ûËü×óǰ±ßûÓв¶»ñÐÔÀ¨ºÅ,ÄÇô,Ëü¿Ï¶¨ÊÇÒ»¸ö°Ë½øÖÆ×ªÒå·ûÁË.Èç¹ûnumÊý×ÖÖк¬Óг¬¹ý8,»ò9µÄÊý×Ö,ÄÇô,ËüÒ»¶¨ÊÇ·´ÏòÒýÓÃ.

2. \\1,\\2,?±àºÅÊǸù¾ÝÇ°Ãæ¡±×ó°ëÔ²À¨ºÅ¡±´Ó×óÖÁÓÒ³öÏÖµÄ˳ÐòÈ·¶¨µÄ.

ËÄ.ÕýÔòÔª×Ö·û----×Ö·û(´®)Á¬Ðø³öÏÖ´ÎÊý±íʾ·¨

ÉÏÒ»Õ½éÉܱíʾ×Ö·ûµÄÔª×Ö·û»òÐòÁж¼Ö»´ú±íÒ»¸ö×Ö·û.Òª±íʾÁ¬Ðø¶à¸ö×Ö·û,ÕýÔò±í´ïʽÌṩÁËϱíÖеÄÔª×Ö·û(ÐòÁÐ):

25

VBAƽ̨µÄÕýÔòѧϰ²Î¿¼×ÊÁÏ

ÌÖÂÛ:

1.ÕâЩԪ×Ö·û(ÐòÁÐ)½Ð¡±Á¿´Ê¡±,Ëü×÷ÓÃÓÚËüÇ°Ãæ½ô°¤µÄ×Ö·û»ò×Ö·û´®.×÷Óõķ¶Î§:¿ÉÓÃ()±êʾ.Èç¹ûûÓÐ(),ÄÇôËüÖ»×÷ÓÃÇ°Ãæ½ô°¤µÄÒ»¸ö×Ö·û;Èç¹ûÒª×÷ÓÃËüÇ°Ãæ¶à¸ö×Ö·û,±ØÐëÓÃ()±êÃ÷·¶Î§.Àý:

3.É÷ÓÿÉÑ¡ÏîÁ¿´Ê

ÏÔÈ»,ÉÏÀýÖи¡µãÊýµÄÕýÔò²»ÄÜÆ¥ÅäÕâÑù±íʾµÄ¸¡µãÊýÈç:¡±.123¡±.¿ÉÄÜÄãÒѾ­Ïëµ½ÓÃÏÂÁбí´ïʽÁË: \\d*(\\.\\d+)?

µÄÈ·ËüÄÜÆ¥ÅäËùÓÐÐÎʽµÄ¸¡µãÊýÁË.µ«ÊÇÓÉÓÚ±í´ïʽÖÐÕûÊý²¿·ÖÓëСÊý²¿·Ö¶¼ÊÇ¿ÉÑ¡µÄ,ÕâÒâν×ÅʲôҲ²»Æ¥Åä,Ò²ÄÜÆ¥Åä³É¹¦.Ò²¾ÍÊÇ˵ÎÞÂÛÄ¿±êÎı¾ÊÇ¿Õ×Ö·û»¹ÊÇÈÎÒâ×Ö·û(´®),ÕýÔòÒýÇæ¶¼»á±¨¸æÆ¥Åä³É¹¦(²»¹ýÆ¥Åä½á¹û¶¼ÊÇ¿ÕÖµ).

4.ËüÃǶ¼ÊÇ̰À·Á¿´Ê,¼´×ÜÊdz¢ÊÔÆ¥Å価¿ÉÄܶàµÄ×Ö·û.±ÈÈç:¿ÉÑ¡ÏîÁ¿´Ê\ËüµÄÏÂÏÞÊÇ0¼´²»Æ¥Åä,ÉÏÏÞÊÇ1. Èç¹ûÓзûºÏÒªÇóµÄ×Ö·û(´®),ËüÔòÑ¡ÔñÆ¥ÅäÒ»¸ö×Ö·û(´®),²»»áÑ¡Ôñ²»Æ¥Åä.

Àý:ÕýÔò±í´ïʽ .*

26

ÁªÏµ¿Í·þ£º779662525#qq.com(#Ìæ»»Îª@)