數(shù)據(jù)的輸入與輸出.ppt

1、第三章數(shù)據(jù)的輸入輸出，第三章數(shù)據(jù)的輸入輸出，輸入輸出是編程的重要一環(huán)。 沒有輸出操作的程序沒有實用價值，沒有輸入的程序缺乏靈活性。 VB為實現(xiàn)輸入輸出操作的靈活性、多樣性、便利性、直觀性提供了多種手段。 本章對VB的輸入輸出操作及其相關(guān)的控制進行說明。 3.1數(shù)據(jù)輸出VB的輸出操作包括文本信息的輸出和圖形圖像的輸出，本章主要對文本信息的輸出進行說明。 在3.1.1打印方法之前的基本語言版本中，數(shù)據(jù)輸出主要通過打印語句來實現(xiàn)。 在VB中，Print被用作對象的方法。 1 .使用Print方法使用Print方法將文本字符串或表達式的值輸出到表單。 語法格式是對象名稱. print表達式列表，|；

2、其中，對象名稱可以是“表單”、“圖片盒”或“打印機”。 如果省略“對象名稱”，則直接輸出到表單中。 表達式列表是一個或多個表達式，可以是數(shù)字表達式或字符串。 對于數(shù)字表達式，將輸出表達式的值；對于字符串，將直接輸出。 如果省略公式列表，則輸出空行。【例3-1】如圖3-1所示，使用Print方法，將字符串或數(shù)值表達式的值直接輸出到窗體。 圖3-1使用打印方法，并且使用打印方法將字符串或數(shù)字表達式的值直接輸出到表單，如示例3-1和3-1所示。 命令按鈕Command1的單擊事件代碼：私有子命令1 _單擊()打印2 * 34=； 2 * 3 4使用“；” 分割打印輸出空行打印歡迎學習打印，Visua

3、l使用“，”分割打印，Baisc使用“，”分割打印歡迎學習，行末使用“，”分割打印視覺2 .為了將與打印方法相關(guān)的函數(shù)數(shù)據(jù)輸出到指定位置，VB提供了一些與打印相關(guān)的函數(shù)。 (1) Tab函數(shù)在Print方法中，可以使用Tab函數(shù)來定位輸出。 格式為Tab(n )。 其中n是數(shù)值表達式，其值是整數(shù)。 Tab函數(shù)將顯示或打印位置移動到由殘奧儀n指定的列數(shù)，并從該列輸出數(shù)據(jù)。 輸出的內(nèi)容放置在Tab函數(shù)后面，用分號分隔。 示例：打印tab (10 )； 名字Tab(30 )； 年齡，(2) Spc函數(shù)在Print方法中，也可以使用Spc函數(shù)來定位輸出。 與Tab函數(shù)不同，Spc函數(shù)提供了一些空間。

4、型號為Spc(n )。 其中n是數(shù)字表達式，值是整數(shù)，表示在顯示或打印以下表達式之前插入的空格數(shù)： Spc函數(shù)和輸出由分號分隔。 例如：打印ABC； Spc(5)； DEF輸出：如果將abcdfeprint方法與不同大小的字體一起使用，則使用Spc函數(shù)打印的空白字符的寬度始終等于所選字體中所有字符(以點為單位)的平均寬度。 【例3-2】在上述的例子中使用Tab函數(shù)和Spc函數(shù)，并使用指令按鈕的Click事件代碼： private sub command1_ click () printprinttab (5)； 2 * 3 4=； 2 * 3四列印列印表格(6)； 歡迎學習Tab(17 )；

