|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
 |
 |
第二章: vb界面設(shè)計(jì)(重點(diǎn)概述) |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
2.4 定制菜單 1． 菜單概述 Windows中的菜單一般由菜單條、菜單、菜單項(xiàng)、子菜單、彈出式菜單組成。 2． 普通菜單的設(shè)計(jì) （1） 給菜單命名 菜單標(biāo)題和菜單命令也有Caption和Name屬性，設(shè)置了這兩個(gè)屬性就等于創(chuàng)建了菜單。Name是一個(gè)抽象名稱，Caption是屏幕上可見的，可在Caption里加入 “&” 來設(shè)置熱鍵。 （2） 增加和刪除菜單 在Menu Editor中部有三個(gè)命令鈕分別是下一個(gè)、插入、刪除。插入可用來增加新的菜單。在這三個(gè)鍵下面的Caption列表框里選中菜單項(xiàng)（這時(shí)它的底色就變成深藍(lán)色），單擊插入鍵，Visual Basic將上一個(gè)增亮菜單下推并增亮一空行，就可以輸入新菜單名和標(biāo)題了。刪除鍵可用來刪掉菜單。選中要?jiǎng)h掉的菜單，單擊Delete鍵就可以刪掉它了。 （3） 移動(dòng)菜單標(biāo)題 有四種情況：向上移動(dòng)，向下移動(dòng)，向左縮排，向右縮排，選中某一菜單標(biāo)題，安上下箭頭，則這個(gè)菜單將上下移動(dòng)到你喜歡的位置上，這也決定了它在界面中的位置。如果按左右箭頭，情況則有所不同。由于菜單是分級的，所以，如果它沒有縮排，則它是一個(gè)菜單標(biāo)題；如果它縮排一次，那么它將變成一個(gè)菜單命令；如果縮排兩次，那么它將成為一個(gè)子菜單命令。VB里可以總共設(shè)計(jì)四層子菜單。 （4） 設(shè)置分離條 分離條是指在菜單中將命令分組的線，VB將分離條也看成一個(gè)菜單項(xiàng)，它也需要Caption和Name屬性，而且也有其它屬性，分離條與菜單項(xiàng)的區(qū)別是分離條的Caption屬性必須是連字號即減號。也就是，當(dāng)設(shè)置了一個(gè)Caption屬性為 “-” 的菜單項(xiàng)時(shí)，實(shí)際上就設(shè)置了一個(gè)分離條，分離條的名字可以是barFile1之類，以表明分離條的位置。 （5） 菜單的各種簡單屬性 在菜單編輯器里有許多確認(rèn)框和一些文本框及一個(gè)下拉式的列表框，這些決定了菜單的各種屬性。 1) Checked 復(fù)選屬性 這個(gè)屬性值設(shè)置為真，將在菜單命令左邊產(chǎn)生一個(gè)打勾的確認(rèn)標(biāo)志。 2) Enabled有效屬性 各種各樣的用戶會(huì)產(chǎn)生千奇百怪的操作，在許多Edit菜單里都會(huì)有不同形式的讓菜單命令模糊的情況。Enabled屬性為真，則菜單命令是清晰的，Enabled屬性為假，則菜單命令是模糊的，這時(shí)用戶就不能選中這個(gè)菜單項(xiàng)了。 3) Visible 可見屬性 對暫時(shí)不用的菜單， 如果把Visible屬性設(shè)為假，則菜單根本不會(huì)出現(xiàn)在屏幕上。這樣做比把Enabled屬性設(shè)為假顯得更加干脆！ 4) Index屬性 可以生成菜單命令數(shù)組，用索引號區(qū)分開。例如向File菜單中添加一系列最近打開的文件名。添加菜單可用Load方法。以上屬性可以在運(yùn)行時(shí)設(shè)置，形成動(dòng)態(tài)的菜單的情況。 例如： mnuUndo.Enabled = False mnuProperty.Visible = False 還可以改變Caption等屬性。 mnuUndo.Caption = “Redo” （6）為每個(gè)菜單項(xiàng)編寫事件過程代碼 3. 生成彈出式菜單（或浮動(dòng)菜單） 幾乎每個(gè)Windows應(yīng)用程序都提供彈出式菜單，用戶可以右鍵單擊窗體或控件取得這個(gè)菜單。彈出式菜單也屬于普通菜單，只是不固定在窗體上，而是可以在任何地方顯示。 彈出式菜單用PopupMenu方法調(diào)用。假設(shè)已經(jīng)用菜單編輯器生成了名為mnuedit的菜單，則可以在MouseUp事件加入如下代碼就可以生成彈出式菜單： If Button = 2 Then PopupMenu mnuedit 4．菜單設(shè)計(jì)示例 例 5 2.5 設(shè)計(jì)狀態(tài)條、工具欄、進(jìn)程條等 1． 創(chuàng)建狀態(tài)條 選中狀態(tài)條，按F4鍵進(jìn)入屬性窗口，雙擊（Custom）可以進(jìn)入主要的設(shè)置窗口SBarCtrl屬性窗口。 （1） 選擇面板形狀 在SBarCtrl屬性窗口里選擇General標(biāo)簽，在Style列表框里選擇多面板（缺省形式）或單面板簡單文本形式。 （2） 添加或刪除狀態(tài)條面板 在SBarCtrl屬性窗口里選擇Panels標(biāo)簽，單擊Insert按鈕添加一個(gè)面板，或單擊Remove按鈕刪除一個(gè)面板。 （3） 在單面板里顯示文本 在SBarCtrl屬性窗口里選擇General標(biāo)簽，在SimpleText框里輸入想顯示在狀態(tài)條面板里的文本。用代碼顯示的方式是： StatusBar1.SimpleText = "New string to appear" （4） 在多面板里顯示文本或圖形 1). 在SBarCtrl屬性窗口里選擇Panels標(biāo)簽，用Index旁的按鈕選擇面板序號。 2). 在Text框里輸入想顯示在狀態(tài)條面板里的文本。 3). 如果想加入圖形，單擊Browse按鈕打開一個(gè)圖形選擇對話框，選擇想加入的圖形，然后單擊打開按鈕。 4). 最后按確定按鈕。 5). 用代碼顯示的方式是：StatusBar1.Panels(x).Text = "New string to appear" 6). 編寫代碼 如果是一個(gè)單面板狀態(tài)條，當(dāng)用戶單擊狀態(tài)條時(shí)，只需用下面的事件過程來響應(yīng)： Private Sub StatusBar1_Click() End Sub 如果是一個(gè)多面板狀態(tài)條，就需要鑒別用戶單擊的是哪一個(gè)面板，可用下面的事件過程來識別用戶所單擊的面板： Private Sub StatusBar1_PanelClick(ByVal Panel As Panel) Select Case Panel.Index Case 1 'Code to follow if user clicks the first panel Case 2 'Code to follow if user clicks the second panel Case 3 'Code to follow if user clicks the third panel End Select End Sub 2． 創(chuàng)建工具欄 1. 建立工具條 1).在工具箱里單擊工具條圖標(biāo)，拖到窗體的任何位置，Visual Basic自動(dòng)將ToolBar移到頂部。 2).按F4鍵打開屬性窗口。 3).雙擊（Custom），打開ToolBar屬性窗口。 4). 選擇Buttons標(biāo)簽。 5). 單擊Insert按鈕，Visual Basic就會(huì)在你的工具條上顯示一個(gè)空按鈕，現(xiàn)在為你的每一個(gè)按鈕重復(fù)這一步。 6). 單擊確定按鈕。 如果想把按鈕分組，首先生成一個(gè)分隔的按鈕，再在剛才提到的對話框里將這個(gè)按鈕的Style屬性改為3-Separator。 （2） 為工具條增加圖畫 1). 在Visual Basic工具箱里單擊ImageList圖標(biāo)，并將它拖到窗體的任何位置（位置不重要，因?yàn)樗偸遣豢梢姷模?/SPAN> 2). 按F4打開屬性窗口。 3). 雙擊（Custom），打開ImageListCtrl屬性窗口。 4). 選擇Image標(biāo)簽。 5). 單擊Insert Picture，在現(xiàn)在圖形的對話框里選擇想使用的位圖或圖標(biāo)，然后單擊打開按鈕。為每個(gè)想添加圖形的工具條按鈕重復(fù)此步。 6). 單擊確定按鈕。 7). 單擊工具條，按F4，雙擊（Custom），顯示ToolBar屬性對話框。 8). 選擇General標(biāo)簽，在ImageList框里選擇剛才添加的ImageList控件。 9). 選擇Buttons標(biāo)簽，單擊緊挨Index框的向左或向右箭頭以選擇一個(gè)按鈕序號。出現(xiàn)在工具條最左邊的按鈕序號為1。 10). 在Image框里輸入一個(gè)數(shù)，輸入為1，則顯示剛才ImageList控件里的第一個(gè)圖形，輸入為2，則顯示剛才ImageList控件里的第二個(gè)圖形。 11). 為每個(gè)按鈕重復(fù)第10步。 12). 單擊確定按鈕，現(xiàn)在Visual Basic就會(huì)在工具條上顯示精美的圖形了。 （3） 為工具條添加文本信息 在ToolBar屬性對話框中選擇Buttons標(biāo)簽，在Caption框里輸入想顯示在按鈕上的文本。 （4） 添加ToolTips ToolTips是一種當(dāng)點(diǎn)到工具按鈕時(shí)彈出的小標(biāo)簽。ToolTips很方便，可以告訴那些新手每個(gè)按鈕是干什么用的。在剛才提到的ToolBar屬性對話框中選擇Buttons標(biāo)簽，在ToolTipText框里輸入想作為ToolTip的文本。 （5） 編寫代碼 雙擊工具條，以下面的格式輸入代碼就可以了： Private Sub Toolbar1_ButtonClick(ByVal Button As Button) Select Case Button.Index Case 1 'Code to follow if user clicks the first button Case 2 'Code to follow if user clicks the second button Case 3 'Code to follow if user clicks the third button End Select End Sub 3． 創(chuàng)建進(jìn)程條 進(jìn)程條的三個(gè)屬性： (1). Min屬性代表進(jìn)程條全空時(shí)的值，缺省時(shí)為0。 (2). Max屬性代表進(jìn)程條全空時(shí)的值，缺省時(shí)為100。 (3) Value屬性代表進(jìn)程條當(dāng)前的值（不用在屬性窗口里找這個(gè)屬性，它不出現(xiàn)在屬性窗口中，但它的確存在），它大于Min屬性，小于Max屬性。改變Value屬性的值將改變進(jìn)程條的進(jìn)度顯示。 為了了解進(jìn)程條的功能，在窗體里添加一個(gè)進(jìn)程條和一個(gè)命令鈕，雙擊命令鈕進(jìn)入代碼窗口，鍵入如下代碼： Private Sub Command1_Click() If ProgressBar1.Value < ProgressBar1.Max Then ProgressBar1.Value = ProgressBar1.Value + 5 Else ProgressBar1.Visible = False ‘當(dāng)進(jìn)程條滿了的時(shí)候讓進(jìn)程條消失 End If End Sub 4． 創(chuàng)建滑塊 （1）. 選擇滑塊的外觀 1). Orientation屬性決定滑塊的方位，可以是垂直的或水平的滑塊。 2). TickStyle屬性決定滑塊標(biāo)記的樣子。 3). TickFrequency屬性規(guī)定了沿著滑塊的標(biāo)記的間隔大小，缺省的狀態(tài)是1，表明每個(gè)可能值都出現(xiàn)標(biāo)記，如果把值設(shè)置為3，則每三個(gè)可能值出現(xiàn)一個(gè)標(biāo)記。 （2） 滑塊的Min，Max，Value屬性 這三個(gè)屬性和進(jìn)程條的這三個(gè)屬性差不多，Min，Max表示滑塊的最小和最大值，Value表示進(jìn)程條的當(dāng)前值。 （3） 滑塊的LargeChange，SmallChange屬性 LargeChange規(guī)定了當(dāng)用戶用鼠標(biāo)單擊滑塊時(shí)，滑塊可移動(dòng)的距離。SmallChange規(guī)定了用戶按左箭頭或右箭頭時(shí)滑塊的移動(dòng)距離。 5. 創(chuàng)建TabStrip頁框控件 （1） 設(shè)置樣式 在TabStrip屬性窗口里選擇General標(biāo)簽，在Style列表框里選擇Tabs或Buttons樣式。 （2） 規(guī)定TabStrip的標(biāo)題和ToolTips 1). 在TabStrip屬性窗口里選擇Tabs標(biāo)簽，在Caption框里輸入標(biāo)題。 2). 在TabStrip屬性窗口里選擇Tabs標(biāo)簽，在ToolTipText框里輸入ToolTip。 （3） 增減標(biāo)簽總數(shù) 在TabStrip屬性窗口里選擇Tabs標(biāo)簽，單擊Insert Tab按鈕增加標(biāo)簽，單擊Remove Tab按鈕刪除標(biāo)簽。 （4） 在TabStrip上顯示圖形 1) 在窗體里拖入一個(gè)ImageList控件， 2) 按F4打開屬性窗口。 3) 雙擊（Custom），打開ImageListCtrl屬性窗口并選擇Image標(biāo)簽。 4) 單擊Insert Picture，在現(xiàn)在圖形的對話框里選擇想使用的位圖或圖標(biāo)，然后單擊打開按鈕。為每個(gè)想添加圖形的Tab按鈕重復(fù)此步。 5) 單擊確定按鈕�，F(xiàn)在ImageList里存儲(chǔ)了需要的圖形。 6) 選擇TabStrip，進(jìn)入TabStrip屬性窗口并選擇General標(biāo)簽，在ImageList列表框里選擇ImageList1。 7) 現(xiàn)在選擇Tabs標(biāo)簽，單擊緊挨Index框的向左或向右箭頭以選擇一個(gè)Tab序號。在Image框里輸入一個(gè)數(shù)，輸入為1，則顯示剛才ImageList控件里的第一個(gè)圖形，輸入為2，則顯示剛才ImageList控件里的第二個(gè)圖形。 8) 單擊確定按鈕。 （5） 用戶響應(yīng) 可用類似下面的代碼來識別用戶在哪一個(gè)項(xiàng)目上單擊。 Private Sub TabStrip1_Click() Select Case TabStrip1.SelectedItem.Index Case 1 'Code to follow if user clicks the first tab Case 2 'Code to follow if user clicks the second tab Case 3 'Code to follow if user clicks the third tab End Select End Sub （6） 在TabStrip上放置其它控件 在用戶選擇了標(biāo)簽后，TabStrip要求編寫代碼來顯示或隱藏控件。下面的代碼上是一個(gè)TabStrip上有一個(gè)命令鈕和一個(gè)選項(xiàng)鈕的例子，當(dāng)用戶選擇了第一個(gè)Tab時(shí)，選項(xiàng)鈕出現(xiàn)，當(dāng)用戶選擇了第二個(gè)Tab時(shí)，命令鈕出現(xiàn)。 Private Sub TabStrip1_Click() Select Case TabStrip1.SelectedItem.Index Case 1 Command1.Visible = False Option1.Visible = True Case 2 Command1.Visible = True Option1.Visible = False End Select End Sub 2.6 Visual Basic的輸入機(jī)制 程序的基本操作就是數(shù)據(jù)的輸入，數(shù)據(jù)處理和數(shù)據(jù)的輸出。Visual Basic可中用于輸入的控件主要有：文本框Text Box、復(fù)選框Check Box、選項(xiàng)按鈕Option Button、列表框List Box、組合框Combo Box、滾動(dòng)條Scroll Bar、通用對話框控件。還有一個(gè)函數(shù)叫InputBox函數(shù)，也可用于數(shù)據(jù)的輸入。 1. 通過文本框輸入數(shù)據(jù) 只要取得文本框的Text屬性就可以對其進(jìn)行操作了。下面的代碼可將Text1文本框的正文變成大寫輸出至Text2文本框。 Private Sub Form_Click () Text2.Text = UCase(Text1.Text) End Sub 2. 通過復(fù)選框和選項(xiàng)按鈕輸入數(shù)據(jù) 只要檢測到Check Box和Radio Button的Value屬性值就可以知道它們是否被選上了。 3. 通過列表框和組合框輸入數(shù)據(jù) (1) 列表框List Box和組合框Combo Box的不同 它們在Windows的Open，Save As對話框里最為常見。組合框又包括三種類型，這三種類型要在它的Style屬性里設(shè)置。列表框僅僅把可以選擇的項(xiàng)目列出來，而組合框里有的類型可以允許用戶輸入數(shù)據(jù)。它們的異同是：
(2) 列表項(xiàng)目的增減 使用AddItem，RemoveItem語句可以增減列表項(xiàng)目。通常將項(xiàng)目增減的語句放入Form_Load事件里。 ListBoxName. AddItem item ComboBoxName. AddItem item item是新項(xiàng)目名稱，必須是字符串類型，非字符串類型可通過Str函數(shù)或Format函數(shù)來轉(zhuǎn)換。 列表框，組合框的每一項(xiàng)目都有一個(gè)Index值，第一個(gè)項(xiàng)目的Index值是0，第二個(gè)是1，依此類推。刪除項(xiàng)目可通過刪除其Index值來實(shí)現(xiàn)。 ListBoxName. RemoveItem item ComboBoxName. RemoveItem item 如：ListBoxName. RemoveItem 0則刪除了第一項(xiàng)，這時(shí)原來的第二項(xiàng)就變成了第一項(xiàng)。 可以在設(shè)計(jì)階段設(shè)定列表項(xiàng)目, 方法是： 在屬性窗口選擇List屬性，將出現(xiàn)一個(gè)下拉列表，在列表中輸入第一項(xiàng)，按Ctrl+Enter，輸入第二項(xiàng)……，最后用Enter結(jié)束。 (3) 取得列表框/組合框的數(shù)據(jù) 可以通過取得Text屬性或通過取得ListIndex屬性來判斷哪一項(xiàng)被選擇了。ListIndex屬性的值也同樣是第一個(gè)為0，第二個(gè)為1……如： If List1.Text = “Visual Basic” Then Instructions If List1.ListIndex = 1 Then Instructions 組合框有時(shí)允許用戶自己輸入數(shù)據(jù)，這時(shí)所輸入數(shù)據(jù)的ListIndex值為－1。 4. 通過滾動(dòng)條Scroll Bar取得數(shù)據(jù) 在Visual Basic的工具箱里有兩種滾動(dòng)條：一種是垂直的，一種是水平的，它們的差異無非是擺放的方向不一樣。 (1) 滾動(dòng)條的主要屬性及事件 1）Min，Max屬性 Min屬性決定滾動(dòng)條最左端或最頂端所代表的值。Max屬性決定滾動(dòng)條最右端或最下端所代表的值。 2）LargeChange,SmallChange屬性 SmallChange決定在滾動(dòng)條兩端的箭頭鈕上單擊時(shí)改變的值。LargeChange決定在滑塊上方或下方區(qū)域單擊時(shí)改變的值。 3）Value屬性 Value屬性代表當(dāng)前滑塊所處位置的值，這個(gè)值由滑塊的相對位置決定。 4）Change事件 當(dāng)滑塊位置發(fā)生變化時(shí)就引發(fā)了Change事件。 (2) 取得滾動(dòng)條的數(shù)據(jù) 滾動(dòng)條并不是一個(gè)數(shù)據(jù)輸入的好控件，因?yàn)闊o法從滾動(dòng)條上直接看出輸入的數(shù)據(jù)，但它的優(yōu)點(diǎn)是可以表示一定范圍里的相對位置。為了得到數(shù)據(jù)，只要取得滾動(dòng)條的Value屬性就可以了。 5. InputBox函數(shù) InputBox函數(shù)提供一個(gè)簡單的對話框供用戶輸入信息。在把其它版本的BASIC程序移植到Visual Basic時(shí)，InputBox函數(shù)通常用來代替INPUT語句。這個(gè)對話框的樣子基本上是上面的樣子。 它的完整語法是：x = InputBox (prompt, title, default, xpos, ypos, helpfile, context) 其中，prompt是提示的字符串，這個(gè)參數(shù)是必須的。title是對話框的標(biāo)題，是可選的。default是文本框里的缺省值，也是可選的。xpos，ypos決定輸入框的位置。helpfile，context用于顯示與該框相關(guān)的幫助屏幕。返回值 x 將是用戶在文本框里輸入的數(shù)據(jù)，x是一個(gè)字符串類型的值。如果用戶按了Cancel鈕，則 x 將為空字符串。 6. 使用通用對話框控件 Windows應(yīng)用程序里的Open對話框，Save As對話框在各個(gè)應(yīng)用程序里看起來都是一樣的，通用對話框控件就可以提供這些對話框的標(biāo)準(zhǔn)功能。 (1) Open對話框及Save As對話框 打開Open對話框使用ShowOpen方法，打開Save As對話框使用ShowSave方法。 Private Sub mnuOpen_Click () On Error GoTo ErrorHandler CommonDialog1.CancelError = True CommonDialog1.Filter = "Text Files (*.txt)|*.txt|Batch Files (*.bat)|*.bat|All Files (*.*)|*.*" CommonDialog1.ShowOpen ' display Open common dialog box. Call OpenFile(CommonDialog1.FileName) ErrorHandler: Exit Sub End Sub 其中第三行決定了在文件格式類型欄里出現(xiàn)的文件類型。第五行需要一個(gè)自己的打開文件的過程，這個(gè)過程需要的參數(shù)就是通用對話框返回的文件名。通用對話框的CancelError屬性設(shè)為True的話，用戶單擊Cancel按鈕將產(chǎn)生一個(gè)錯(cuò)誤信息程序，憑借這個(gè)信息程序可以檢測到用戶的放棄操作。 (2) Color對話框 下面的過程可用用戶選擇的顏色作為窗體的底色。 Private Sub mnuColor_Click () On Error GoTo CancelButton CommonDialog1.CancelError = True CommonDialog1.ShowColor Form1.BackColor = CommonDialog1.Color CancelButton: Exit Sub End Sub (3) Fonts對話框 下面的過程可用字體對話框改變文本框的字體: Private Sub mnuFonts_Click () On Error GoTo CancelButton CommonDialog1.CancelError = True CommonDialog1.Flags = cdlCFBoth ' Flags property must be set to cdlCFBoth CommonDialog1.ShowFont ' Display Font common dialog box. Text1.FontName = CommonDialog1.FontName Text1.FontSize = CommonDialog1.FontSize Text1.FontBold = CommonDialog1.FontBold Text1.FontItalic = CommonDialog1.FontItalic Text1.FontUnderline = CommonDialog1.FontUnderline Text1.FontStrikethru = CommonDialog1.FontStrikethru Text1.ForeColor = CommonDialog1.Color CancelButton: Exit Sub End Sub 代碼的第三行出現(xiàn)了通用對話框的Flags屬性決定了通用對話框的一些可選項(xiàng)，不過即使不賦值給Flags，代碼也一樣會(huì)按缺省的情況去執(zhí)行的。 2.7 Visual Basic的輸出機(jī)制 作為輸出的對象，Visual Basic提供了標(biāo)簽，文本框，窗體，圖片框（Picture Box）等用于輸出，而且Visual Basic里也有一堆命令、屬性涉及信息的輸出，較常用的有：MsgBox函數(shù)，Print方法，Cls方法，Tab函數(shù)，Format函數(shù)，FontName，FontSize，FontBold，FontItalic，FontStrikethru，FontUnderline屬性，CurrentX，CurrentY屬性等。 1. 通過MsgBox函數(shù)輸出 了解Windows應(yīng)用程序的人都知道當(dāng)用戶操作錯(cuò)誤時(shí)，應(yīng)用程序往往打出一個(gè)消息框來提示用戶的錯(cuò)誤，象這樣： Dim Action As Integer Action = MsgBox("單擊確定鍵將引爆此計(jì)算機(jī)！", vbYesNo + vbCritical + vbDefaultButton2, "警告！") If Action = 6 Then Explode 這個(gè)功能在Visual Basic里是通過MsgBox函數(shù)來實(shí)現(xiàn)的，這樣程序員就不必自己去畫一個(gè)消息框了。語法是： Action = MsgBox (msg, type, title) 其中，msg是消息的內(nèi)容，是一個(gè)字符串型的變量，type及title參數(shù)是可以省略的，type參數(shù)指定顯示的按鈕是什么及使用什么樣的圖標(biāo)（這個(gè)參數(shù)往往讓新程序員思考幾分鐘），title參數(shù)指定消息框的標(biāo)題。type參數(shù)的含義是：
例如：Action = MsgBox (“Are you girl?”, vbYesNo + vbQuestion, “Question”)。使用這個(gè)函數(shù)時(shí)Visual Basic將產(chǎn)生一個(gè)標(biāo)題為Question，具有問號和Yes，No按鈕的消息框。作為一個(gè)函數(shù)，本質(zhì)上還是要返回值的，MsgBox的返回值確定了用戶的選擇，程序可根據(jù)返回值做出相應(yīng)的動(dòng)作。
2. Print方法，Cls方法，Tab函數(shù) (1) Print方法 Print 方法的語法是：object. Print expressionlist object表示Print作用的對象，比如是Form或者是Picture Box，object是可以省略的，省略時(shí)的Print往往在窗體上輸出。expressionlist是輸出的內(nèi)容，允許許多項(xiàng)數(shù)據(jù)的輸出，在數(shù)據(jù)間可以加入“,”或”;”。加入分號將使下一數(shù)據(jù)項(xiàng)緊挨著上一數(shù)據(jù)項(xiàng)輸出。而加入逗號，則Visual Basic將下一數(shù)據(jù)項(xiàng)在下一打印區(qū)輸出，其實(shí)就是空了幾個(gè)空格后再輸出。兩個(gè)打印區(qū)之間有14個(gè)字符的寬度，其實(shí)這也很難衡量，比如14個(gè)“W”所占的寬度大概是14個(gè)“i”所占寬度的三倍多。幸好中國日本之類的方塊字所占的寬度基本上是一樣的，所以較好處理一些。 (2) Tab函數(shù) Tab函數(shù)只用在Print方法中，它用來移動(dòng)下一個(gè)字符到打印位置，這將省去數(shù)空格的功夫。語法是：Tab (column) Tab函數(shù)將Visual Basic自定義的14字符寬的打印區(qū)扔到一邊，用自己的方式定義了新的靈活的打印區(qū)寬度。 (3) Cls方法 Cls也是一個(gè)古老的BASIC語句,原來它的作用總是把屏幕變成黑色，然后在左上角或左下角閃爍一個(gè)光標(biāo)，Visual Basic里它的作用是清除繪圖語句和Print語句產(chǎn)生的文字和圖形。 語法是：object. Cls object指清除的對象，可以是Form或Picture Box。如果object省略，通常Visual Basic都把當(dāng)前的窗口作為Cls操作的對象。 3. Format函數(shù) Format函數(shù)用于制定字符串或數(shù)字的輸出格式。語法是：x = Format (expression,fmt) expression是所輸出的內(nèi)容。fmt是指輸出的格式，這是一個(gè)字符串型的變量，這一項(xiàng)若省略的話，那么Format函數(shù)將和Str函數(shù)的功能差不多。如：
簡單地，fmt里的字符是這樣的：
Format函數(shù)也可用來對時(shí)間進(jìn)行輸出。
4. FontName，FontSize，FontBold，FontItalic，FontStrikethru，FontUnderline屬性 很明顯，這些屬性都與字體有關(guān)，許多控件都有這些屬性。通常它們在設(shè)計(jì)階段可以雙擊font屬性來設(shè)置，運(yùn)行期間可以直接設(shè)置。它們的意義是：
如：Text1.FontBold = True，將把Text1文本框的FontBold屬性設(shè)為True。 5. 窗體，圖片框的CurrentX，CurrentY屬性 這兩個(gè)不可見的屬性確定了下一次打印或繪圖的水平及垂直坐標(biāo)。如上面講的Print方法，當(dāng)expression后使用 “,” 時(shí)，Visual Basic將改變CurrentX，CurrentY值為下一打印區(qū)域開始的值，于是，輸出便指向了下一個(gè)打印區(qū)域。而Cls方法將把操作對象的CurrentX，CurrentY的值設(shè)為(0,0)。 6. 通過標(biāo)簽控件輸出 標(biāo)簽控件的特點(diǎn)是運(yùn)行時(shí)不能直接修改它，通常一個(gè)文本框旁邊都有一個(gè)標(biāo)簽用來標(biāo)識文本框。標(biāo)簽的Autosize和WordWrap屬性是一對有用且令人困惑的屬性。 |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||