For °j°é¥iÅý±z¦h¦¸Åçºâ¤@³s¦êªº¹Bºâ¦¡¡C¤£¹³¦b If ©M Select ¹Bºâ¦¡¤¤¡A¦b¤½¦¡Åçºâªº¹Lµ{¤¤¡Aµ{¦¡³Ì¦h¥u¸g¹L¨CÓ¹Bºâ¦¡¤@¦¸¡C
¦pªG±z¨Æ¥ýª¾¹D¹Bºâ¦¡»ÝnÅçºâªº¦¸¼Æ¡A³Ì¾A¦X¨Ï¥Î For °j°é¡C
½d¨Ò¤@
°²³]±z·Qn±N {«È¤á.¤½¥q¦WºÙ} ¦r¦ê¤ÏÂà¹L¨Ó¡A¨Ò¦p¡A±N City Cyclists Åܦ¨ stsilcyC ytiC¡C
//Reverse a string version 1 Local StringVar str := ""; Local NumberVar strLen := Length ({«È¤á.¤½¥q¦WºÙ}); Local NumberVar i; For i := 1 To strLen Do ( Local NumberVar charPos := strLen - i + 1; str := str + {«È¤á.¤½¥q¦WºÙ}[charPos] ); str
°²³] {«È¤á.¤½¥q¦WºÙ} Äæ¦ì¥Ø«eªºÈ¬O Clean Air¡A½ÐÀˬd³oÓ¤½¦¡¦p¦ó¹B§@¡C¤w±NÅÜ¼Æ strLen «ü¬£¬° Clean Air ¦r¦êªºªø«×¡A¤]´N¬O 9¡CÅÜ¼Æ i ¤]ºÙ¬° For p¼Æ¾¹ÅܼơA¦]¬°¨ä¼ÆÈ·|ÀHµÛ¨C¦¸ For °j°éªº«½Æ¦Ó§ïÅÜ¡C¤]´N¬O»¡¡A¥¦¬O¥Î¨Ópºâ°j°éªº»¼°j¦¸¼Æ¡CFor °j°é·|«½Æ¶i¦æ 9 ¦¸¡A²Ä¤@¦¸®É i ¬O 1¡AµM«áÅܦ¨ 2¡B3¡A¨Ã¤@ª½¼W¥[¡Aª½¨ì i = 9 ¬°¤î¡C¦b²Ä¤@¦¸»¼°j®É¡A{«È¤á.¤½¥q¦WºÙ} ªº²Ä 9 Ó¦r¤¸·|¥[¨ìªÅ¦r¦êÅÜ¼Æ str ¤§«á¡A©Ò¥H¡A¦b²Ä¤@¦¸»¼°j¤§«á¡Astr ´Nµ¥©ó r¡C¶i¦æ¨ì²Ä¤G¦¸°j°é®É¡A·|±N {«È¤á.¤½¥q¦WºÙ} ªº²Ä¤KÓ¦r¤¸ªþ¥[¨ì str ¤§«á¡A¦]¦¹ str ´Nµ¥©ó ri¡C³oÓµ{§Ç·|«ùÄò¶i¦æ¡Aª½¨ì²Ä¤E¦¸°j°é§¹¦¨«á str µ¥©ó riA naelC ¬°¤î¡A³oÓȤ]´N¬O¤ÏÂ઺¦r¦ê¡C
½d¨Ò¤G
³oÓ½d¨Ò¬O¤Wz¤½¦¡ªºÂ²¤Æª©¥»¡A¨Ï¥Î Step ¤l¥y¡A¨Ã¥B¥]§ttªº Step È 1¡C¦b Clean Air ½d¨Ò¤¤¡A²Ä¤@¦¸»¼°j®É i ¬O 9¡A²Ä¤G¦¸¬O 8¡A²Ä¤T¦¸¬O 7 ¨Ì¦¹Ãþ±À¡Aª½¨ì³Ì«á¤@¦¸»¼°j«áÅܦ¨ 1 ¬°¤î¡C
//Reverse a string version 2 Local StringVar str := ""; Local NumberVar strLen := Length ({«È¤á.¤½¥q¦WºÙ}); Local NumberVar i; For i := strLen To 1 Step -1 Do ( str := str + {«È¤á.¤½¥q¦WºÙ}[i] ); str
½d¨Ò¤T
³oӳ̲¤Æªºª©¥»¬O¨Ï¥Î¤º«Ø¨ç¦¡ StrReverse¡G
//Reverse a string version 3 StrReverse ({«È¤á.¤½¥q¦WºÙ})
¦b Crystal Reports ¤¤¡A¤º«Ø¦r¦ê¨ç¦¡¥i¥H±±¨î³\¦h¶Ç²Î¤W¬O¥H For °j°é©Î¨ä¥L°j°é¨Ó³B²zªº¦r¦ê³B²zÀ³¥Îµ{¦¡¡C¦ý¬O¡AFor °j°é¦b³B²z¦r¦ê¤W´£¨Ñ¤F³Ì¤jªº¼u©Ê¡A¦b³B²z°}¦C¤Wªº¥\¯à¤]«D±`±j¡A³o¨ÇÀuÂI¦b¤º«Ø¨ç¦¡µLªkÀ³¥I®ÉÅã±o«D±`«n¡C