5、可視基本打印表格(7)； 歡迎學習的Spc(3)； 視覺； Spc(2)； 要將Baisc End Sub，3. Print方法的精確定位文本正確輸出到表單、圖像框或打印頁面，請使用位置屬性(CurrentX和CurrentY )和文本高度寬度方法(TextHeight和TextWidth CurrentX和CurrentY屬性分別用于返回或設(shè)置當前輸出位置的橫坐標和縱坐標，TextHeight和TextWidth方法分別返回字符串文本的高度和寬度值。 其單位均為Twip。 TextHeight和TextWidth方法的格式是對象名稱. TextHeight (字符串)對象名稱. TextWi

6、dth (字符串)。 對象名稱可以是表單、圖片框或打印機對象。 【例3-3】接下來的程序如圖3-3所示，將字符串文本“校正計算機等級測試”輸出到窗體的中間。只需編寫表單的Click事件代碼private subform _ click () dimtextwasinteger，即可獲得文本as integer print text $=校正計算機等級測試textw=文本寬度(text )/2文本寬度text width (text ) texth=textheight (text2- textw表單的寬度屬性scalewidthcurrenty=scale height/2-texth垂直位置

7、打印文本端子， 4 .字符和字體設(shè)置控制顯示或打印文本的大小和外觀時，可以使用字體名稱、字體大小、字體italic、字體粗體、字體thru、字體透明度、字體刪除屬性可以在“屬性”窗口中設(shè)置這些屬性(設(shè)置窗體的Font屬性)，也可以在代碼中的賦值語句中設(shè)置這些屬性。圖3-4字體屬性【例3-4】使用以下程序，以指定的大小、顏色、外觀將文本輸出到窗體的中央(圖3-4 )。 命令按鈕的Click事件代碼：私有子命令1 _ click () dima asstring， textW As Integer、textH As Integer FontName=所有者文檔輸出文本的字體FontSize=60輸

8、出字體的大小ForeColor=QBColor(15 )輸出文本的前景色，即字體的顏色back color 表單顏色text=文本內(nèi)容text=文本寬度(text )/2輸出文本寬度text width (text ) textheight (text ) -命令2 - textW設(shè)置輸出的水平位置currenty=scale helf 2 - textH設(shè)定輸出的垂直位置Print text輸出文字End Sub說明：屬性ScaleWidth和ScaleHeight分別表示表單內(nèi)的寬度和高度。 5 .清除方法CLS Cls方法清除由Print和圖形方法在Form或PictureBox上運行時

9、生成的文本或圖形，并用背景色填充清除的區(qū)域。 使用Picture屬性設(shè)置的背景位圖和置入的控件不受Cls的影響。 Cls方法的語法是對象名. Cls，“對象名”是表單(Form )或圖片盒(PictureBox )，如果省略“對象名”，則由Print方法和圖形方法在執(zhí)行時生成在上面的示例中，使用Cls方法清除由窗體中的Print方法生成的文本，如圖3-5所示。 要使用圖3-5cls方法，請在上面的示例中添加命令按鈕Command2(清除)，然后將Click事件代碼private sub command2_ click () cl send sub，6 .文本輸出到圖像框，僅此而已【例3-6】如

10、圖3-6所示，使用Print方法，在圖像框中輸出字符串或數(shù)值表達式的值。 圖3-6在圖像框中輸出字符串或數(shù)字表達式的值，并描述表單的Activate事件代碼： private subform _ activate () dima asstring，textW As Integer。 texthasintegerpicture1. font name=所有者文檔picture1. fontsize=40畫面1.forecolor=QB顏色(15 )畫面1。 a=你好，textw=圖片1 .文本寬度(a )/2文本=圖片1 .文本(a )/2圖片1.currentx。 2-textwpicture

11、1. currenty=picture1. height/2-texthpicture1.打印機端子，編寫命令按鈕Command1的單擊事件代碼：私有子commate picture1.fontname=宋體picture1. fontsize=11畫面1畫面1 .背景顏色=QB顏色(15 )畫面1.clspicture1.打印畫面1.pricture 2 * 3 4=； 2 * 34畫面1 .打印畫面1 .打印Tab(17) :歡迎學習Tab(17 )； visualbaiscpicture1.打印圖片1 .打印tab (4)； 歡迎學習的Spc(3)； 視覺； Spc(2)； Baisc

12、End Sub，編寫命令按鈕Command2的Click事件代碼：私有子命令2 _ click () picture1. cl send sub，3.1.2信息框函數(shù)msgbox其語法形式為變量=MsgBox (信息內(nèi)容、對話框類型、對話框標題)，信息內(nèi)容指定出現(xiàn)在對話框中的文本，如果信息內(nèi)容使用硬回車(CHR(13 ) )，則可以換行文本。 對話框的高度和寬度隨著信息內(nèi)容的增加而增加，最多可達1024個字符。 中的組合圖層性質(zhì)變更選項。 對話框類型指定在對話框中顯示的按鈕和圖標。 通常有三個殘奧儀表。 其取值和含義如表3-3、表3-4、表3-5所示。 表3-3殘奧儀表1出現(xiàn)按鈕、表3-4殘奧

13、儀表2圖標類型、表3-5殘奧儀表3默認按鈕值常數(shù)說明0vbDefaultButton1指定默認按鈕第1按鈕256vbDefaultButton2指定默認按鈕第2按鈕512 VB db 下面的代碼顯示如圖3-8所示的對話框： msg=MsgBox (請確認輸入的數(shù)據(jù)是否正確！ 3 48 0、數(shù)據(jù)檢查)圖3-8的信息對話框，4) Msgbox ()返回的值表示在對話框中選擇了哪個按鈕(參照表3-6 )。 表3-6函數(shù)的門值常數(shù)按鈕1vbOK確定按鈕2vbCancel取消按鈕3vbAbort結(jié)束按鈕4vbRetry重試按鈕5vbIgnore忽略按鈕6vbYes是7vbnono5)代碼內(nèi)的值可以是數(shù)值

