³q±`¦b Crystal Reports ¤§¤¤¡A¦pªG¨S¦³©ú½T¦a¿é¤J«¬§OÂà´«¨ç¦¡¡A´N¤£¯à±N¤@ºØ«¬§OȥΦb¥t¤@ºØ«¬§O¤¤¡C¨Ò¦p¡G
Dim postalCode as String '¿ù»~- ±N¼Æ¦rÈ«ü¬£µ¹ String ÅÜ¼Æ postalCode = 10025 'OK ¨Ï¥Î«¬§OÂà´«¨ç¦¡ CStr '«Ø¥ß "10025" postalCode = CStr (10025, 0)
¤£¹L¡A¦³¨ÇÂà´«·|¦Û°Ê¶i¦æ¡G
¨Ò¦p¡A¥H¤Uªº«ü¬£¬O¥¿½Tªº¡G
Dim cost As Currency 'Same as: cost = CCur (10) cost = 10 Dim orderDate As DateTime ¡¥Same as: orderDate := CDateTime (1999, 9, 23, 0, 0, 0) orderDate = CDate (1999, 9, 23) Dim aRange As Number Range '»P¦¹¬Û¦P¡G aRange := 20 To 20 aRange = 20 Dim aRangeArray () As Number Range '»P¦¹¬Û¦P¡G 'aRangeArray = Array (10 To 10, 20 To 25, 2 To 2) aRangeArray = Array (10, 20 To 25, 2)
ª`·N ¤£¤¹³\¶i¦æ¬Û¤ÏªºÂà´«¡C¨Ò¦p¡G
Dim num As Number num = 5 + CCur (10) '¿ù»~ 'OK- ¨Ï¥Î CDbl ¨ç¦¡Âà´«¦¨ Number «¬§O num = CDbl (5 + CCur (10))
5 Âà´«¦¨ CCur (5) µM«á¦A¥[¨ì CCur (10) ¤¤¡A±o¨ìµ²ªG CCur (15)¡C¦ý³oÓ³f¹ôȤ£¯à¦Û°Ê¦a«ü¬£µ¹¼Æ¦rÅÜ¼Æ num¡A¦]¬° Currency ¨ì Number ªº¦Û°ÊÂà´«¬O¤£¤¹³\ªº¡C¦P¼Ë¦a¡A±µ¨ü Currency ¤Þ¼Æªº¨ç¦¡¤]¥i¥H±µ¨ü Number ¤Þ¼Æ¡A¦Ó¥B·|±N Number ¤Þ¼ÆÂà´«¦¨ Currency¡C¦ý¬O¡A¦pªG¨S¦³¥ý¥Î CDbl ±N Currency Âà´«¦¨ Number¡A¨º»ò±µ¨ü Number ¤Þ¼Æªº¨ç¦¡´N¤£¯à±µ¨ü Currency ¤Þ¼Æ¡C