第4章-VB程序設計基礎(順序結構).ppt

1、第四章VB編程基礎，VB中的程序主要參考編寫相關事件程序，本章對此進行了討論。本章是全權的重點和難點。掌握本章的學習目標：常用的輸入和輸出語句和函數。掌握三種基本控制結構和相關控制結構門。熟悉常用算法。第4章VB編程基礎，4.1 VB的程序語句規(guī)則4.2順序結構4.3選擇結構4.4循環(huán)結構4.5其他控制語句4.6集成應用程序，4.1 VB的程序語句，語句編寫規(guī)則1。VB代碼不區(qū)分字符的大小寫；系統保留字自動將每個單詞的第一個字母轉換為大寫用戶定義的變量，進程名稱作為第一個標準2 .自由創(chuàng)建門；一行可以寫多行語句，并用冒號分隔，一行接一行地連接到_=255個字符使用縮進格式反映代碼的邏輯結構和嵌

2、套關系。3 .注釋有助于程序維護和調試。完整行標題或語句后的注釋Rem完整行標題(不能添加到語句后)；方法2:使用多個字符函數實現替換功能；示例在字處理軟件中模仿字符串替換功能。text1、text3、text2、text4、Click事件、private subcommand 1 _ Click()dim S1 $、S2 $、S3 $N2 n2=false 4)基于文字的變量具有非文字類型的值，并且自動轉換為文字類型。Text1.text=12，使用賦值語句注意問題，輸入和輸出4.2.2數據，輸入數據(兩種方法)(1)使用文本框輸入數據：使用屬性Text作為輸入(2)使用函數Inputbox