14、也可以是數(shù)值常數(shù)。 6 )如果省略了某些選項，則必須添加相應(yīng)的逗號分隔符。 如果不需要門值，可以使用MsgBox的指令形式。 MsgBox信息內(nèi)容、對話類型和對話標題在程序運行時可能需要顯示簡單信息，如警告和錯誤。 在這種情況下，可以在“信息對話框”中顯示。 用戶收到信息后，可以點擊按鈕關(guān)閉對話框，轉(zhuǎn)換為點擊的按鈕的值。3.1.3標簽控件使用Label控件顯示的文本用戶不能直接修改。 有些沒有自己的字幕屬性的控件(如TextBox )可以用標簽來標識。 1 .標記屬性標記中顯示的文本由Caption屬性控制。 可以在修改設(shè)置時在“屬性”窗口中設(shè)置此屬性，也可以在運行時通過代碼指定此屬性。 標簽

15、具有Name、Height、Width、Top、Left、Enabled、Visible、Font等控件共通的屬性，分別為1) Alignment的獨特屬性2) Autosize 如果屬性設(shè)置為True，標簽將自動調(diào)整大小以適應(yīng)標簽文本；如果屬性設(shè)置為False，標簽將保持設(shè)計時繪制的大小，而不會自動調(diào)整大小。 3) Backstyle屬性：此屬性用于設(shè)置標簽的背景是透明的還是不透明的。 取0和1兩種值。 分別為0透明、1不透明。 4 )邊框樣式屬性：此屬性用于設(shè)置標簽的邊框樣式。 可取值有0和1兩種，分別是0 - None (標簽沒有邊框)1 - Fixed Single (標簽有單線邊框)5) WordWrap屬性：自動換行。 如果要自動調(diào)整標記控件以適應(yīng)內(nèi)容量，則必須將AutoSize屬性設(shè)置為True，并水平擴展以適應(yīng)Caption屬性的內(nèi)容。 要自動換行和垂直擴展Caption屬性的內(nèi)容，請將WordWrap屬性設(shè)置為True。