VisualBasic的輸入輸出有著十分豐富的內(nèi)容和形式，它提供了多種手段，并可以通過(guò)各種控件實(shí)現(xiàn)輸入輸出操作，使輸入輸出靈活、多樣、方便、形象直觀。5.1數(shù)據(jù)輸出——Print方法5.2數(shù)據(jù)輸出——InputBox函數(shù)5.3MsgBox函數(shù)和MsgBox語(yǔ)句5.4字形5.5打印機(jī)輸出5.1數(shù)據(jù)輸出——Print方法

在早期版本的BASIC中，數(shù)據(jù)的輸出主要通過(guò)PRINT語(yǔ)句來(lái)實(shí)現(xiàn)。VisualBasic也用Print輸出數(shù)據(jù)，但它是作為方法使用的。5.1.1Print方法Print方法可以在窗體上顯示文本字符串和表達(dá)式的值，并可在其他圖形對(duì)象或打印機(jī)上輸出信息。Print方法的語(yǔ)法格式為：[<對(duì)象名稱(chēng)>].Print[<表達(dá)式列表>][{,|;}]說(shuō)明：（1）“對(duì)象名稱(chēng)”可以是窗體（Form）、圖片框（PictureBox）或打印機(jī)（Printer），也可以是立即窗口（Debug）。例如：Form1.Print"歡迎使用VisualBasic"

Picture1.Print"歡迎使用VisualBasic"

Debug.Print"歡迎使用VisualBasic"

Printer.Print"歡迎使用VisualBasic"

Print"歡迎使用VisualBasic"

"

（2）“表達(dá)式表”是一個(gè)或多個(gè)表達(dá)式，可以是數(shù)值表達(dá)式或字符串。對(duì)于數(shù)值表達(dá)式，打印出表達(dá)式的值；而字符串則照原樣輸出。（3）當(dāng)輸出多個(gè)表達(dá)式或字符串時(shí)，各表達(dá)式用分隔符（逗號(hào)、分號(hào)或空格）隔開(kāi)。如果輸出的各表達(dá)式之間用逗號(hào)分隔，則按標(biāo)準(zhǔn)輸出格式（分區(qū)輸出格式）顯示數(shù)據(jù)項(xiàng)。如果各輸出項(xiàng)之間用分號(hào)或空格作分隔符，則按緊湊輸出格式輸出數(shù)據(jù)。

當(dāng)輸出數(shù)值數(shù)據(jù)時(shí)，數(shù)值的前面有一個(gè)符號(hào)位，后面有一個(gè)空格，而字符串前后都沒(méi)有空格。

8大家有疑問(wèn)的，可以詢問(wèn)和交流可以互相討論下，但要小聲點(diǎn)（4）Print方法具有計(jì)算和輸出雙重功能，對(duì)于表達(dá)式，它先計(jì)算后輸出。（5）在一般情況下，每執(zhí)行一次Print方法要自動(dòng)換行，也就是說(shuō)，后面執(zhí)行Print時(shí)將在新的一行上顯示信息。為了仍在同一行上顯示，可以在末尾加上一個(gè)分號(hào)或逗號(hào)。

5.1.2與Print方法有關(guān)的函數(shù)1.Tab函數(shù)格式：Tab(n)Tab函數(shù)把顯示或打印位置移到由參數(shù)n指定的列數(shù)。當(dāng)在一個(gè)Print方法中有多個(gè)Tab函數(shù)時(shí)，每個(gè)Tab函數(shù)對(duì)應(yīng)一個(gè)輸出項(xiàng)，各輸入項(xiàng)之間用分號(hào)隔開(kāi)。例如:PrintTab(10);"姓名";Tab(30);"年齡"說(shuō)明：①參數(shù)n為數(shù)值表達(dá)式，其值為一整數(shù)，它是下一個(gè)輸出位置的列號(hào)，表示在輸出前把光標(biāo)（或打印頭）移到該列。通常最左邊的列號(hào)為1，如果當(dāng)前的顯示位置已經(jīng)超過(guò)n，則自動(dòng)下移一行。②在VB中，對(duì)參數(shù)n的取值范圍沒(méi)有具體限制。當(dāng)n

比行寬大時(shí)，顯示位置為nMod行寬；如果n<1，則把輸出位置移到第一列。③當(dāng)在一個(gè)Print方法中有多個(gè)Tab函數(shù)時(shí)，每個(gè)Tab

