c_c_lai

¦^´_ 4# EGBT
±q Excel ¡yºÊ¬Ý¦¡¡zµøµ¡¤¤¨ÓÆ[¹îÅܼƫ¬ºAªºÅܤơG

1. Sub Ex2()
   
2.     Dim x As Long, y
   
3.    
   
4.     '  Watch :   : x           : 0       : Long
   
5.     '  --------------- (Á|¨Ò¤@) --------------------------
   
6.     y = 20000
   
7.     '  Watch :   : y           : 20000   : Variant/Integer
   
8.     x = y * 365
   
9.     '  Watch :   : y * 365     : 7300000 : Variant/Long
   
10.     '  Watch :   : 365         : 365     : Integer
    
11.     '  Watch :   : x           : 7300000 : Long
    
12.    
    
13.     '  --------------- (Á|¨Ò¤G) --------------------------
    
14.     x = 20000 * 365    '  °õ¦æ¶¥¬q¿ù»~ '6'¡G ·¸¦ì
    
15.     '  Watch :   : 20000       : 20000   : Integer
    
16.     '  Watch :   : 365         : 365     : Integer
    
17.     '  Watch :   : 20000 * 365 : <·¸¦ì>  : Empty
    
18.    
    
19.     '  --------------- (Á|¨Ò¤T) --------------------------
    
20.     x = CLng(20000) * 365
    
21.     '  Watch :   : CLng(20000) : 20000   : Long
    
22.     '  Watch :   : 365         : 365     : Integer
    
23.     '  Watch :   : x           : 7300000 : Long
    
24. End Sub

½Æ»s¥N½X