單擊按鈕執(zhí)行操作

　　　　使用戶與應(yīng)用程序交互的最簡便的方法是給用戶提供一個(gè)按鈕。可以用VisualBasic提供的CommandButton控件，或利用包含圖形的Image控件，如一個(gè)圖標(biāo)，來創(chuàng)建自己的“按鈕”。

　　　　使用CommandButton
　　　　大多數(shù)VisualBasic應(yīng)用程序都有CommandButton，使用戶通過簡單的敲擊按鈕來執(zhí)行操作。當(dāng)用戶選中按鈕時(shí)，不僅會執(zhí)行相應(yīng)操作，還會使該按鈕看上去象被按下并釋放一樣。無論何時(shí)，只要用戶單擊按鈕，就會調(diào)用Click事件過程。將代碼寫入Click事件過程，執(zhí)行想要執(zhí)行的動作。
　　　　在程序執(zhí)行時(shí)，有多種方法可以選中CommandButton：
　　　　用鼠標(biāo)單擊按鈕。
　　　　按TAB鍵把焦點(diǎn)移到相應(yīng)按鈕上，然后按SPACE鍵或ENTER鍵選中該按鈕。參閱本章后面的“焦點(diǎn)概述”。
　　　　按CommandButton的快捷鍵（ALT 下劃線的字符）。
　　　　在代碼中設(shè)CommandButton的Value屬性為True。cmdClose.Value=True
　　　　在代碼中調(diào)用CommandButton的Click事件。cmdClose_Click
　　　　如果該CommandButton是窗體的缺省命令按鈕，既使將焦點(diǎn)移到其它不是CommandButton的控件上，按下回車鍵也會選中該按鈕。在設(shè)計(jì)時(shí)，通過設(shè)置某按鈕的Default屬性為True，指定它為窗體的缺省CommandButton。
　　　　如果該CommandButton是窗體的缺省的取消按鈕，即使把焦點(diǎn)移到其它控件上，也能通過按ESC鍵選中該按鈕。在設(shè)計(jì)時(shí)，通過設(shè)置某按鈕的Cancel屬性為True，指定它為窗體的缺省的取消按鈕。所有這些操作都使VisualBasic調(diào)用Click事件過程。

　　　　“測試按鈕”應(yīng)用程序
　　　　利用Caption屬性可以在按鈕上顯示文字，告訴用戶該按鈕的功能。在圖3.4中，在控件示例應(yīng)用程序的測試按鈕范例中包含一個(gè)Caption屬性為"ChangeSignal"的CommandButton（此例的工作為Controls.vbp示例應(yīng)用程序中的Buttons.frm）。
　　　　注意，S是這個(gè)按鈕的快捷鍵，用一條下劃線表示。在Caption屬性的正文內(nèi)插入一個(gè)(&)符號，將使得此符號后面的字符成為該按鈕的快捷鍵（例如，Change&Signal）。
　　　　用戶單擊CommandButton，將執(zhí)行該CommandButton的Click事件過程中的代碼。在這個(gè)范例中，每次單擊按鈕，將變換一個(gè)不同的交通燈圖標(biāo)。
　　　　詳細(xì)信息關(guān)于CommandButton的屬性的詳細(xì)信息，請參閱第七章“使用VisualBasic的標(biāo)準(zhǔn)控件”。

用于顯示和輸入文本的控件

　　　　Label和TextBox控件是用于顯示和輸入文本的。讓應(yīng)用程序在窗體中顯示文本時(shí)使用Label，允許用戶輸入文本時(shí)用TextBox。Labels中的文本為只讀文本，而TextBox中的文本為可編輯文本。
　　　　可由用戶編輯的文本，例如一個(gè)順序條目　　　　　TextBox
　　　　字段或一個(gè)密碼框
　　　　只能顯示的文本，例如在窗體中標(biāo)識一個(gè)　　　　　Label
　　　　字段或給用戶顯示指令

　　　　Labels和TextBoxes將在以下部分討論：
　　　　　用Label顯示文本（vbconUsingLabels）使用Label控件的基本知識。
　　　　　使用TextBox（vbconWorkingWithTextBox）使用TextBox的基本知識。

　　　　用Label顯示文本
　　　　Label控件顯示的文本用戶不能直接修改。如TextBox和ScrollBar這些沒有自己的Caption屬性的控件，可以用Label標(biāo)識。在Label中實(shí)際顯示的文本是由Caption屬性控制的，該屬性可以在設(shè)計(jì)時(shí)在“屬性”窗口中設(shè)置或在運(yùn)行時(shí)用代碼賦值。
　　　　在缺省情況下，標(biāo)題是Label控件中唯一的可見部分。但是，如果把BorderStyle屬性設(shè)成1（可以在設(shè)計(jì)時(shí)進(jìn)行），那么Label就有了一個(gè)邊框，看起來像一個(gè)TextBox。還可以通過設(shè)置Label的BackColor、BackStyle、ForeColor和Font屬性來，改變Label的外觀。

　　　　改變Label尺寸以適應(yīng)其內(nèi)容
　　　　設(shè)計(jì)時(shí)可在“屬性”窗口中指定單行Label的標(biāo)題。但是如果要輸入一個(gè)較長的或在運(yùn)行時(shí)可能變化的標(biāo)題，該怎么辦呢?Label提供了兩種屬性：AutoSize和WordWrap，用于幫助您改變控件尺寸以適合較長或較短的標(biāo)題。
　　　　AutoSize屬性決定控件是否自動改變尺寸以適應(yīng)其內(nèi)容。如該屬性設(shè)為True，Label就會根據(jù)其內(nèi)容進(jìn)行水平方向變化，如圖3.5所示。

