Visual Basic 6.0中文版精選重點講義

常用命令

Dim 變數名 As 資料型別 【宣告變數】

Const 常數名 As 資料型別 = 常數內容 【宣告常數】

資料型別

說明

符號

Byte

範圍

Integer

整數

%

2

-3276832767

Long

長整數

&

4

-21474836482147483647

Single

單精準度

!

4

有小數

Double

倍精準度

#

8

有小數

Currency

貨幣

@

8

表示金錢

String

字串

$

 

 

Date

日期

 

8

#1/1/98#

Boolean

布林

 

2

/假,true/false

Variant

可變

 

 

 

 

Msgbox 訊息文字,圖示按鈕種類+圖形種類Vbinformation,標題文字 【訊息交談窗】

變數=Msgbox(訊息文字,圖示按鈕種類,標題文字說明文字) 【傳回訊息交談窗內容】

圖示按鈕種類

顯示按鈕

圖形種類

圖形

VbOkOnly

0

[確定]

VbCritical

16

[X]

VbOkCancle

1

[確定][取消]

VbQuestion

32

[]

VbAbortRetryIgnore

2

[異常終止][重試][略過]

VbExclamation

48

[]

VbYesNoCancel

3

[][][取消]

VbInformation

64

[]

VbYesNo

4

[][]

 

 

 

VbRetryCancle

5

[重試][取消]

 

 

 

變數=Inputbox(訊息文字, 標題文字預設字串X座標,Y座標,說明) 【訊息交談窗】

Print 字串/運算式/數值/變數 (或用?代替) 【顯示資料】

Rem (或用代替) 【註解】

For 變數=初值 to 終值 step 間隔值/next 變數 【迴圈】

While 條件式/Wend 【條件為真則執行迴圈】

Do While 條件式/Loop 【條件為真則執行迴圈】

Do Until 條件式/Loop 【條件為真時跳出迴圈】

Do /Loop While 條件式 【執行迴圈後,當條件為真時繼續執行迴圈】

Do /Until 條件式 【執行迴圈後,當條件為真時跳出迴圈】

If 條件式 Then 程式敘述 【條件為真時執行程式敘述】

If 條件式 Then /End If 【條件為真時執行很多行程式敘述】

If 條件式 Then 程式敘述1 Else 程式敘述2 【條件為真時執行程式敘述1否則執行程式敘述2】

If 條件式/Else/End If 【條件為真時執行某程式片段否則執行某程式片段】

Select Case 變數/Case 數值或字串/Case Else/End Select 【依變數值多重判斷選擇功能】

Dim 陣列名稱(註標) 【宣告陣列】

Private Sub 副程式名稱(參數串列)/End Sub 【撰寫副程式,使用時直接打副程式名稱

Function 函數名稱(宣告參數資料型別) As 資料型別/End Function 【自定函數】

常用函數說明

函數

說明

函數

說明

Asc(字串)

ASCII

Len(字串)

傳回字串長度

Left(字串,n)

傳回左邊n個字元

Right(字串,n)

傳回右邊n個字元

Mid(字串,m,n)

傳回第m開始n個字元

Trim(字串)

除去字串左右空白

Ltrim(字串)

除去字串左邊空白

Rtrim(字串)

除去字串右邊空白

Date

求系統的現在日期

Time

求系統的現在時間

Now

求系統的現在日期及時間

Abs(數值)

傳回數值的絕對值

Int(數值)

<=數值的最大整數值

Fix(數值)

無條件去除小數

Rnd

取亂數值(0<=Rnd<1)

 

 

工具箱的控制物件說明

圖形

名稱

縮碼

說明

圖形

名稱

縮碼

說明

 

Form

frm

表單

Frame

fra

框架

Label

lbl

標籤

HScrollBar

hsb

水平捲軸

TextBox

txt

文字方塊

VScrollBar

vsb

垂直捲軸

CommandButton

cmd

按鈕

Data

dat

資料庫

PictureBox

pic

圖片

ListBox

lst

列表盒

ImageBox

img

影像

ComboBox

cbo

雙併盒

Line

lin

線段

DriveListBox

drv

磁碟機雙併盒

Shape

shp

外形

