Crystal Reports  

Á×§KµL­­°j°é (Basic »yªk)

°j°é¦³¤@­Ó¦w¥þ¾÷¨î¡A¥i¥H¨¾¤î³B²z³øªí®É¦]¬°µL­­°j°é¦Ó¾É­P°±¤î¡C¥ô¦ó¤½¦¡ªºÅçºâ¡A¨C¦¸³Ì¦h¥i¥HÅçºâ°j°é±ø¥ó 100,000 ¦¸¡C¨Ò¦p¡G

Dim i
i = 1
Do While i <= 200000
If i > {movie.STARS} Then Exit Do
i = i + 1
Loop
formula = 20

¦pªG {movie.STARS} ¤j©ó 100,000¡A¨º»òÅçºâ°j°é±ø¥ó (i <= 200000) ªº¦¸¼Æ±N·|¶W¹L³Ì¤j¦¸¼Æ¡A´N·|²£¥Í¿ù»~°T®§¡C§_«hªº¸Ü¡A³o­Ó°j°é´N¨S¦³°ÝÃD¡C

ª`·N   ³o­Ó¦w¥þ¾÷¨î¶È­­¥Î©ó¨C­Ó¤½¦¡¤º¡A¨Ã¤£¾A¥Î©ó­Ó§O°j°é¡C¨Ò¦p¡G
Dim i
i = 1
For i = 1 To 40000
formula = Sin (i)
Next i
Do While i <= 70000
i = i + 1
Loop

¥H¤W³o­Ó¤½¦¡¤]·|IJµo¦w¥þ¾÷¨î¡A¦]¬° 100,000 ¬O«ü¤½¦¡¤¤°j°é±ø¥óÅçºâªºÁ`¦¸¼Æ¡A¦Ó³o­Ó¤½¦¡±N·|Åçºâ 40001 + 70001 ¦¸¡C

½Ð°Ñ¾\

For/Next °j°é | Do °j°é | While °j°é