Visual Basic程序設(shè)計(jì)簡明教程（第二版）課件第3章

1第3章順序結(jié)構(gòu)本章內(nèi)容：

數(shù)據(jù)輸入

數(shù)據(jù)輸出

標(biāo)簽

文本框

命令按鈕

程序舉例2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》23.1數(shù)據(jù)輸入VB程序的執(zhí)行則采用事件驅(qū)動(dòng)機(jī)制，由用戶或者系統(tǒng)觸發(fā)某個(gè)事件去執(zhí)行相應(yīng)的事件過程。盡管事件處理過程之間并無特定的執(zhí)行順序，但是每個(gè)事件過程的內(nèi)部卻依然包含著順序、選擇和循環(huán)三種基本控制結(jié)構(gòu)。

順序結(jié)構(gòu)是結(jié)構(gòu)化程序設(shè)計(jì)中最基本的控制結(jié)構(gòu)之一，其語句按照書寫的順序依次逐條執(zhí)行。

2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》33.1數(shù)據(jù)輸入——InputBox函數(shù)調(diào)用InputBox函數(shù)時(shí)，系統(tǒng)將彈出一個(gè)輸入對話框。InputBox函數(shù)的格式：InputBox(Prompt[,Title][,Default][,…])說明：（1）InputBox函數(shù)返回一個(gè)字符串，該字符串就是用戶在對話框中輸入的數(shù)據(jù)。（2）參數(shù)Prompt是必選項(xiàng)，它是一個(gè)字符串，用于提示用戶當(dāng)前應(yīng)輸入哪些數(shù)據(jù)。（3）Title和Default這兩個(gè)參數(shù)均為可選項(xiàng)，前者作為對話框的標(biāo)題，后者作為對話框的默認(rèn)輸入內(nèi)容。（4）如果位于參數(shù)列表中間的可選項(xiàng)參數(shù)被省略，則必須用逗號標(biāo)示這些被省略的參數(shù)。2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》4舉例：DimnameAsString,scoreAsIntegername=InputBox(“請輸入學(xué)生的姓名”,“姓名輸入”)’省略了默認(rèn)值score=Val(InputBox("請輸入學(xué)生的成績",,80))’省略了標(biāo)題2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》53.1數(shù)據(jù)輸入——文本框控件

用戶可以在文本框控件中輸入數(shù)據(jù)，然后在程序中通過賦值語句把它賦給某個(gè)變量。一般形式：變量=文本框?qū)ο?text舉例：DimnameAsString,scoreAsIntegername=Text1.text’輸入學(xué)生的姓名

score=Val(Text2.text))’輸入學(xué)生的成績返回2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》63.2數(shù)據(jù)輸出——標(biāo)簽控件一般形式：標(biāo)簽對象.caption=表達(dá)式Label1.caption=name’輸出學(xué)生的姓名Label2.caption=Str(score)’輸出學(xué)生的成績。3.2數(shù)據(jù)輸出——文本框控件一般形式：文本框?qū)ο?text=表達(dá)式

Text1.text=name’輸出學(xué)生的姓名

Text2.text=Str(score)’輸出學(xué)生的成績文本框控件既可以用于輸入數(shù)據(jù)，也可以用于輸出數(shù)據(jù)，這取決于控件對象是作為賦值運(yùn)算符的左操作數(shù)還是右操作數(shù)。2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》73.2數(shù)據(jù)輸出——

MsgBox函數(shù)l調(diào)用MsgBox函數(shù)時(shí)，系統(tǒng)將彈出一個(gè)消息對話框，該對話框能夠顯示一些提示性的信息，并接收用戶做出的選擇。MsgBox函數(shù)的格式：

MsgBox(Prompt[,Buttons][,Title][,…])

2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》8說明：（1）參數(shù)Prompt是必選項(xiàng)，它是一個(gè)字符串，可以作為輸出的數(shù)據(jù)。（2）參數(shù)Buttons和參數(shù)Title均為可選項(xiàng)，前者是一個(gè)整型表達(dá)式，確定了消息對話框的類型；后者作為對話框的標(biāo)題。Buttons的默認(rèn)值是vbOKOnly，實(shí)際設(shè)置時(shí)可以由4個(gè)分組值相加而成。例如彈出一個(gè)采用應(yīng)用模式的消息對話框，顯示“終止”、“重試”和“忽略”按鈕，圖標(biāo)為嚴(yán)重錯(cuò)誤信息，默認(rèn)是第一個(gè)按鈕，Buttons的值可以寫為2+16+0+0，也可以直接寫為18。（3）MsgBox函數(shù)返回一個(gè)整數(shù)，該整數(shù)代表用戶在對話框中選中的按鈕。如果在函數(shù)調(diào)用時(shí)只給出第一個(gè)參數(shù)（Prompt）的值，就不必使用賦值語句；如果明確給出了其它參數(shù)的值，則必須用賦值語句把函數(shù)的返回值予以保存。2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》9舉例：DimnameAsString,scoreAsIntegername="宋開莉"score=80MsgBox("學(xué)生姓名："&name&vbCr&"學(xué)生成績："&score)