　　　　WordWrap屬性使Label根據(jù)其內(nèi)容進(jìn)行垂直方向變化，而保持其寬度不變，如圖3.6所示。本例的工作版，請參閱應(yīng)用程序示例Controls.vbp中的WordWrap.frm。
　　　　注意如果在Controls.vbp中運(yùn)行AotoSize示例，就會發(fā)現(xiàn)為了同時(shí)使用WordWrap，必須兩個(gè)復(fù)選框都選中。這是因?yàn)椋胧筁abel的WordWrap屬性起作用，就必須設(shè)置AutoSize為True。只有在一個(gè)單字的寬度超過控件的當(dāng)前寬度時(shí)，Label的寬度才會增加。
　　　　詳細(xì)信息關(guān)于Label控件屬性的詳細(xì)信息，請參閱第七章“使用VisualBasic的標(biāo)準(zhǔn)控件”。

　　　　使用TextBoxes
　　　　TextBox是一種通用控件，可以由用戶輸入文本或顯示文本。除非把TextBox的Locked屬性設(shè)為True，否則不能用TextBox顯示不希望用戶更改的文本。
　　　　TextBox中顯示的實(shí)際文本是受Text屬性控制的。Text屬性可以用三種方式設(shè)置：設(shè)計(jì)時(shí)在“屬性”窗口進(jìn)行、運(yùn)行時(shí)通過代碼置或在運(yùn)行時(shí)由用戶輸入。通過讀Text屬性能在運(yùn)行時(shí)檢索TextBox的當(dāng)前內(nèi)容。
　　　　多行TextBox和WordWrap
　　　　TextBox在缺省情況下只顯示單行文本，且不顯示ScrollBar。如果文本長度超過可用空間，則只能顯示部分文本。通過設(shè)置MultiLine和ScrollBars兩種屬性（只能在設(shè)計(jì)程序時(shí)設(shè)置），可以改變TextBox的外觀和行為。
　　　　注意不要把ScrollBars屬性與ScrollBar控件混淆，ScrollBar控件并不屬于TextBox，它具有自己的屬性集。
　　　　把MultiLine屬性設(shè)為True，可以使TextBox在運(yùn)行時(shí)接受或顯示多行文本。只要沒有水平方向ScrollBar，多行TextBox中的文本會自動按字換行。ScrollBars屬性的缺省值被設(shè)置為0（None）。自動按字換行省去用戶在行尾插入換行符的麻煩。當(dāng)一行文本已超過所能顯示的長度時(shí)，TextBox自動將文本折回到下一行顯示。
　　　　在設(shè)計(jì)時(shí)，不能在“屬性”窗口輸入換行符。在過程中，可以通過插入一個(gè)回車加上換行符（ANSI字符13和0）來產(chǎn)生一個(gè)行斷點(diǎn)。也可以用常量vbCrLf插入一個(gè)回車與換行符組合。例如，下面的事件過程是在加載窗體時(shí)，把兩行文本放入一個(gè)多行TextBox(Text1)中的示例。
　　　　SubForm_Load()
　　　　　　Text1.Text="Herearetwolines"_
　　　　　　&vbCrLf&"inatextbox"
　　　　EndSub

　　　　使用TextBox中的文本
　　　　利用TextBox的SelStart、SelLength和SelText屬性，可以控制TextBox的插入點(diǎn)和選擇行為。這些屬性僅能在運(yùn)行時(shí)使用。
　　　　當(dāng)一個(gè)TextBox首次得到焦點(diǎn)時(shí)，TextBox缺省的插入點(diǎn)和光標(biāo)位置在文本的最左邊。用戶可以用鍵盤和鼠標(biāo)移動它們。當(dāng)TextBox失去焦點(diǎn)而后再得到時(shí)，插入點(diǎn)位置與用戶最后設(shè)置的位置一樣。
　　　　在有些情況下，它可能與用戶設(shè)置不一致。如：在字處理應(yīng)用程序中，用戶會希望新字符出現(xiàn)在已有文本后面；在數(shù)據(jù)項(xiàng)應(yīng)用程序中，用戶會希望他的輸入替換原有條目。使用SelStart和SelLength屬性，用戶可以根據(jù)需要改變TextBox的行為。
　　　　SelStart屬性是一個(gè)數(shù)字，指示文本串內(nèi)的插入點(diǎn)，其中0表示最左邊的位置。如果SelStart屬性值大于或等于文本中的字符數(shù)，那么插入點(diǎn)將被放在最后一個(gè)字符之后，如圖3.7所示。該例子的工作版，請參閱應(yīng)用程序示例Controls.vbp中的Text.frm。　　　　SelLength屬性是一個(gè)設(shè)置插入點(diǎn)寬度的數(shù)值。把SelLength設(shè)為大于0的值，會選中并突出顯示從當(dāng)前插入點(diǎn)開始的SelLength個(gè)字符。圖3.8顯示選擇的性能。
　　　　如果有一段文本被選中，此時(shí)用戶鍵入的文字將替換被選中的文本。有些情況下，也可以用粘貼命令用新文本替換原有的文本。SelText屬性是一串文本，可以在運(yùn)行時(shí)給它賦值以替換當(dāng)前選中的文本。如果沒有選中的文本，SelText將在當(dāng)前插入點(diǎn)插入文本。
詳細(xì)信息關(guān)于TextBox控件的屬性的詳細(xì)信息，請參閱第七章“使用VisualBasic的標(biāo)準(zhǔn)控件”。
　　　　

　　　　詳細(xì)信息關(guān)于TextBox控件的屬性的詳細(xì)信息，請參閱第七章“使用VisualBasic的標(biāo)準(zhǔn)控件”。