函數(shù)對(duì)應(yīng)一個(gè)輸出項(xiàng)，各輸出項(xiàng)之間用分號(hào)隔開(kāi)。2.Spc函數(shù)格式：Spc(n)在顯示或打印列表中的下一個(gè)表達(dá)式之前插入n個(gè)空格數(shù)。Print"ABC";Spc(8);"DEF"說(shuō)明：①Spc函數(shù)與輸出項(xiàng)之間用分號(hào)隔開(kāi)。②Spc函數(shù)與Tab函數(shù)的作用類(lèi)似，可以互相代替。

3.空格函數(shù)格式：Space$(n)Space$函數(shù)返回n個(gè)空格。

a$="a"+Space$(4)+"b"Printa$輸出結(jié)果：a□□□□b5.1.3格式輸出使用格式化函數(shù)Format（）可以使數(shù)值、日期或字符型數(shù)據(jù)按指定的格式輸出。格式為：Format（表達(dá)式[，格式字符串]）數(shù)值型格式實(shí)例：

PrivateSubForm_Click()PrintFormat(123.45,"0000.000")PrintFormat(123.45,"0.0")PrintFormat(123.46,"0.0")PrintFormat(123.45,"####.###")PrintFormat(123.45,"#.#")PrintFormat(123.46,"#.#")PrintFormat(0.123,".##")PrintFormat(0.123,"0.##")EndSub字符型格式實(shí)例：

PrintFormat("ABcd","@@@@@@")PrintFormat("ABcd","&&&&&&")PrintFormat("ABcd","<@@@@@@")PrintFormat("ABcd",">@@@@@@")PrintFormat("ABcd","!@@@@@@")日期與時(shí)間格式實(shí)例：

PrintFormat(Date,"dddddd")PrintFormat(Date,"mmmm")PrintFormat(Date,"yyyy")PrintFormat(Time,"Hh:Nn:Ss")PrintFormat(Time,"ttttt")PrintFormat(Time,"tttttAM/PM")5.1.4其他方法和屬性1、清除方法CLSCls將清除圖形和打印語(yǔ)句在運(yùn)行時(shí)所產(chǎn)生的文本和圖形，清除后的區(qū)域以背景色填充。但是設(shè)計(jì)時(shí)使用Picture屬性設(shè)置的背景位圖和放置的控件不受Cls影響。語(yǔ)法：Picture1.Cls'清除圖片框Picture1內(nèi)的圖形或文本Cls'清除當(dāng)前窗體內(nèi)顯示的內(nèi)容[<對(duì)象名稱(chēng)>.]Cls2、Move方法

Move方法用來(lái)移動(dòng)窗體和控件，并可改變其大小。語(yǔ)法：如果“對(duì)象”是窗體，則“左邊距離”和“上邊距離”均以屏幕左邊界和上邊界為準(zhǔn)，如果“對(duì)象”是控件，則以窗體的左邊界和上邊界為準(zhǔn)。[<對(duì)象名稱(chēng)>.]Move左邊距離[,上邊距離[,寬度[,高度]]]5.2數(shù)據(jù)輸入——InputBox方法InputBox函數(shù)可以產(chǎn)生一個(gè)對(duì)話框，等待用戶輸入數(shù)據(jù)，并返回所輸入的內(nèi)容，函數(shù)值類(lèi)型為String類(lèi)型。格式為：變量=InputBox(<提示信息>[,<對(duì)話框標(biāo)題>][,<默認(rèn)內(nèi)容>])說(shuō)明：（1）

<提示信息>指定在對(duì)話框中出現(xiàn)的文本。（2）<對(duì)話框標(biāo)題>指定對(duì)話框的標(biāo)題。（3）<默認(rèn)內(nèi)容>可以指定輸入框的文本框中顯示的默認(rèn)文本練習(xí):例如，假設(shè)某程序中有如下代碼：可以在文本框中將默認(rèn)值修改成其他內(nèi)容，單擊“確定”按鈕，文本框中的文本返回到變量MyStr中；單擊“取消”按鈕，返回一個(gè)0長(zhǎng)度的字符串。MyStr=InputBox("提示"&vbCrLf&"信息"，"對(duì)話框標(biāo)題"，"aaaaaa")5.3MsgBox函數(shù)和MsgBox語(yǔ)句MsgBox函數(shù)可以向用戶傳送信息，并可通過(guò)用戶在對(duì)話框上的選擇接收用戶所做的響應(yīng)，作為程序繼續(xù)執(zhí)行的依據(jù)。5.3.1MsgBox函數(shù)