2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》103.2數(shù)據(jù)輸出——

Print方法Print的功能是在對象上輸出信息，其中對象可以是窗體、圖片框、立即窗口和打印機(jī)。Print方法的格式：

[對象.]Print[表達(dá)式列表][;|,]2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》11說明：（1）調(diào)用Print方法時(shí)如果未給出對象名，則默認(rèn)對象是窗體。（2）表達(dá)式列表是可選項(xiàng)，如果省略則輸出一個(gè)空行。Print輸出信息之后通常將會(huì)自動(dòng)換行，如果語句末尾有分號（;）或者逗號（,），則表示不換行。（3）表達(dá)式列表中可以有多個(gè)表達(dá)式，表達(dá)式之間用空格、分號或者逗號分隔，其中空格和分號的效果相同。如果是數(shù)值表達(dá)式，就輸出它的值；如果是字符串，則原樣輸出。（4）如果用分號（;）分隔表達(dá)式，按照緊湊格式輸出數(shù)據(jù)；如果用逗號（,）分隔表達(dá)式，按照標(biāo)準(zhǔn)格式輸出數(shù)據(jù)，此時(shí)當(dāng)前數(shù)據(jù)項(xiàng)在下一個(gè)輸出區(qū)中顯示。2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》12舉例：DimnameAsString,scoreAsIntegername="宋開莉"score=80Print"學(xué)生姓名：";’不換行

PrintnamePrint"學(xué)生成績：";score2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》13相關(guān)函數(shù)：1．Spc函數(shù)

Spc函數(shù)的功能是在當(dāng)前輸出位置插入指定數(shù)量的空格，其格式是：Spc(n)2．Tab函數(shù)

Tab函數(shù)的功能是將當(dāng)前輸出位置定位至指定的地方，其格式是：Tab(n)DimnameAsString,scoreAsIntegername="宋開莉"score=80Print"學(xué)生姓名：";PrintSpc(5);namePrint"學(xué)生成績：";Tab(15);score2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》14相關(guān)函數(shù)：3.Format函數(shù)Format函數(shù)一般用于Print方法中，可以使得數(shù)值、字符串或者日期按指定的格式輸出。Format函數(shù)的格式：

Format(表達(dá)式[,格式字符串])PrintFormat(3.14159,"00.000")’輸出結(jié)果為03.142PrintFormat(3.14159,"##.###E+##")’輸出結(jié)果為31.416E-1返回2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》153.3標(biāo)簽

