åéæ¯è®¡ç®æºç¼ç¨ä¸çä¸ä¸ªéè¦æ¦å¿µãåéæ¯ä¸ä¸ªå¯ä»¥åå¨å¼çåæ¯æå称ãå½ä½ ç¼ç¨æ¶ï¼å¯ä½¿ç¨åéæ¥åå¨æ°åï¼ä¾å¦å»ºçç©çé«åº¦ï¼æè
åå¨åè¯ï¼ä¾å¦äººçååãç®åå°è¯´ï¼å¯ä½¿ç¨åé表示ç¨åºæéçä»»ä½ä¿¡æ¯ãä½ å¯è½ä¼é®ï¼âæ¢ç¶æå¯ä»¥ä½¿ç¨ä¿¡æ¯ï¼ä¸ºä»ä¹è¦ç¨åéï¼âå 为åéå¯ä»¥éçç¨åºçè¿è¡èæ¹åå
¶è¡¨ç¤ºçå¼ãä¾å¦ï¼ä½ å¯ä»¥å个ç¨åºæ¥è·è¸ªç½åéç³è±çæ°ç®ãå 为ç³æ¯è¦è¢«åæçï¼æ以ç½éç³è±çæ°ç®å¯è½ä¼éçæ¶é´çæ¨ç§»èæ¹åãä½ å¯ä»¥ä½¿ç¨ä¸ä¸ªåéæ¥è¡¨ç¤ºä¸åæ¶é´çç³è±æ°ç®ï¼èæ éå¨æ¯æ¬¡ç³è±æ°ç®ååæ¶éæ°ä¿®æ¹ç¨åºãå°ä¿¡æ¯åå¨äºåéä¸
使ç¨åéæä¸ä¸ªæ¥éª¤ï¼å£°æåé (declare the variable)ãåè¯ç¨åºåéçå称åç±»åã
ç»åéèµå¼ (assign the variable)ãèµäºåéä¸ä¸ªè¦ä¿åçå¼ã
使ç¨åé (user the variable)ãå¨ç¨åºä¸è·å¾åéä¸æåå¨çå¼ã
声æåé
声æåéæ¶ï¼å¿
é¡»å³å®å
¶å称ååå¨å
¶ä¸çæ°æ®çç±»å (data type) ãä½¿ç¨ Dim å As è¿ä¸¤ä¸ªå
³é®åæ¥å£°æåéï¼å¦ä¸æ示ãDim aNumber As Integer
è¿è¡ä»£ç çæææ¯è¦ä½¿ç¨ä¸ä¸ªå为 aNumber çåéï¼å¹¶ä¸å¸æå®æåå¨çå¼çæ°æ®ç±»å为æ´æ° (Integer)ãå 为 aNumber æ¯ä¸ä¸ªæ´æ° (Integer) æ°æ®ç±»åï¼æ以å®åªè½åå¨æ´æ°ãä¾å¦è¦åå¨ 42.5è¿æ ·å¸¦æå°æ°çæ°åï¼åé使ç¨å精度浮ç¹æ° (Double) æ°æ®ç±»åãå¦æè¦åå¨åè¯æå¥åï¼é使ç¨å符串 (String)æ°æ®ç±»åãå¦å¤ä¸ç§å¨æ¤å¼å¾ä¸æçæ°æ®ç±»åæ¯å¸å° (Boolean)ï¼å®å¯åå¨ True æ False å¼ãä¸é¢æ¯å
³äºå¦ä½å£°æåéçæ´å¤ç¤ºä¾ãDim aDouble As Double
Dim aName As String
Dim YesOrNo As Boolean
ç»åéèµå¼
ä½¿ç¨ = 符å·ç»åéèµå¼ï¼å¦ä¸ä¾æ示ãè¿æ¶åï¼è¿ä¸ª = 符å·æ们称ä¹ä¸ºèµå¼åéè¿ç®ç¬¦ (assignment operator)ãaNumber = 42
è¿è¡ä»£ç çå¼ä¸º 42ï¼å®åå¨å¨å
å声æçå为 aNumber çåéä¸ã声æåé并ç»åéèµä¸ªç¼ºçå¼
ä½ å¯ä»¥ç¨ä¸è¡ä»£ç 声æåéï¼ç¶åç¨å¦ä¸è¡ä»£ç ç»åéèµå¼ãæ¯å¦ï¼Dim aNumber As Integer
aNumber = 42
ä½æ¯ï¼å¦æå°è¯å¨èµå¼å使ç¨åéï¼å¯è½å¯¼è´é误ãå æ¤ï¼æ好å¨åä¸è¡ä»£ç ä¸å£°æåéå并ç»åéèµå¼ãå³ä½¿è¿ä¸ç¥éåéå°è¦åå¨ä»ä¹å¼ï¼ä¹å¯ä»¥ç»åéèµä¸ªç¼ºçå¼ (default value) ãä¸é¢ç两è¡ä»£ç å°±å¯ä»¥åæï¼Dim aNumber As Integer = 42
æ´å¤ä»£ç 示ä¾ï¼Dim aDouble As Double = 0
Dim aName As String = "default string"
Dim YesOrNo As Boolean = True
éè¿ç¨åä¸è¡ä»£ç 声æåé并ç»åéèµä¸ªç¼ºçå¼ï¼å¯ä»¥é¿å
å¯è½åççé误ã以åä½ ä»å¯ä»¥ä½¿ç¨èµå¼æ¹æ³ä¸ºåéèµç»ä¸åçå¼ãè¯ä¸è¯
å¨æ¬ç»ä¹ ä¸ï¼ä½ è¦åä¸ä¸ªå°ç¨åºæ¥å建å个åé并为å
¶èµå¼ï¼ç¶åå¨ä¸ä¸ªæ¶æ¯æ¡ (message box) çªå£ä¸æ¾ç¤ºæ¯ä¸ªå¼ãé¦å
æ们å°å建åå¨ä»£ç ç项ç®ãå建项ç®
æå¼ Visual Studioå¨æ件 (File) èåä¸ï¼åå»æ°å»ºé¡¹ç® (New Project)ãå¨æ°å»ºé¡¹ç® (New Project) 对è¯æ¡çæ¨¡æ¿ (Templates) çªæ ¼ä¸ï¼åå» Windows åºç¨ç¨åº (Windows Application)ãå¨å称 (Name) æ¡ä¸é®å
¥ Variablesï¼ååå»ç¡®å® (OK)ãVisual Basic å°ä¸ºç¨åºå建æ件并æå¼çªä½è®¾è®¡å¨ (Form Designer)ãä¸ä¸æ¥ï¼æ们å°å建åéãå建åé并æ¾ç¤ºå®ä»¬çå¼
åå»è¯¥çªä½ã代ç ç¼è¾å¨ (Code Editor) æå¼å¹¶æ¾ç¤ºå为 Form1_Load ç代ç èãè¿è代ç ï¼ç§°ä¸ºè¿ç¨ (Procedure)ï¼å
å«å¨çªä½é¦æ¬¡å è½½å°å
åä¸æ¶æ§è¡çæ令ãå¨ Form1_Load è¿ç¨ä¸ï¼é®å
¥ä»¥ä¸ä»£ç ãDim anInteger As Integer = 42
Dim aDouble As Double = 39.345677653
Dim aString As String = "I like woyouxian."
Dim aBoolean As Boolean = True
æ¤ä»£ç 声æå个åéï¼IntegerãDoubleãString å Booleanï¼å¹¶ç»å®ä»¬èµé»è®¤å¼ã æ示é®å
¥ä»£ç æ¶ï¼æ¨å¯è½ä¼æ³¨æå°ï¼å¨é®å
¥ As åï¼å
æ ä¸ä¼åºç°ä¸ä¸ªåè¯å表ãæ¤åè½ç§°ä¸ºæºè½æåº (Intellisense)ãå©ç¨è¿ä¸åè½ï¼æ¨åªéé®å
¥ä¸ä¸ªåè¯çåå 个åæ¯ï¼ä¾¿å¯ä»¥å¨å表ä¸éæ©ç¸åºçåè¯ãå®æéæ©åï¼å°±å¯ä»¥æ Tab é®å®æåè¯ã注ææ¯å½å¨ç¨åºä¸è¡¨ç¤ºå®é
ææ¬æ¶ï¼å¿
é¡»ç¨åå¼å· "" å°ææ¬æ¬èµ·æ¥ãè¿ä¼åè¯ç¨åºå°ææ¬è§£é为å®é
ææ¬èä¸æ¯åéåãå¦æå¨å®é
ææ¬ä¸è¿å
å«åå¼å·ï¼ä½ åç¨ä¸¤ä¸ªåå¼å·ä»£æ¿ãæ¯å¦Dim aString As String = "I like ""b l a b l a""!"
ç» Boolean åéèµ True æ False å¼æ¶ï¼åæ éç¨åå¼å·å°å
¶æ¬èµ·æ¥ï¼å 为 True å False æ¯ Visual Basic å
³é®åï¼å
¶æ¬èº«æç¹æ®çå«ä¹ã ç¶åå¨ä¸ä¸æ¥åç代ç ä¸é®å
¥ä»¥ä¸ä»£ç ãMsgBox(anInteger)
MsgBox(aDouble)
MsgBox(aString)
MsgBox(aBoolean)
End
ååè¡ä»£ç ä½¿ç¨ MsgBox å½æ°åè¯ç¨åºå¨æ°çªå£ä¸æ¾ç¤ºä¸ä¸æ¥ç»æ¯ä¸ªåéæèµçå¼ãæåä¸è¡ä½¿ç¨ End è¯å¥åè¯ç¨åºå¨æ§è¡å®æ¤è¿ç¨åç»æãè¿è¡ç¨åº
éæ©è°è¯ (Debug) èåä¸çå¼å§è°è¯ (Start Debugging) è¿è¡ç¨åºãæè
ç´æ¥æå¿«æ·é® F5 è¿è¡ç¨åºãå¨åºç°çæ¯ä¸ªçªå£ä¸åå»ç¡®å® (OK)ã注ææ¯ä¸ªåéçå¼ä¾æ¬¡æ¾ç¤ºï¼ç¶åç¨åºç»æãç¨åºç»æåï¼ä½ å¯ä»¥è¿å并æ´æ¹ä»£ç ä¸ç»åéæèµçå¼ï¼ç¶åå次è¿è¡åºç¨ç¨åºï¼ä½ ä¼çå°æ¾ç¤ºçæ°å¼ã
温馨提示:答案为网友推荐,仅供参考