格式如下：[變量]=MsgBox(<信息內(nèi)容>[,<對(duì)話框類(lèi)型>[,<對(duì)話框標(biāo)題>]])說(shuō)明：（1）<信息內(nèi)容>指定在對(duì)話框中出現(xiàn)的文本。（2）<對(duì)話框類(lèi)型>指定對(duì)話框中出現(xiàn)的按鈕和圖標(biāo)。（3）<對(duì)話框標(biāo)題>指定對(duì)話框的標(biāo)題。（4）MsgBox()返回的值指明了在對(duì)話框中選擇的按鈕。（5）如果省略了某些可選項(xiàng)，必須加入相應(yīng)的逗號(hào)。（6）如果不需要返回值，則可以使用MsgBox的命令形式。參數(shù)1出現(xiàn)按鈕說(shuō)明值021345確定按鈕確定和取消按鈕終止、重試和忽略按鈕是、否和取消按鈕是和否按鈕重試和取消按鈕vbOKOnlyvbAbortRetryIgnorevbOKCancelvbYesNoCancelvbYesNovbRetryCancel常量圖例參數(shù)2圖標(biāo)類(lèi)型說(shuō)明值16483264停止圖標(biāo)感嘆號(hào)圖標(biāo)問(wèn)號(hào)圖標(biāo)信息圖標(biāo)vbCreticalvbQuestionvbExclamationvbInformation常量圖例參數(shù)3默認(rèn)按鈕指定默認(rèn)為第1按鈕指定默認(rèn)為第3按鈕說(shuō)明值0521256vbDefaultButton1常量指定默認(rèn)為第2按鈕vbDefaultButton2vbDefaultButton3函數(shù)的返回值說(shuō)明值132456確定按鈕取消按鈕終止按鈕重試按鈕忽略按鈕是vbOKvbAbortvbCancelvbRetryvbIgnorevbYes常量7否vbNo5.3.2MsgBox語(yǔ)句MsgBox函數(shù)也可以寫(xiě)成語(yǔ)句形式，即：MsgBox(<信息內(nèi)容>[,<對(duì)話框類(lèi)型>[,<對(duì)話框標(biāo)題>]])MsgBox語(yǔ)句沒(méi)有返回值，因而常用于較簡(jiǎn)單的信息顯示。5.4字形VisualBasic可以輸出各種英文字體和漢字字體，并可通過(guò)設(shè)置字形的屬性改變字體的大小、筆畫(huà)的粗細(xì)和顯示方向，以及加刪除線、下劃線、重疊等。2．字體大小字體大小通過(guò)FonSize屬性設(shè)置，一般格式為：FonSize[=點(diǎn)數(shù)]

這里的“點(diǎn)數(shù)”用來(lái)設(shè)定字體的大小。在默認(rèn)情況下，系統(tǒng)使用最小的字體，“點(diǎn)數(shù)”為9。如果省略“=點(diǎn)數(shù)”，則返回當(dāng)前字體的大小。5.4.2其他屬性1．粗體字粗體字由FontBold屬性設(shè)置，一般格式為：FontBold=[Boolean]該屬性可以取兩個(gè)值，即True和False，默認(rèn)為False。2．斜體字斜體字通過(guò)FontItalic屬性設(shè)置，其格式為：FontItalic

=[Boolean]當(dāng)該屬性被設(shè)置為T(mén)rue時(shí)，文本以斜體字輸出。

默認(rèn)為False。3．加刪除線一般格式為：FontStrikethru

=[Boolean]如果把FontStrikethru屬性設(shè)置為T(mén)rue，則在輸出的文本中部畫(huà)一條直線，直線的長(zhǎng)度與文本的長(zhǎng)度相同。

4．加下劃線其格式為：FontUnderline

=[Boolean]下劃線即底線，用FontUnderline屬性可以給輸出的文本加下劃線。該屬性的默認(rèn)值為False。5．重疊顯示一般格式為：FontTransParent

=[Boolean]如果該屬性被設(shè)置為T(mén)rue，則前景