³oÓ°ÝÃD©ñ¤Ó¤[¤~¨Óµo°Ý...
- ©«¤l
- 127
- ¥DÃD
- 38
- ºëµØ
- 0
- ¿n¤À
- 166
- ÂI¦W
- 0
- §@·~¨t²Î
- Microsoft
- ³nÅ骩¥»
- Windows 7
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2015-7-31
- ³Ì«áµn¿ý
- 2018-8-3
|
³oÓ°ÝÃD©ñ¤Ó¤[¤~¨Óµo°Ý...
Ãö©ó«Å§iªº°ÝÃD
Dim x,y,z As Integer ¬O¤£¬O¥u¬O±N Dim x As Integer¡BDim y As Integer¡BDim z As Integer¼g¦b¤@°_©O?
©Ò¥Hx,y,z³£¬O«Å§i¾ã¼Æ©O?
¤§«e(¦~¥N¤[»·)¦³¬Ý¨ì¤@Ó¦b³oÓ±¡ªp¦n¹³¥u¦³z«Å§i¾ã¼Æ,¦ýx,y¤£ª¾¹D«Å§i¤°»ò..(§Ñ°O¤W¦¸¦b¬YÓ¨¤¸¨»¡¬O¤°»ò«¬ºA¤F) |
|
|
|
|
|
|
- ©«¤l
- 2025
- ¥DÃD
- 13
- ºëµØ
- 0
- ¿n¤À
- 2053
- ÂI¦W
- 0
- §@·~¨t²Î
- WIN7
- ³nÅ骩¥»
- Office2007
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¥x¥_¥«
- µù¥U®É¶¡
- 2011-3-2
- ³Ì«áµn¿ý
- 2024-3-14
|
¦^´_ 1# EGBT
n¤@Ó¤@ӫŧi
¥i¥Î²¼g
DIM X%, Y%, Z%
¬ÛÃö¼Æ¦r«¬ºA²¼g¡G
Integer¡G%
Long¡G&
Single¡G!
Double¡G#
Currency¡G@
String¡G$ (µù¡G¤@¯ë¥Î¦bÅܼƫŧi¡A¦Ó«D¤å¦r±`¼Æ) |
|
{...} ªí¥Ü»Ýn¥Î CTRL+SHIFT+ENTER ¤TÁä¿é¤J¤½¦¡
|
|
|
|
|
- ©«¤l
- 127
- ¥DÃD
- 38
- ºëµØ
- 0
- ¿n¤À
- 166
- ÂI¦W
- 0
- §@·~¨t²Î
- Microsoft
- ³nÅ骩¥»
- Windows 7
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2015-7-31
- ³Ì«áµn¿ý
- 2018-8-3
|
¦^´_ 2# ML089
¤j¤j«Ü·PÁ±zªº¦^ÂСC±z»¡n¤@Ó¤@ӫŧi¡C
¨º½Ð°ÝDim x,y,z As Integer³o¼Ë¤l¥Nªí¤°»ò©O? |
|
|
|
|
|
|
- ©«¤l
- 109
- ¥DÃD
- 2
- ºëµØ
- 0
- ¿n¤À
- 114
- ÂI¦W
- 0
- §@·~¨t²Î
- Win7 Win10
- ³nÅ骩¥»
- Office 2019 WPS
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ²`¦`
- µù¥U®É¶¡
- 2013-2-2
- ³Ì«áµn¿ý
- 2024-11-6
|
¦^´_ ML089
¤j¤j«Ü·PÁ±zªº¦^ÂСC±z»¡n¤@Ó¤@ӫŧi¡C
¨º½Ð°ÝDim x,y,z As Integer³o¼Ë¤l¥N ...
EGBT µoªí©ó 2015-11-6 21:48
Dim x, y, z As Integer»P¤U±ªº»y¥yµ¥¶¥¡G
Dim x As Variant, y As Variant, z As Integer |
-
1
µû¤À¤H¼Æ
-
|
¥@¬É¨º»ò¤j¡A¥i§Ú·Q¥hþ¡H
|
|
|
|
|
- ©«¤l
- 522
- ¥DÃD
- 36
- ºëµØ
- 1
- ¿n¤À
- 603
- ÂI¦W
- 0
- §@·~¨t²Î
- win xp sp3
- ³nÅ骩¥»
- Office 2003
- ¾\ŪÅv
- 50
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2012-12-13
- ³Ì«áµn¿ý
- 2021-7-11
|
¦^´_ 4# Joforn
ì¨Ó¦p¦¹!!ÁÂÁÂ!! |
|
|
|
|
|
|
- ©«¤l
- 2834
- ¥DÃD
- 10
- ºëµØ
- 0
- ¿n¤À
- 2890
- ÂI¦W
- 0
- §@·~¨t²Î
- ¡e²¤¡f
- ³nÅ骩¥»
- ¡e²¤¡f
- ¾\ŪÅv
- 100
- ©Ê§O
- ¨k
- ¨Ó¦Û
- ¡e²¤¡f
- µù¥U®É¶¡
- 2013-5-13
- ³Ì«áµn¿ý
- 2024-11-21
|
¦^´_ 3# EGBT
¥i¥H¸Õ¸Õ:
Sub TEST1107_1()
Dim x, y, z As Integer
MsgBox TypeName(x)
MsgBox x = 0
MsgBox x = ""
MsgBox TypeName(z)
x = 1
MsgBox TypeName(x)
x = "J"
MsgBox TypeName(x)
MsgBox VarType(x)
End Sub
¥¼©w¸qªº¬° Variant , ªì©lÈ Empty, µ¥¦P¼Æ¦r0, ¤]µ¥¦P¤å¦r""
ÀH«á¨Ì©Ò½á¤_ªºÈ¬°¨äÃþ«¬, ÆF¬¡©Ê°ª, ¦ý¸û¦û°O¾ÐÅé!
ÁÙ¦³Ó MsgBox VarType(x) , ¥H¼Æ¦r¥Nªí¨äÃþ«¬,
¥i¥H¦h¬Ý¬ÝVBE¤º«Ø»¡©úÀÉ~~ |
-
1
µû¤À¤H¼Æ
-
|
|
|
|
|
|
- ©«¤l
- 127
- ¥DÃD
- 38
- ºëµØ
- 0
- ¿n¤À
- 166
- ÂI¦W
- 0
- §@·~¨t²Î
- Microsoft
- ³nÅ骩¥»
- Windows 7
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2015-7-31
- ³Ì«áµn¿ý
- 2018-8-3
|
¦^´_ 7# ã´£³¡ªL
¯«¤â¥X¤â ... «Kª¾¦³¨S¦³¡A·PÁ¤j¤jªº¯«¸Ñ!! |
|
|
|
|
|
|