- ©«¤l
- 472
- ¥DÃD
- 5
- ºëµØ
- 0
- ¿n¤À
- 485
- ÂI¦W
- 0
- §@·~¨t²Î
- Windows
- ³nÅ骩¥»
- MS Office
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- ¨Ó¦Û
- »´ä
- µù¥U®É¶¡
- 2010-7-4
- ³Ì«áµn¿ý
- 2014-12-28

|
¦^´_ 6# 198188
¦^´_ 4# kimbal
> csearch = IIf(result = 0, "", result)
> ½Ð°Ý¦pªG¥u¬OÀˬd¦³¨S¦³¬O§_§ï¦¨csearch = IIf(result = 0, "¨S¦³", ¡§¦³¡¨)
¹ï°Ú,´N¬O³o¼Ë.
>¥t¥~½Ð°Ý
>DO
>UNTIL
>¥i§_¦P®É¦³¨âÓUNTILªº±ø¥ó
>¨Ò¦p¡G
>DO
>UNTIL i>=1 or l = 0
>UNTIL i>=1 and l = 0
¥i¥Hªº,³o¼Ë´N¥i
Do
...
Loop Until i> = 5 and l = 0
///
Do
...
Loop Until i> = 5 Or l = 0
>¦pªG¦bVBA¤ºª`©ú SEARCH "IN"¥i¥H¶Ü¡H¥t¥~^¤å¤j¼g©M¤p¼g³£¥i¥H¿ë»{¨ì¶Ü¡H©ÎªÌ¦p¦ó«ü©w¿ë»{¤j¼g©Î¤p¼g¡H
²{¦b¬O¤£½×¤j¼g¤p¼g³£¥i¥H¿ë»{¨ìªº,
¦]¬°¥Î¤Fucase§â¨âÓ¿é¤J³£¥ýÂন¤j¼g,µM«á¤~°µ¤ñ¸û
result = InStr(1, UCase(rng_within.Value), UCase(find_text))
¨Ò¦p:
result = Instr(1, ucase("abc"), ucase("B"))
pºâ®É·|Åܬ°
result = Instr(1, "ABC", "B")
result = 2
®³¨«ucase´Nªº¸Ü´Nn¤j¤p¼g¥þ¹ï¤~¥i¥H§ä¨ì¦ì¸m
result = InStr(1, rng_within.Value, find_text)
¨Ò¦p:
result = Instr(1, "abc", "B")
result = 0
§â"B"§ï¦¨"b"´N¥i¥H±o¥X2
result = Instr(1, "abc", "b")
result = 2 |
|