【正文】 之間用逗號分隔，則按標準輸出格式（分區(qū)輸出格式）顯示數據項。如果各輸出項之 間用分號或空格作為分隔符，則按緊湊輸出格式輸出數據。 （ 4） Print方法具有計算和輸出雙重功能，對于表達式，它先計算后輸出。 （ 5）在一般情況下，每執(zhí)行一次 Print方法要自動換行 （ 6） Print方法在 Form_Load事件過程中不起作用。 與 Print方法有關的函數 ? 1. Tab函數 格式： Tab(n) ? Tab函數把光標移到由參數 n指定的列，從這個位置開始輸出信息。要輸出的內容放在 Tab函數的后面，并用分號隔開。 ? （ 1）參數 n為數值表達式，其值為一整數，它是下一個輸出位置的列號，表示在輸出前把光標（或打印頭）移到該列 ? （ 2）對參數 n的取值范圍沒有具體限制。當 n比行寬大時，顯示位置為 n Mod 行寬 ? （ 3）當在第一個 Print方法中有多個 Tab函數時，每個 Tab函數對應一個輸出項，各輸出項之間用分號隔開。 與 Print方法有關的函數 ? 例 打印如下的人員名冊 與 Print方法有關的函數 例 代碼： Private Sub Form_Click() FontName = 隸書 39。 字體類型為 “ 宋體 ” FontSize = 16 39。 字體大小為 12 FontBold = True 39。 字體為粗體 Print 姓名 。 Tab(8) Print 部門 。 Tab(16)。 職務 。 Tab(16) Print Print 張三 。 Tab(8)。 科研室 。 Tab(16)。 科長 。 Tab(16) Print 李四 。 Tab(8)。 人力部 。 Tab(16)。 部長 。 Tab(16) End Sub 與 Print方法有關的函數 ? 2. Spc函數 格式： Spc(n) ? 在 Print的輸出中，用 Spc函數可以跳過 n個空格。 ? （ 1）參數 n是一個數值表達式，其取值范圍為0~32767的整數。 Spc函數與輸出項之間用分號隔開 ? （ 2） Spc函數和 Tab函數作用類似，而且可以互相代替。但應注意， Tab函數需要從對象的左端開始計數，而 Spc函數只表示兩個輸出項之間的間隔。 與 Print方法有關的函數 ? 3. 空格函數 格式： Space$ ? Space$函數返回 n個空格。 例如（在 “ 立即 ” 窗口中試驗）： x$ = ab + Space(8) + bc― print x$ ? 顯示 ab bc 格式輸出 ? 用格式輸出函數 Format$可以使數值或日期按指定的格式輸出。一般格式為： Format$（數值表達式，格式字符串） ? 該函數的功能是：按 “ 格式字符串 ” 指定的格式輸出 “ 數值表達式 ” 的值。 格式輸出 ? 用 Format$函數可以使數值按 “ 格式字符串 ”指定格式輸出，包括在輸出字符串前加 $、字符串前或后補充 0及加千位分隔符等。 格式說明字符 其他方法和屬性 ? 1. Cls方法 格式： [對象 .]Cls ? Cls清除由 Print方法顯示的文本或在圖片框中顯示的圖形，并把光標移到對象的左上角（ 0， 0）。這里的 “ 對象 ” 可以是窗體或圖片框，如果省略 “ 對象 ” 則清除當前窗體內的顯示內容。 其他方法和屬性 ? 2. Move方法 格式： [對象 .]Move 左邊距離 [,上邊距離 [,寬度 [,高度 ]]] ? Move方法用來移動窗體和控件，并可改變其大小。其中 “ 對象 ” 可以是窗體及除計時器(Timer)、菜單 (Menu)之外的所有控件，如果省略 “ 對象 ” ，則表示要移動的是窗體。 “ 左邊距離 ” ， “ 上邊距離 ” 、 “ 寬度 ” 及 “ 高度 ”均以 twip為單位。如果 “ 對象 ” 是窗體，則“ 左邊距離 ” 和 “ 上邊距離 ” 均以屏幕左邊界和上邊界為準；如果 “ 對象 ” 是控件，則以窗體的左邊界和上邊界為準 其他方法和屬性 ? 例 在窗體的任意位置畫一個文本框和一個圖片框（大小任意）。編寫程序移動它們的位置并改變其大小。 其他方法和屬性 ? 例 代碼 Private Sub Form_Click() Move 400, 500, 4000, 2021 100, 200, 1000, 1500 1200, 200, 1000, 2021 Picture1 End Sub 其他方法和屬性 ? 3. TextHeight和 TextWidth方法 格式： [對象 .]TextHeight（字符串） [對象 .]TextWidth（字符串） ? 這兩個方法用來輔助設置坐標。其中 TextHeight方法返回一個文本字符串的高度值，而 TextWidth方法則返回一個文本字符串的寬度值，它們的單位均為 twip。當字符串的字形和大小不同時，所返回的值也不一樣。 “ 對象 ” 包括窗體和圖片框，如果省略 “ 對象 ” ，則用來測試當前窗體中的字符串。 其他方法和屬性 ? 例 編寫程序，試驗 TextHeight方法。 Private Sub Form_Click() Print Visual Basic CurrentY = TextHeight(Visual ) * 8 39。 下一個輸出位置的 Y坐標 CurrentX = 0 39。 下一個輸出位置的 X坐標 Print Visual Basic Print Text$ = VB Print Text$ Print TextHeight(Text$),TextWidth (Text$) FontSize = 16 ’設置字體大小 Print Print Text$ Print TextHeight(Text$),TextWidth (Text$) End Sub 其他方法和屬性 ? 例 編寫程序，使字符串居中顯示。 Private Sub Form_Click() FontSize = 24 Sample$ = Visual Basic程序設計 x = (ScaleWidth TextWidth(Sample$))/2 y = (ScaleHeight TextHeight(Sample$))/2 CurrentX = x CurrentY = y Print Sample$ End Sub 數據輸入 —InputBox函數 ? InputBox函數可以產生一個對話框，作為輸入數據的界面，等待用戶輸入數據，并返回所輸入的內容。其格式為： InputBox(prompt[,title][,default] [,xpos,ypos][,helpfile,context]) 數據輸入 —InputBox函數 ? 該函數有 7個參數，其含義如下 : ? （ 1） prompt：是一個字符串，其長度不得超過 1024個字符，它是在對話框內顯示的信息，用來提示用戶輸入。 ? （ 2） title：字符串，它是對話框的標題，顯示在對話框頂部的標題區(qū)。 ? （ 3） default：字符串，用來顯示輸入緩沖區(qū)的默認信息。 ? （ 4） xpos， ypos：是兩個整數值，分別用來確定對話框與屏幕左邊的距離（ xpos）和上邊的距離（ ypos），它們的單位均為 twip。這兩個參數必須全部給出，或者全部省略。如果省略這一對位置參數，則對話框顯示在屏幕中心線向下約三分之一處。 ? （ 5） helpfile， context： helpfile是一個字符串變量或字符串表達式，用來表示幫助文件的名字； context是一個數值變量或表達式，用來表示相關幫助主題的幫助目錄號。這兩個參數必須同時提供或同時省略。 數據輸入 —InputBox函數 ? 在使用 InputBox函數時，應注意以下幾點。 ? （ 1）執(zhí)行 InputBox函數后，產生一個對話框，提示用戶輸入數據，光標位于對話框底部的輸入區(qū)中。 ? （ 2）在默認情況下， InputBox的返回值是一個字符串（不是變體類型）。 ? （ 3）在執(zhí)行 InputBox函數所產生的對話框中，有兩個按鈕，一個是 “ 確定 ” ，另一個是 “ 取消 ” 。在輸入區(qū)輸入數據后，單擊 “ 確定 ” 按鈕（或按回車鍵）表示確認，并返回在輸入區(qū)中輸入的數據；而如果單擊 “ 取消 ” 按鈕（或按 Esc鍵），則使當前的輸入作廢，在這種情況下，將返回一個空字符串。 ? （ 4）每執(zhí)行一次 InputBox函數只能輸入一個值，如果需要輸入多個值，則必須多次調用 InputBox函數。 ? （ 5）和其他返回字符串的函數一樣， InputBox函數也可以寫成 InputBox$的形式，這兩種形式完全等價。 數據輸入 —InputBox函數 ? 例 編寫程序，用 InputBox函數輸入數據。 Private Sub Form_Click（） m1$ = 請輸入姓名： mtitle$ = 員工簡歷 m2$ = 請輸入年齡： m3$ = 請輸入性別： m4$ = 請輸入籍貫： workername$ = InputBox(m1$,mtitle$) workerage = InputBox(m2$,mtitle$) workersex$ = InputBox(m3$,mtitle$) workerhome$ = InputBox(m4$,mtitle$) Cls Print workername$。， 。 workerhome$。，今年 Print workerage。 歲 。 ， 。 workerhome$。人 End Sub MsgBox 函數和 MsgBox 語句 ? 在使用 Windows 時，如果操作有誤，屏幕上會顯示一個對話框，讓用戶進行選擇，然后根據選擇確定其后的操作。MsgBox函數的功能與此類似，它可以向用戶傳送信息，并可通過用戶在對話框上的選擇接收用戶所做的響應，作為程序繼續(xù)執(zhí)行的依據。 MsgBox 函數 ? MsgBox 函數的格式如下： MsgBox(msg[,type][,title][,helpfile,context]) ? 該函數有 5個參數，除第一個參數外，其余參數都是可選的。各參數的含義如下： ? （ 1） msg：是一個字符串，其長度不能超過 1024個字符，如果超過，則多余的字符被截掉。該字符串的內容將在由MsgBox函數產生的對話框內顯示。當字符串在一行內顯示不完時，將自動換行，當然也可以用 “ Chr$(13) + Chr$(10)‖強制換行。 （ 2） type：是一個整數制或符號常量，用來控制在對話框內顯示的按鈕、圖標的種類及數量。該參數的值由 4類數值相加產生，這 4類數值或符號常量分別表示按鈕的類型、顯示圖標的種類、活動按鈕的位置及強制返回 ? （ 3） title：是一個字符串，用來顯示對話框的標題。 ? （ 4） helpfile， context：同 InputBox函數。 MsgBox 函數 ? MsgBox的 Type參數取值 MsgBox 函數 ? MsgBox函數的返回值 MsgBox 函數 ? 例 編寫程序，試驗 MsgBox函數的功能。 Private Sub Form_Click () m1$ = ＂ Error encountered while trying to open file , please retry. m2$ = ＂ Text Editor r = MsgBox(m1$,290,m2$） Print r End Sub 字形 ? Visual Basic 可以輸出各種英文字體和漢字字體，并可通過設置字形的屬性改變字體的大小、筆畫的粗細和顯示方向，以及加刪除線、下劃線、重疊等。下面就來介紹這些屬性 字體類型和大小 ? 1. 字體類型 ? 字體類型通過 FontName屬性設置，一般格式為： [窗體 .][控件 .][=―字體類型 ” ] ? FontName可作為窗體、控件或打印機的屬性，用來設置在這些對象上輸出的字體類型。這里的 “ 字體類型 ” 指的是可以在 Visual Basic在使用的英文字體或中文字體。對于中文來說，可以使用的字體數量取決于 Windows的漢字環(huán)境。例如： FontName = Tahoma― FontName = Courier― FontName = 幼圓 字體類型和大小 ? 2. 字體大小 ? 字體大小通過 FontSize屬性設置，在前面的例子中，曾使用過這種屬性，一般格式為： FontSize[=點數 ] ? 這里的 “ 點數 ” 用來設定字體