DirListBox

Dir

目錄列表盒

CheckBox

chk

核對

FileListBox

Fil

檔案列表盒

OptionButton

opt

選項鈕

Timer

tmr

時間物件

常用屬性說明

Name

物件名稱

Caption

物件的標題文字

Text

文字方塊的文數字內容

LeftTop

設定物件的位置座標

WidthHeight

設定物件外型的寬度和高度

BorderStyle

設定物件的邊界型式

Font

設定物件內文字的字型、大小及樣式

Enabled

設定該物件是否致能

Visible

設定該物件是否看得見

MousePointer

設定滑鼠在該物件上的外形其值由012

TabIndex

傳回或設定物件在父表單中的定位順序

Appearance

傳回或設定物件在執行階段以立體或平面表現

BackColor

傳回或設定物件背景的顏色

ForeColor

傳回或設定物件前景的顏色

運算符號(依優先順序)

指數(^),負數(-),乘(*),除(/),求商(\),求餘(MOD),加(+),減(-),字串相加(+),任何資料相加(&)

關係及邏輯運算子

大於(>),大於等於(>=),小於(<),小於等於(<=),等於(=),不等於(<>),且(And),或(Or),反(Not)

顏色的設定RGB(R,G,B)

事件:

Private Sub Form_load()/初值設定內容/End Sub  程式的初值設定

Form_Click()  表單按一下執行事件

Form_DblClick()  表單快按二下執行事件

Form_KeyPress  有按鍵盤時執行事件

Form_MouseDown(Button As Integer……)  按滑鼠按鍵時執行事件

Form_MouseUp(Button As Integer……)  放鬆滑鼠按鍵時執行事件

呼叫副程式(Call,或省略)

Call  reset

Private Sub rest

……….

End Sub

Cption屬性,具快速鍵的按鈕,例:清除[&Y]

Enabled屬性,有作用設True,無作用設false按鈕功能取消

ToolTipText屬性,其按鈕說明文字

MouseDown事件

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As single, Y As single)

End sub

Button=1表左鍵,2表右鍵,4表中鍵

Shift=1Shift2Ctrl4Alt

呼叫副程式

Call Idcheck

Private Sub Idcheck()End Sub

按鈕的屬性

名稱含快速鍵Caption:是[&Y]

此鈕是否失效Enabled=True/False

文書盒Text的屬性

輸入密碼PasswordChar

設輸入資料長度MaxLength

核對盒checkBox

被選取否的狀態 chbox1.value=0/1

選項鈕OptionButtion

被選取否的狀態 chbox1.value=True/False

框架frame

列表資料盒ListBox/雙併盒ComboBox

增加列表資料項 Lbox.AddItem “高雄市

清除列表盒資料 Lbox.Clear

存取列表盒資料 Lbox.List(index)=”高雄市

存取列表盒資料 Lbox.Text=”高雄市

代表被選項目的索引值 Lbox.ListIndex

被選取的項目為True  Lbox.Selected(index)

將某個列表項目刪除 Lbox.RemoveItem index

列表項目是否排序 Lbox.Sorted=True

允許選多個 Lbox.Multiselect=0/1/2

雙併盒有3種顯示方式 Cbo1.Style=0組合下拉式/1組合式/2單純下拉式

捲軸Vscrobar/Hscrobar

最大值 Max

最小值Min

目前位置的值value

按箭頭的捲動值SmallChange

按空白的捲動值LargeChange

定時裝置Timer

每隔千分之一秒產生事件Interval

是否要產生事件Enabled=True/False

產生時::秒的指令Time$

產生現在的系統日期時間 Now

傳回秒Second(Now)

傳回分Minute(Now)

傳回時Hour(Now)

快顯功能表PopupMenu menu名稱

圖片盒PictureBox

將圖片載入圖片盒Picbox.LoadPicture(“路徑”)

某圖片盒放入另一圖片盒 Picbox1.Picture=Picbox2.Picture

刪除圖片盒內的圖形 Picbox.Picture=LoadPicture(“”)

調整圖片盒的大小與圖形同大小 Picbox.Autosize=True

影像盒Image

調整圖形大小與影像盒圖大小 Image.Stretch=True