¦³¼ÆºØ«Å§i°}¦CÅܼƪº¤èªk¡C²Ä¤@ºØ¤èªk¬O¨Ï¥ÎªÅ¥Õªº¬A¸¹¡A¨Ã©ú½T«ü©w°}¦Cªº«¬§O¡G
'«Å§i x ¬°¥þ°ìÅÜ¼Æ '«¬§O¬°¼Æ¦r°}¦C Global x () As Number '±Ò©l x x = Array (10, 20, 30) '«Å§i y ¬° Shared ÅÜ¼Æ '«¬§O¬°¦r¦ê½d³ò°}¦C Shared y () As String Range '°_©l y y = Array ("A" To "C", "H" To "J")
²Ä¤GºØ¤èªk¬O«Å§iÅܼơA¦ý¤£±N¸ÓÅܼƫü©w¬°°}¦C¡A¤]¤£«ü©w«¬§O¡A¦Óµ¥«ÝÅܼƪº²Ä¤@¦¸«ü¬£¤u§@§¹¦¨«¬§Oªº«ü©w¤u§@¡G
'«Å§i y ¬°°Ï°ìÅÜ¼Æ '¦ýµLªk«ü©w¨ä«¬§O Dim y 'y ªº«¬§O²{¦b³]¬°¦r¦ê°}¦C y = Array ("Sun", "Mon", "Tue", "Wed", "Th", _ "Fri", "Sat")
²Ä¤TºØ¤èªk¬O±NÅܼƫŧi¬°°}¦C¡A¦ý¤£§¹¥þ«ü©w¨ä«¬§O¡Aµ¥«Ý²Ä¤@¦¸«ü¬£¤u§@¨Ó«ü©w«¬§O¡C«ùÄò¤Wz y ªº«Å§i¡G
'«Å§i z ¬°°}¦C°Ï°ìÅÜ¼Æ Local z() 'z ³]¬°°}¦C ("Mon", "Tue") ¦P®É¬°¦r¦ê°}¦C z = y(2 to 3)
²Ä¥|ºØ¤èªk¬O¦b«Å§iÅܼƮɡA©ú½T¦a«ü©w°}¦Cªº¤j¤p¡C¦pªG¨Ï¥Î³oºØ§Þ¥©¡A°}¦C·|¦Û°Ê«Ø¥ß¡A¥B¥Î¹w³]ȶñº¡¡C¨Ò¦p¡A¥H¼Æ¦r°}¦C¦Ó¨¥¡A¨CÓ¤¸¯À³£·|ªì©l¤Æ¬° 0¡F¦Ó¦pªG¬O¦r¦ê°}¦C¡A«h¨CÓ¤¸¯À³£·|ªì©l¤Æ¬°ªÅ¥Õªº¦r¦ê ""¡C¦]¬°³oºØ«Å§i¤è¦¡·|½T¹ê«Ø¥ß°}¦C¡A©Ò¥H¥²¶·¨Ï¥Î As ¤l¥y¨Ó«ü©w¨ä«¬§O¡A¥H¨Ñ Crystal Reports §PÂ_¸Ó°}¦C»Ýn¦h¤ÖÀx¦sªÅ¶¡¡C
Dim a(2) As String '¬°°}¦C a ªº²Ä¤@Ó¤¸¯À«ü©w¼ÆÈ a(1) = "good" a(2) = "bye" '& ¹Bºâ¤l¥i¥H¥Î¨Ó¦êÁp¦r¦ê '¤½¦¡·|¶Ç¦^¦r¦ê "goodbye" formula = a(1) & a(2)
±z¥i¥H«ü¬£°}¦C¤¸¯ÀªºÈ¡A¤]¥i¥H¥Î³o¨ÇȨӶi¦æ¨ä¥Lpºâ¡C
Global x() As String x = Array ("hello", "bye", "again") '²{¦b x ¬O°}¦C ("hello", "once", "again") x (2) = "once" '¥H¤U¹Bºâ¦¡¦p¤£¼Ð°O¬°¤£¤©°õ¦æ '±N·|³y¦¨¿ù»~¡A¦]¬°³¯¦Cªº¤j¤p¬° 3 'x (4) = "zap" '¤½¦¡¶Ç¦^¦r¦ê "HELLO" formula = UCase (x (1))
Redim ©M Redim Preserve ÃöÁä¦r¥i¥H¥Î¨Ó«½Õ°}¦Cªº¤j¤p¡A³o¹ï©ó¦b°}¦C¤¤¥[¤JÃB¥~¸ê°T«Ü¦³¥Î¡CRedim ·|¦b½Õ¾ã°}¦Cªº¤j¤p¤§«e¡A¥ý²M°£°}¦C¤¤ì¨Óªº¤º®e¡A¦Ó Redim Preserve «h·|«O¦sì¨Óªº¤º®e¡C
Dim x () As Number Redim x (2) '²{¦b x ¬O°}¦C (0, 0) x (2) = 20 '²{¦b x ¬O°}¦C (0, 20) Redim x (3) '²{¦b x ¬O°}¦C (0, 0, 0) x (3) = 30 '²{¦b x ¬O°}¦C (0, 0, 30) Redim Preserve x (4) '²{¦b x ¬O°}¦C (0, 0, 30, 0) formula = "§¹¦¨"
°}¦C±`»P For/Next °j°é¤@°_¨Ï¥Î¡C¤U¦Cªº½d¨Ò¤¤¨Ï¥Î For/Next °j°é¨Ó«Ø¥ß¨Ã¨Ï¥Î°}¦C Array (10, 20, 30, ..., 100)
¡C
Dim b (10) As Number Dim i For i = 1 To 10 b(i) = 10 * i Next i formula = b(2) '¤½¦¡¶Ç¦^¼Æ¦r 20
¥i¥H¦b³æ¤@ªº³¯z¦¡¤¤«Å§i¼ÆÓÅܼơA¥un«Å§i¤§¶¡¥H³r¸¹¬Û¹j§Y¥i¡C