3、()輸出輸入數據(使用文本框輸出數據：屬性Text可用作輸出2。使用標記輸出數據：使用屬性Caption作為輸出3。使用表單的Print方法輸出資料：輸出至表單4。使用Msgbox進程輸出數據，或使用MsgBox()函數輸出數據，文本框用于數據的輸入和輸出。文本框：屬性Text用于輸入和輸出，文本框用于數據輸出，文本框用于數據輸入和輸出。-代碼，option explicit const pi as single=3.1415926表單級別符號常量是此表單的某個事件程序中的private sub command 1 _ click()dimr % s！R=Text1。Text text1數據輸

4、入s=val(r)* val(r)* pi text 2 . text=s text 2數據輸出的end sub private sub command 2 _ click()dimrR=Text1。Text text1資料輸入的l=Val(r) * 2 * PI Text3。Text=l text3用于數據輸入的End Sub，問題：在此示例中，如何改為使用標簽作為輸出？用于數據輸出的標記、用于輸出的標記屬性Caption、用于數據輸出的標簽、用于數據輸入的文本框、用于數據輸出的文本框、用于示例輸出的標記：-(代碼：option explicit const pi as single=3.1

5、415926表單級別R=Text1。Text text1資料輸入的s=val(r)* val(r)* pi label 2 . caption=s label 2資料輸出的end sub private subcommand2 _ click()。R=Text1。Text text1資料輸入的l=val(r)* 2 * pi label 3 . caption=l label 3資料輸出的End Sub，問題：此范例如何將結果輸出至表單？Print方法用于數據的輸出。option explicit const pi as single=3.1415926表單級別符號常量是此表單的某個事件程序中

6、的private sub command 1 _ click()dimr % s！R=Text1。用于輸入Text text1數據s=Val(r) * Val(r) * PI Form1。Print圓的面積為：在表單s中輸出數據end sub private sub command 2 _ click()dimr % l！R=Text1。Text text1資料輸入的l=Val(r) * 2 * PI Form1。Print圓的周長為：l表單輸出End Sub數據，表單的Print方法使用指令1，在對象上輸出信息。格式1(最常用):物件。Print輸出列表；|，說明：對象：對象名稱，默認值為表

7、單名稱輸出列表：以逗號分隔的表達式分號：顯示的最后一個字符后的位置逗號：下一個打印區(qū)域開始(每列14個)如果Print語句末尾沒有分號或逗號，輸出后將自動換行，對象。PrintSpc(n)|Tab(n)輸出列表；|，說明：對象：對象名稱，默認值為表單名稱輸出列表：以逗號分隔的表達式分號：顯示的最后一個字符后的位置逗號：下一個打印區(qū)域開頭的位置(每列14列)如果Print語句末尾沒有分號或逗號，則輸出后自動換行Spc(n)函數：從當前位置開始插入n個空格制表符(n然后顯示5個空格。顯示收到apple # private sub command 1 _ click()print form 1 .

8、print tab(5)的章節(jié)sanfeng。張三豐接受了道歉；空間(5)；Zhang sanfeng接收apple end sub，print方法的示例，例如在第2行的第3列中顯示5 *，6個空格，2個# print tab (3)。字串(5，*)；SPC(6)；String(2，#)、Print方法示例、4.2.2數據的輸入和輸出、使用輸入輸出函數輸入數據(1)使用輸入函數Inputbox()輸入數據(2)使用輸出MsgBox進程輸出數據(3)輸出，(1)使用輸入函數Inputbox()輸入數據。打開等待用戶輸入的對話框，返回字符串類型的輸入值。格式：InputBox(提示信息、對話框標題

9、、默認值)，如果要導入的數據經常是數據，有時可以將該數據設置為默認值以減少輸入量。標題顯示在對話框的標題區(qū)域(如省略)，標題區(qū)域顯示項目名稱。提示輸入要輸入的數據，引號引起的InputBox使用準則1 -最簡單的形式，最簡單的使用形式：InputBox(提示信息)InputBox(輸入邊長度a:)，項目名稱，InputBox使用準則-簡單A=val(InputBox(輸入邊長度a:)，專案名稱，使用InputBox的描述2 -完整格式，InputBox(提示資訊、標題、預設)范例：Dim aA=Val(InputBox)(輸入邊長a:輸入，10)三角形面積計算：3條邊長，t=(a b c)/2

10、，s=，InputBox，b！c！t！s！A=Val(輸入邊長度a :)b=Val(輸入邊長度b :)c=Val(輸入邊長度c :)Print三角形的三條邊為：a、b、c Form1。Print三角形的面積為：s End Sub，相同：但是，界面發(fā)生變化，因此編寫程序以查找三角形區(qū)域。三角形面積計算：輸入3條邊的長度。單擊t=(a b c)/2 s=輸入按鈕，然后輸入3條邊的長度。單擊“計算”按鈕將計算結果輸出到表格。代碼：option explict dima！b！c！private sub command 1 _ click()a=Val(輸入邊長度a 3360)b=Val(輸入邊長度b

11、3360)c，s！t=(a b c)/2s=sqr(t *(t-a)*(t-b)*(t-c)form 1 . print三角形的三條邊分別為：a、bPrint三角形的面積為：s End Sub，表單級別變量：在該表單的所有過程中都有效！流程級別變量：僅在定義過程中有效！不能省略提示條目。要顯示多行提示，請在每行末尾添加回車vbCrLf。例如：a=InputBox(輸入本月的薪金金額)，InputBox的提示參數請參閱：InputBox實例(有點，可以自行學習)，實例：生成程序，如圖所示。要求：單擊數字輸入按鈕時，兩次彈出輸入框，在表單中輸出相關信息，以便用戶輸入數據。單擊“總計”按鈕以合計和顯

12、示輸入的值。單擊“查找平均值”按鈕以計算并顯示輸入的值的平均值。option explicit dima%，b % private sub command 1 _ click()a=val(輸入inputbox(輸入a 3360)b=vala，b end sub private sub command 2 _ click()dims % s=a b form 1 . print已輸入數值的總和。s end sub private sub command 3 _ click()dimaver！Aver=(a b)/2 Form1。Print用戶輸入的值的平均值為：使用Aver End Sub、代

13、碼：進程或函數輸出數據(2)使用MsgBox進程輸出數據(3)函數MsgBox()輸出數據(2)(3)MsgBox進程和MsgBox函數，MsgBox函數MsgBox函數返回選定按鈕的值，MsgBox進程不返回值。MsgBox按鈕設置，MsgBox進程使用說明-最小格式，使用最小格式-僅提示信息：例如：MsgBox密碼錯誤！跳過按鈕值-僅確定按鈕，跳過按鈕值0對話框標題-將項目名稱作為標題，MsgBox流程使用說明-整個表單，例如：MsgBox密碼錯誤！1，確認密碼”，MsgBox進程使用說明-完整格式，如MsgBox密碼錯誤！2，確認密碼，3。MsgBox流程使用說明-您可以將整個表單、按鈕值添加到圖標類型值。示例：MsgBox密碼錯誤！2 48，密碼驗證或(等效):MsgBox密碼錯誤！2vb exchlamation、確認密碼或(等效):MsgBox密碼錯誤！vbabortretryignore VB excellation，密碼驗證，例如，通過Msgbox進程輸出計算結果，三角面積計算：t=(a b c)/2，s=，代碼：Private，b！c！t！s！A=Val(輸入邊長度a :)b=Val(輸入邊長度b :)c=