《什麽是变数课件讲解学习》由会员分享，可在线阅读，更多相关《什麽是变数课件讲解学习（39页珍藏版）》请在金锄头文库上搜索。
1、什麼是變數？,我們在VB裡用程式碼做資料運算時，因為CPU沒有記憶的功能，因此剛做完處理的資料馬上便消失，為了能取出剛才的運算結果，所以電腦語言會有變數與常數這兩種東西 在VB裡，為了方便及其它的原因，我們把資料存到記憶體裡並不是用位址來指定存在記憶體裡，它是用文字來代表一個記憶體位址，這就是變數 這個記憶體的位址是由電腦自己指定，也就是說我們不能指定資料要放在記憶體的某某位址上，程式每次使用文字內所對應的記憶體位址不一定相同,如何使用變數儲存資料至記憶體？,使用方式：變數 = 資料 X=X+1 在這裡的=並不是指等於 這裡的=是說指定複製給的意思,VB變數命名,變數的命名是有一定的規則 每一
2、個變數第一個字一定要以英文字母命名(=255字元) 每一個變數從第二個字開始可以都以英文字母命名 每一個變數從第二個字母開始可以用數字來命名 每一個變數不可用空白來命名，但可以用底線命名 每一個變數均不可以中文字、全型字命名(VB中文版可以使用中文字來做為變數的命名) 命名時，字母大小寫皆可 變數名稱不可使用VB的保留字 變數的命名最好具有意義，以提高可讀性且易記 若變數未設定初值時，數值變數預設值為0，字串變數預設值為空字串,VB基本資料型態,變數,數值變數,字串變數,布林變數 日期變數 物件變數 自由型態變數,位元組變數 整數變數 長整數變數 單精確度變數 倍精確度變數 貨幣變數,固定長度
3、字串變數 變動長度字串變數,數值變數,長整數 10 2 * PI 這個程式碼會在表單上印出半徑為10的圓面積 End Sub,練習一,由ToolBox拖曳TextBox(文字方塊)及Command(命令按鈕)至表單 設定Command1的Caption屬性為“中華民國國父” 滑鼠游標移到Command1上雙擊兩下加入以下程式碼 Private Sub Command1_Click() NFather = “孫中山” Text1.Text = Nfather End Sub 執行程式,VB數值運算,運算子,做運算:VB做運算時格式為變數 = 運算式,關係運算子,邏輯運算子,AND：且 OR：或
4、NOT：否,VB數值運算-攝氏溫度與華氏溫度變換,由ToolBox拖曳2個命令按鈕(Command)物件及2個文字方塊(TextBox)物件。 至屬性對話框修改屬性： Command1.Caption = 轉華氏 Command2.Caption = 轉設氏 Text1.Text = ” Text2.Text = “” 在Command1及Command2上雙擊，加入程式碼： Private Sub Command1_Click() Text2.Text = Val(Text1.Text) * 9 / 5 + 32 End Sub Private Sub Command2_Click() Te
5、xt1.Text = (Val(Text2.Text) - 32) / 9 * 5 End Sub 執行程式,物件事件,Change Change最常見於TextBox或RichTextBox等文字方塊，當文字內容被修改(Text屬性改變)時，VB變會執行Change事件內的副程式。 Click Click最常見於各可視物件裡，當物件被滑鼠點一下時，VB變會執行Click事件內的副程式。 DBClick DBClick最常見於各可視物件裡，當物件被滑鼠雙擊時，VB變會執行DBClick事件內的副程式。 DragDrop DragDrop最常見於各可視物件裡，當另一物件被拖曳至物件裡並放開滑鼠按
6、鍵時，VB變會執行DragDrop事件內的副程式。此事件會傳回數值Source、X及Y，Source是指那個物件被拖曳，X是滑鼠在物件放開時的X座標，Y是滑鼠在物件放開時的Y座標,物件事件,DragOver DragOver最常見於各可視物件裡，當另一物件被拖曳至物件裡時，VB變會執行DragOver事件內的副程式。此事件會傳回數值Source、X、Y及State，Source是指那個物件被拖曳，X是滑鼠在物件放開時的X座標，Y是滑鼠在物件放開時的Y座標，State是指被拖曳物件的移動狀態，當State=0示移入，當State=1示移出，當State=2示移動中 GotFocus GotFoc
7、us幾乎是各物件都有，當物件得到Focus(焦點、焦點)的一瞬間之前，VB變會執行GotFocus事件內的副程式。 KeyDown KeyDown最常見於各可視物件裡，當得到焦點的物件正按下鍵盤按鈕時，VB變會執行KeyDown事件內的副程式。此事件會傳回數值KeyAsciit，KeyAscii會傳輸入文字的AscII碼的代號,物件事件,KeyPress KeyPress最常見於各可視物件裡，當得到焦點的物件正按了鍵盤按鈕時，VB變會執行KeyPress事件內的副程式。此事件會傳回數值KeyCode、Shift，KeyCode會傳回VbKey值，表示正按下那一按鍵 KeyUp KeyUp最常見
8、於各可視物件裡，當得到焦點的物件正方開鍵盤按鈕時，VB變會執行KeyUp事件內的副程式。此事件會傳回數值KeyCode、Shift，KeyCode會傳回VbKey值，表示正按下那一按鍵，Shift傳回值表示是否按下Alt、Ctrl及Shift等鍵 LostFocus LostFocus幾乎是各物件都有，LostFocus與GotFocus相反，當物件轉移Focus(焦點、焦點)給其它物件的一瞬間之前，VB變會執行LostFocus事件內的副程式。,物件事件,MouseDown MouseDown最常見於各可視物件裡，當滑鼠在物件上按下任一按鍵時，VB變會執行MouseDown事件內的副程式。此
9、事件會傳回數值Button、Shift、X及Y值，Button會傳回被按下的滑鼠按鍵代碼，Shift傳回值表示是否按下鍵盤的Alt、Ctrl及Shift等鍵，X是滑鼠在物件按下時的X座標，Y是滑鼠在物件按下時的Y座標 MouseMove MouseMove最常見於各可視物件裡，當滑鼠在物件上移動時，VB變會執行MouseMove事件內的副程式。此事件會傳回數值Button、Shift、X及Y值，Button會傳回被按下的滑鼠按鍵代碼，Shift傳回值表示是否按下鍵盤的Alt、Ctrl及Shift等鍵，X是滑鼠在物件的X座標，Y是滑鼠在物件的Y座標,物件事件,MouseUp MouseUp最常見
10、於各可視物件裡，當滑鼠在物件上放開任一按鍵時，VB變會執行MouseUp事件內的副程式。此事件會傳回數值Button、Shift、X及Y值，Button會傳回被放開的滑鼠按鍵代碼，Shift傳回值表示是否按下鍵盤的Alt、Ctrl及Shift等鍵，X是滑鼠在物件放開時的X座標，Y是滑鼠在物件放開時的Y座標,基本語法 IF,IF敘述讓你能夠做邏輯的判別。 IF判別的兩種邏輯，True為真，其數值不為零；False為錯、失效，其數值為零。 9 3 為 True(真) 4 -4 且 X 12 時，會把他寫成 -4 X 12 ，然而這種邏輯式在VB裡是錯誤的因此我們要把他改寫成 -4 X AND X
11、12 才正確。,基本語法 IF,IF的用法(1)當邏輯運算為真，執行Then後的敘述 IF 邏輯運算式 Then 你的演算法 Ex: Private Sub Command1_Click() A = 10 B = 5 IF A B Then Me.Caption = A B End Sub Private Sub Command1_Click() Tmp = 小瓜瓜 TmB = 小呆呆 IF Tmp = TmB Then Me.Caption = 兩字串相等 End Sub,基本語法 IF,IF的用法(2)當邏輯運算為真，執行Then後的敘述，若邏輯運算為錯，執行Else後的敘述 IF 邏輯運
12、算式 Then 你的演算法 Else 你的演算法 Ex: Private Sub Command1_Click() A = 10 B = 5 IF A B Then Me.Caption = A B Else Me.Caption = A = B End Sub Private Sub Command1_Click() Tmp = 小瓜瓜 TmB = 小呆呆 IF Tmp = TmB Then Me.Caption = 兩字串相等 Else Me.Caption = 兩字串不相同 End Sub,基本語法 IF,IF的用法(3)與(2)相同功能 IF 邏輯運算式 Then 你的演算法1 你的演
13、算法2 為真時的程式碼區域 . 你的演算法N Else 你的演算法1 你的演算法2 為錯時的程式碼區域 . 你的演算法N End IF,基本語法 Select,Select與IF兩個雖然都是提供你條件選擇的功用但兩者仍然不一樣 IF提供的是邏輯上的運算選擇，而Select提供的則是條件邏輯上的選擇。 Select的用法： Select Case 變數名稱 Case 條件1 你的演算法1 Case 條件2, 條件3 你的演算法2 Case 條件4 To 條件5 你的演算法3 . Case Else 你的演算法N End Select,基本語法 Select,Private Sub Command
14、1_Click() A = 10 Select Case A Case 0, 1, 2, 3, 4 Me.Caption = A 小於 5 Case 5 Me.Caption = A 等於 5 Case 6 Me.Caption = A 等於 6 Case Else Me.Caption = A 大於 6 End Select End Sub,結果?,基本語法 For,大量的有規則性的資料要做處理時，我們要把程式碼逐一的打出十分的不符合經濟效益，因此程式語言中會有重覆式的架構敘述來讓使用者簡化程式設計 For . Next 便是VB重覆式架構中的敘述之一，用法是： For 變數 = 起始值 T
15、o 最終值 Step 間隔值 你的程式碼 Next 變數 Next 變數這一行變數表示變數可以寫出或省略,基本語法 For,若想要計算1+2+3，使用For Next該怎麼寫？ Private Sub Command1_Click() For N = 1 To 3 MyVal = MyVal + N Next MsgBox MyVal End Sub,Private Sub Command1_Click() MyVal = MyVal + 1 MyVal = MyVal + 2 MyVal = MyVal + 3 MsgBox MyVal End Sub,蜂巢式迴圈,Private Sub C
16、ommand1_Click() For N = 1 To 2 第一層 MyVal = MyVal + N For M = 1 To 3 第二層 MyVal = MyVal + M Next 第二層 Next 第一層 MsgBox MyVal End Sub,Exit For敘述，在For . Next迴圈裡加入Exit For敘述便會跳出一層For . Next迴圈,Do Loop,Do . Loop是個無限迴圈的敘述，因此會不斷的重覆執行，所以我們要加入判斷敘述以終止這個無窮無盡的迴圈。 用法是： Do (開啟位置) 你的程式碼 Loop (結束位置，再跳回到Do) 若想要計算1+2+3，使用Do . Loop該怎麼寫？ Do N = N +1 T = T + N If N = 3 Then Exit Do Loop Print T,Do Loo
