- ©«¤l
- 262
- ¥DÃD
- 8
- ºëµØ
- 0
- ¿n¤À
- 280
- ÂI¦W
- 0
- §@·~¨t²Î
- xp
- ³nÅ骩¥»
- Office 2007
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- HK
- µù¥U®É¶¡
- 2015-8-11
- ³Ì«áµn¿ý
- 2025-3-24

|
- Sub zz()
- s = "[FL-clover¡Bdoor¡B(¤Ñ満¬KµØ)]ªðÇB¡BÆñÇvÇq¡B¡³¡³ÇN¡C[2007¦~¡B2009¦~]"
- With CreateObject("vbscript.regexp")
- .Pattern = "¡B(?=.*?\].*?\])"
- .Global = True
- Debug.Print .Replace(s, ",")
- End With
- End Sub
½Æ»s¥N½X |
|