一、新建數組
二、保存:點擊保存按鈕便可。
三、運行:F5
四、生成.exe文件:保存->生成xx.execors
五、退出:Alt + Q編輯器
一、數值型(Numeric)ide
Dim a As Interger = 123 Dim b As Long = 2222222222 Dim c As Single = 1.23
二、字符型(String)函數
Dim str As String = "husong"
三、字節型(Byte)工具
Dim dd1() As Byte dd1() = "10101010" Dim dd2 As Byte dd2 = 1
四、布爾類型(Boolean)字體
Dim b As Boolean = true
五、日期(Date)spa
Dim date As Date = Now Dim date1 As Date = Time Dim date2 As Date = Date
六、對象(Object)code
七、變體型(Variant)orm
一、形參修飾符ByVal和ByRef
ByVal表示該形參是按值傳遞的,ByRef傳遞的是引用。
二、Public和Private區別
Public 表示 Sub或函數 可被其餘類的全部函數調用。 Private 表示 Sub或函數 只能被當前頁或者窗體調用。
三、Sub和Function的區別
Sub 表示一個沒有返回值的函數過程。 Function表示有返回值,一般後面會加上 As [類型]
一、在工程中添加類模塊 二、自定義Private屬性或方法 三、自定義Public屬性或方法
標準模塊 - 也是所謂公共模塊,在其中用public聲明的全部變量、對象、函數和過程,能夠在整個工程中,被其它任何對象直接調用,好比,你在其中聲明瞭上述朋友聲明的那個函數: Public Function myadd(a As Long, b As Long) As Long myadd = a + b End Function 它在包括窗體,類中均可以直接使用... 類模塊 - 它是對象(標準模塊不是),對象就有本身的的屬性方法事件等等,對象要實例化之後才能調用其屬性方法和事件
一、就是自定義結構體struct 二、在標準模塊中,用戶自定義類型按缺省設置是公用的。可使用 Private 關鍵字來改變其可見性。而在類模塊中,用戶自定義類型只能是私有的,且使用 Public 關鍵字也不能改變其可見性。
Public Sub test1(a As Integer) Static ss As Integer Dim result As Integer ss = ss + a Form1.Label1.Caption = ss End Sub // 輸出自增結果 Public Sub test2(a As Integer) Dim ss As Integer Dim result As Integer ss = ss + a Form1.Label2.Caption = ss End Sub // 一直輸出1
在VB窗口菜單「工具」>「選項」中的「編輯器」選項卡中有個「要求變量聲明」複選框。如被選中並保存,則在窗體模塊代碼中會自動添加一行代碼: Option Explicit
Dim str As String * strLength 若是字符串長度小於聲明的長度,剩餘部分爲空格。若長於,會截斷。
不能修改const常量
Unload Me Form2.Show
& 是字符串的鏈接符號 _ 是代碼行的鏈接符號
'或Rem
Form1.Label1.Caption = X Form1.Label2.Caption = Y If X > 5000 Then Form1.Label3.Caption = "X超過5000" Else Form1.Label3.Caption = "X小於5000" End If
Select Case X Case 1000 Form1.Label3.Caption = "X等於1000" Case 2000 Form1.Label3.Caption = "X等於2000" Case 3000 Form1.Label3.Caption = "X等於3000" Case 4000 Form1.Label3.Caption = "X等於4000" End Select
For i = 1 To 5 Next i
For Each element In group Next element
函數一般是有返回值的,而過程一般沒有返回值。 給函數傳遞參數時,可經過As指定參數類型,也可使用As Any禁止參數的類型檢查,便可以傳遞任意類型的參數給該函數。
Dim arr(5) As Integer For i = 1 To 5 arr(i - 1) = i Next i For i = 0 To 4 Print arr(i) Next i
Dim arr() As Integer ReDim arr(0 To 4) As Integer For i = LBound(arr) To UBound(arr) arr(i) = (i + 1) * 10 Next i For Each e In arr Print e Next e // 輸出 10 20 30 40 50
On Error GoTo 0 表示禁止當前過程當中任何已啓動的錯誤處理程序。 On Error Resume Next 說明當一個運行時錯誤發生時,控件轉到緊接着發生錯誤的語句以後的語句,並在此繼續運行。訪問對象時要使用這種形式而不使用 On Error GoTo。 On Error GoTo line 啓動錯誤處理程序,且該例程從必要的 line 參數中指定的 line 開始。line 參數能夠是任何行標籤或行號。若是發生一個運行時錯誤,則控件會跳到 line,激活錯誤處理程序。指定的 line 必須在一個過程當中,這個過程與 On Error 語句相同; 不然會發生編譯時間錯誤。 以上MSDN上的解釋 通常狀況下,若是在對咱們建立的對象或控件進行錯誤捕捉,須要使用On Error Resume Next ,而後在判斷它的Err.Number,根據錯誤類型來作相應的處理。
頂層菜單不能有....
MsgBox 類型參數取值
MsgBox 返回值
InputBox(Prompt,[Title],[Default],[XPos],[YPos],[Helpfile],[Context]) 參數1:必需填寫,窗口顯示的內容; 參數2:窗口的名字,默認爲工程名; 參數3:輸入框默認內容; 參數四、5:距離屏幕的位置; 參數六、7:必須結合使用。
勾選 部件micorsoft commom dialog contorl 6.0添加控件 .showopen
字體選框
CommonDialog1.Flags = cdlCFBoth Or cdlCFEffects CommonDialog1.ShowFont
返回值
CommonDialog1.ShowColor
CommonDialog1.ShowPrinter
CommonDialog1.ShowSave
CommonDialog1.ShowHelp
暫略
Label控件 TextBox控件 CommandButton控件 PictureBox控件(Image和ImageList) 圖形控件(Shap和Line) CheckBox控件(對勾) 選項組OptionButton(原點) ListBox和ComboBox MonthView和DateTimePicker Slider和UpDown ListView和TreeView Frame/SSTab/TabStrip StatusBar ProgressBar Animation
控件數組是一組具備共同名稱和類型的控件。一個控件數組至少有一個元素。控件數組有共同事件過程,經過index來標識每一個控件。
Private Sub Command1_Click(Index As Integer) Select Case Index Case 0: Print "0" Case 1: Print "1" Case 2: Print "2" Case 3: Print "3" End Select End Sub
此處略
待續