窗體
一、Form 屬性
·Name 屬性:用于在屬性窗口定義對象的名稱,以便在程序中引用。它只能在設(shè)計時賦值。對于任何一個可以在屬性窗口設(shè)置其屬性的對象必須設(shè)置該屬性的值,VB自動為每一個對象給定一個缺省值。
·Caption 屬性:屬性用于獲取、設(shè)置窗體的標(biāo)題。
·BorderStyle 屬性:用于設(shè)置窗體的邊框。它常用的有兩個值:
普通窗體(2-Sizable):可修改窗體的尺寸。
對話框(3-FixedDialog):不能修改窗體的尺寸。
·Top,Left,Width,Height 屬性:它們分別表示該窗體在父窗體或屏幕的位置(Top,Left)和大?。╓idth,Height)。
·ScaleTop,ScaleLeft,ScaleWidth,ScaleHeight 屬性:它們分別表示該窗體工作區(qū)的位置和大小。
二、Form 方法
1、顯示一個窗體。
FormX.Show[vbModal]
沒有vbModeless表示以非模式方式顯示一個窗體。
帶有vbModal表示以模式方式顯示一個窗體。
2、隱藏一個窗體。
FormX.Hide
隱藏窗體并不把窗體從內(nèi)存中卸載,要卸載窗體需要使用語句:
Unload FormX
或:UnLoad Me (Me 表示當(dāng)前窗體)
三、Form 事件
1、Load 事件:當(dāng)窗體加載到內(nèi)存時發(fā)生
Private Sub Form_Load()
... '常把初始化代碼放在此處
End Sub
2、Resize 事件:當(dāng)窗體改變其尺寸時發(fā)生
Private Sub Form_Resize()
... '常在此處修改其它控件的尺寸
End Sub
3、Unload 事件: 當(dāng)窗體從內(nèi)存卸載時發(fā)生
Private Sub Form_Unload(Cancel As Integer)
... '在窗體卸載前做一些掃尾工作。
'如關(guān)閉文件、提示存盤等
End Sub
?。蹍?shù):]
Cancel 表示:是否放棄卸載。帶進來時=0,表示可以卸載。在代碼中將其0,表示放棄卸載。
?。劾?]
Private Sub Form_Unload(Cancel As Integer)
If MsgBox("你想退出嗎?", vbYesNo, "退出") = vbNo Then
Cancel = True
End If
End Sub
標(biāo)簽控件
Label 控件主要用于在窗體中顯示提示信息,常與Text控件一起使用。
[屬性]
·Caption 表示標(biāo)簽的內(nèi)容。
?。劾?]
Label1.Caption = "N&ame:"
控件在窗體中顯示Name:,&號跟的字母是快捷鍵字母,即當(dāng)我們按下Alt+A時,Label1的Click事件將會發(fā)生。這種快捷鍵定義方法對于菜單和許多其它控件同樣適用。
·Font 表示控件的字體。
·ForeColor 表示控件的當(dāng)前顏色。
·Enabled 表示控件是否使能。
=True 使能。
=False 禁止(控件顯示為灰色)。
·Visible 表示控件是否可見
=True 可見。
=False 不可見。
·Top,Left,Width,Height 表示控件在窗體中的位置和尺寸。
[事件:]
Click 當(dāng)點擊或按下快捷鍵時發(fā)生,常用于使和它一起使用的Text控件獲得輸入交點。
?。劾?]
Private Sub Label1_Click()
Text1.SetFocus
End Sub
文本控件
Text控件接受用戶的輸入的字符串?dāng)?shù)據(jù)。
[屬性:]
·Text 表示用戶輸入的內(nèi)容。
?。劾?]
Label1.Caption = Text1.Text
將Text1控件接收用戶輸入的數(shù)據(jù)通過Label1控件顯示出來。
·SelStart 表示用戶選中一段文字的起始位置。第一個字符位置為0。
·SelLength 表示用戶選中文字的長度。
·SelText 表示用戶選中文字的內(nèi)容。
[例:]
0123456789
這時:SelStart=5,SelLength=4,SelText="5678"
·MultiLine 表示是否是多行輸入。
=True 是多行輸入。
=False 不是多行輸入(缺省) 。
·ScrollBars 多行情況下是否需要滾動條。
=0 沒有。
=1 有水平。
=2 有垂直。
=3 水平、垂直都有。
·Password 表示口令字符。Text屬性返回用戶輸入數(shù)據(jù),屏幕上顯示該字符。
[方法:]
·SetFocus 使當(dāng)前控件獲得輸入交點。
[事件:]
·KeyPress 當(dāng)在控件上按下按鍵時發(fā)生。
Private Sub Text1_KeyPress(KeyAscii As Integer)
End Sub
·KeyAscii 表示用戶按鍵的ASCII碼,如果在事件中將它改為0,則認為沒有按鍵。
[例:]
編寫只允許輸入數(shù)字的Text控件。
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then
KeyAscii = 0
End If
End Sub
·Change 當(dāng)控件內(nèi)容改變時發(fā)生。
·LostFoucus 當(dāng)控件失去輸入交點時發(fā)生。
·GotFoucus 當(dāng)控件獲得輸入交點時發(fā)生。
通常我們在Text控件獲得輸入交點時全選它的內(nèi)容,方便用戶直接修改數(shù)據(jù)。代碼如下:
Private Sub Text1_GotFocus()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End Sub
按鈕、框架
一、CommandButton控件
CommandButton控件接受用戶的命令。
?。蹖傩裕海?nbsp;
·Caption 表示按鈕所顯示的內(nèi)容
例:Command1.Caption="&OK"
?。凼录海?nbsp;
·Click 當(dāng)點擊或按下快捷鍵時發(fā)生。
二、Frame控件
Frame控件主要用于為OptionButton控件分組。
?。蹖傩裕海?nbsp;
·Caption 表示分組所提示的內(nèi)容。
例:Frame1.Caption="性別":Frame2.Caption="民族"
單復(fù)選框
一、CheckBox控件
CheckBox控件檢查某個選項是否被選中。
?。蹖傩?]
·Caption 表示檢查框所提示的內(nèi)容。
?。劾?]
Check1.Caption = "Windows &98": Check2.Caption = "Windows &NT"
·Value 表示檢查框是否被選中。
=0 未選中。
=1 選中。
[例:]
Check1.Value = 1: Check2.Value = 0
?。凼录?]
·Click 當(dāng)點擊或按下快捷鍵時發(fā)生。
二、OptionButton控件
OptionButton控件檢查一個選項是否被選中,它與CheckBox的區(qū)別是:
CheckBox 是多選多項。
OptionButton 是多選一項。
[屬性:]
·Caption 表示檢查框所提示的內(nèi)容。
?。劾海?br> Option1.Caption="男":Option2.Caption="女"
·Value 表示檢查框是否被選中。
=False 未選中。
=True 選中。
[例:]
Option1.Value=False:Option2.Value=True
?。凼录海?nbsp;
·Click 當(dāng)點擊或按下快捷鍵時發(fā)生。
列表框和組合框
一、ListBox控
ListBox控件用于在一組列表中選擇其中的一項或多項。
?。蹖傩裕海?nbsp;
·Text 表示當(dāng)前操作項內(nèi)容。
·ListCount 表示當(dāng)前列表框中總數(shù)據(jù)項數(shù)。
·ListIndex 表示當(dāng)前操作項下標(biāo),第1項=0。
·List(i) 表示第i項表項內(nèi)容。
·MultiSelect 表示是否允許多選擇。
·Selected(i) 表示第i項是否被選中。
·SelCount 表示被選中的項數(shù)。
·Sort 表示是否排序。
?。鄯椒?]
· AddItem 向列表框增加一項數(shù)據(jù)。
· ListX.AddItem(Item As String)
· RemoveItem 刪除第i項
· ListX.RemoveItem(i As Integer)
?。凼录?]
· Click 當(dāng)點擊列表框中的一項數(shù)據(jù)時發(fā)生。
二、ComboBox控件
ComboBox控件與ListBox基本相同,它的優(yōu)點在于占用的面積小,除了可以在選項中選擇外還可以輸入其它數(shù)據(jù)。它的缺點是不能多選擇。
?。蹖傩裕海?nbsp;
· Text 存放從選項中選擇的數(shù)據(jù)或用戶輸入的數(shù)據(jù)。
其它方法與事件和ListBox相同。
一、Image控件
Image控件用于顯示一張圖片。
?。蹖傩裕海?nbsp;
·Picture 存放圖片的數(shù)據(jù)。
通常我們使用LoadPicture函數(shù)讀入一張圖片。
?。劾?]
ImageX.Picture = LoadPicture("C:\1.bmp")
[注:]
LoadPicture支持Bmp、Jpg、Gif、等多種格式圖片文件。
·Stretch 顯示圖片的方式。
=True 以控件的尺寸顯示圖片。
=False 以圖片的原尺寸顯示圖片。
二、Timer控件
Timer控件以固定間隔時間名觸發(fā)它的Timer事件。
?。蹖傩裕海?nbsp;
·Enabled 表示是否起動計時器。
=True 啟動。
=False 關(guān)閉。
·Intertval 表示觸發(fā)Timer事件的間隔時間以毫秒為單位,即:1000=1秒。
[事件:]
·Timer當(dāng)計時器計時到間隔時間時發(fā)生。
聯(lián)系客服