標(biāo)簽（Label）控件能夠顯示一些用戶無法直接更改的文本信息，它通常作為一種輔助性的控件，用來標(biāo)注那些自身不具備Caption屬性的控件。在工具箱中表示為：標(biāo)簽的常用屬性屬性作用Name設(shè)置標(biāo)簽的對象名Caption設(shè)置標(biāo)簽所顯示的文本信息Alignment設(shè)置標(biāo)簽上文本的對齊方式BackStyle確定標(biāo)簽的背景是否透明，默認(rèn)值是1，表示不透明BorderStyle設(shè)置標(biāo)簽的邊框類型，默認(rèn)值是0，表示無邊框AutoSize確定是否根據(jù)標(biāo)簽上文本的長度自動(dòng)調(diào)整標(biāo)簽自身的尺寸，默認(rèn)值是FalseWordWrap確定是否根據(jù)標(biāo)簽上文本的長度自動(dòng)換行，默認(rèn)值是False2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》16說明：（1）程序第一個(gè)標(biāo)簽控件的默認(rèn)對象名是Label1，依次類推。（2）Caption是標(biāo)簽控件最重要的屬性之一，其屬性值是一個(gè)字符串，即顯示的文本，最多允許有1024個(gè)字符。返回2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》173.4文本框文本框（TextBox）控件是一種常用的標(biāo)準(zhǔn)控件，兼?zhèn)鋽?shù)據(jù)輸入和輸出的功能，還提供了插入、選擇以及復(fù)制等文本編輯手段。在工具箱中表示為：文本框的常用屬性屬性作用Name設(shè)置文本框的對象名Text設(shè)置文本框所顯示的文本信息MaxLength設(shè)置文本框所顯示的文本信息的最大長度，默認(rèn)值是0，表示長度不受限制MultiLine確定文本框能否輸入多行文本，默認(rèn)值是False，表示只允許輸入單行文本ScrollBars確定文本框能否有滾動(dòng)條PasswordChar設(shè)置密碼符號，默認(rèn)值是空串SelText確定當(dāng)前所選的文本SelStart確定所選文本的開始位置，如果未選中文本，則為插入點(diǎn)的位置SelLength確定所選文本的長度2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》18說明：（1）程序第一個(gè)文本框控件的默認(rèn)對象名是Text1，依次類推。（2）Text是文本框控件最重要的屬性之一，其屬性值是一個(gè)字符串，即顯示的文本。只允許輸入單行文本時(shí)，最多可以有2048個(gè)字符；如果允許輸入多行文本，則最多可以有32K個(gè)字符。2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》19文本框的常用事件：事件來源Change文本框的Text屬性值發(fā)生改變GotFocus文本框獲得焦點(diǎn)LostFocus文本框失去焦點(diǎn)KeyPress用戶按下并且釋放鍵盤上的一個(gè)鍵2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》20說明：（1）當(dāng)用戶在文本框中輸入新內(nèi)容，或者程序運(yùn)行時(shí)修改了Text屬性值，都會(huì)自動(dòng)觸發(fā)Change事件。（2）只有對象的Enabled和Visible的屬性值是True時(shí)，它才有獲得焦點(diǎn)的能力。在程序運(yùn)行時(shí)，用戶可以通過鼠標(biāo)單擊或者按Tab鍵切換，使某個(gè)控件獲得焦點(diǎn)。（3）當(dāng)用戶按下并且釋放鍵盤上的一個(gè)鍵，將會(huì)觸發(fā)焦點(diǎn)所在控件的KeyPress事件。該事件返回所輸入字符的Unicode碼，在程序中加以判斷，就會(huì)識(shí)別出用戶剛才按下了哪個(gè)鍵。2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》21例3.1：在文本框中輸入密碼，然后單擊窗體，在標(biāo)簽中顯示該密碼。完成步驟：新建一個(gè)工程，在窗體上分別創(chuàng)建2個(gè)標(biāo)簽、1個(gè)文本框和1個(gè)命令按鈕。在屬性窗口中對窗體和控件的屬性進(jìn)行設(shè)置。文本框的PasswordChar屬性值設(shè)置為“*”，表示輸入的字符都顯示為“*”；標(biāo)簽Label2的BorderStyle屬性值設(shè)置為1，表示該標(biāo)簽有邊框。2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》22PrivateSubForm_Click()Label2.Caption="您輸入的密碼是："+Text1.TextEndSubPrivateSubCommand1_Click()EndEndSub代碼及實(shí)現(xiàn)結(jié)果：返回2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》233.5命令按鈕命令按鈕（CommandButton）控件通常用來接受用戶的操作命令，一般通過單擊命令按鈕來觸發(fā)事件過程，執(zhí)行指定的操作，從而實(shí)現(xiàn)特定的功能。在工具箱中表示為：命令按鈕的常用屬性屬性作用Name設(shè)置命令按鈕的對象名Caption設(shè)置命令按鈕的標(biāo)題Default確定命令按鈕是否為Enter鍵的默認(rèn)按鈕Cancel確定命令按鈕是否為Esc鍵的默認(rèn)按鈕Enabled確定命令按鈕是否有效，默認(rèn)值是True，表示有效Visible確定命令按鈕是否可見，默認(rèn)值是True，表示可見Style設(shè)置命令按鈕的外觀，默認(rèn)值是0，表示只能顯示文字Picture設(shè)置命令按鈕上顯示的圖片文件2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》24說明：（1）程序第一個(gè)命令按鈕控件的默認(rèn)對象名是Command1，依次類推。（2）設(shè)置Caption屬性時(shí)，在標(biāo)題的某個(gè)字母前插入一個(gè)連接符（&），即可為命令按鈕設(shè)置快捷鍵。（3）當(dāng)某個(gè)命令按鈕的Default屬性值為True時(shí)，按下Enter鍵就相當(dāng)于用鼠標(biāo)單擊了該按鈕；當(dāng)某個(gè)命令按鈕的Cancel屬性值為True時(shí)，按下Esc鍵就相當(dāng)于用鼠標(biāo)單擊了該按鈕。（4）當(dāng)某個(gè)命令按鈕的Enabled屬性值是False時(shí)，它就會(huì)失效并呈灰色，此時(shí)既不能接受用戶的操作命令，也不能響應(yīng)事件。當(dāng)某個(gè)命令按鈕的Visible屬性值是False時(shí)，它在程序運(yùn)行時(shí)將不會(huì)顯示在窗體中。（5）當(dāng)Style屬性值是1時(shí)，表示在命令按鈕上可以顯示圖形。此時(shí)即可在Picture屬性中選擇圖片文件，程序運(yùn)行時(shí)該命令按鈕就會(huì)成為圖形按鈕。返回2023/12/18《VisualBasic程序設(shè)計(jì)簡明教程》253.6程序舉例——例3.2：輸入3位學(xué)生的成

績，求其平均值。新建一個(gè)工程，在窗體上分別創(chuàng)建1個(gè)標(biāo)簽、1個(gè)文本框和2個(gè)命令按鈕，并設(shè)置屬性值。代碼：PrivateSubCommand1_Click()Dimnum1As