vb可視化界面設(shè)計ppt課件(編輯修改稿)
2025-06-01 18:28 本頁面
【文章內(nèi)容簡介】 3 標簽控件 Label （ 1） AutoSize屬性： 決定 Label控件是否調(diào)整自己的大小來適應(yīng)文本。 True——自動調(diào)整大小。 False——保持原設(shè)計的大小，正文若太長自動剪掉。 （ 2） WordWrap屬性： 當(dāng)一行文本過長時自動換行。 （ 3） BackStyle屬性： 背景樣式。 0（ Transparent） —— 透明顯示，控件后面若有其他控件均可顯示出來。 1（ Opaque） ——不透明，此時可為控件設(shè)置背景顏色。 本章目錄 34 標簽主要屬性 （ 4） BorderStyle屬性 ：邊框樣式。 0（ None） ——控件周圍沒有單邊框。 1（ Fixed Single） ——控件帶有單邊框。 （ 5） Alignment屬性 控件上標題（ Caption）對齊方式，其中： 0（ Left Justify） ——左對齊。 1（ Right Justify） ——右對齊。 2（ Center） ——居中。 本章目錄 35 2. 標簽的方法 標簽控件支持 Move方法，用于實現(xiàn)標簽的移動。 例如，設(shè)窗體上有一個標簽控件 Label1，運行時，單擊該標簽控件，使該標簽控件向右移動 500twip?？梢酝ㄟ^如下代碼實現(xiàn)： Private Sub Label1_Click() +500 End Sub 本章目錄 36 3. 標簽的事件 標簽經(jīng)常響應(yīng)的事件有：單擊（ Click），雙擊（ DbleClick）和改變（ Change）。但實際上標簽僅起到在窗體上顯示文字作用，因此，一般不需要編寫事件過程。 本章目錄 37 【 例 】 編寫一個如圖 210所示的簡易的鍵盤指法練習(xí)程序。單擊 “ 開始 ” 按鈕，進行指法練習(xí)，同時 “ 開始 ” 按鈕變?yōu)?“ 結(jié)束 ” 按鈕。字母在屏幕上向上移動，輸入正確則會消失，同時隨機產(chǎn)生新的字母。要求能統(tǒng)計正確率、擊鍵次數(shù)和所用的時間。 本章目錄 38 （ 1）界面設(shè)計 在窗體上添加 4個標簽，用于在屏幕上同時顯示 4個小寫字母。 1個命令按鈕用于控制指法練習(xí)的開始和結(jié)束。2個計時器。一個用于隨機產(chǎn)生字母和控制字母在窗體中移動，另一個用于計時。 本章目錄 39 （ 2）程序代碼如下： Dim m%, n%, t% Private Sub Command1_Click() If = 開始 Then t = 0 = True = True = 結(jié)束 Else = 開始 = False = False If m 0 Then Print 正確率為： amp。 n / m * 100 amp。 % Print 擊鍵次數(shù)： amp。 m amp。 次 amp。 共用時： amp。 t amp。 秒 End If End Sub 本章目錄 40 Private Sub Command2_Click() End End Sub Private Sub Form_KeyPress(KeyAscii As Integer) m = m + 1 39。統(tǒng)計擊鍵次數(shù) If Chr(KeyAscii) = Then = “”： n = n + 1 End If If Chr(KeyAscii) = Then = “”： n = n + 1 End If If Chr(KeyAscii) = Then = “”： n = n + 1 End If If Chr(KeyAscii) = Then = “”： n = n + 1 End If End Sub 本章目錄 41 Private Sub Timer1_Timer() Randomize If = Then = = Chr(CInt(Rnd * 26) + 97) 39。隨機產(chǎn)生一個小寫字母 Else = 20 End If If = Then = = Chr(CInt(Rnd * 26) + 97) 39。隨機產(chǎn)生一個小寫字母 Else = 20 End If 本章目錄 42 If = Then = = Chr(CInt(Rnd * 26) + 97) Else = 20 End If If = Then = = Chr(CInt(Rnd * 26) + 97) Else = 20 End If If =0 Then = If =0 Then = If =0 Then = If =0 Then = End Sub 本章目錄 43 Private Sub Timer2_Timer() t = t + 1 39。計算練習(xí)時間 End Sub 本章目錄 44 文本框控件 TextBox 所謂人機對話，就是計算機能獲知用戶給它的信息，同時，它也能作出相應(yīng)的反饋，對于前者，我們除了用鼠標向計算機發(fā)出命令外，也常需要以鍵盤向計算機輸入一些內(nèi)容，如鍵入用戶的姓名、年齡、性別等。文本框被用來顯示用戶輸入的信息，是 Windows操作系統(tǒng)下進行人機對話的常用元素。 在 VB編程中，文本框是一個文本編輯區(qū)域，類似于一個簡單的文本編輯器，可以在這個區(qū)域中輸入、編輯、修改和顯示文本 。 本章目錄 45 1. 文本框主要屬性 (1) Text屬性： 設(shè)置文本框中顯示的內(nèi)容。 (2) MultiLine屬性： 設(shè)置控件是否可以接受多行文本。 False（默認值），在文本框中只能輸入單行文本； True時，可以使用多行文本，即在文本框中輸入或輸出文本時可以換行，并在下一行接著輸入或輸出。按 Ctrl+Enter鍵可以插入一個空行。 (3) ScrollBars屬性： 設(shè)置控件是否具有水平或垂直滾動條。 0 ——文本框中沒有滾動條 1 ——只有水平滾動條 2 ——只有垂直滾動條 3 ——同時具有水平和垂直滾動條 注意：當(dāng) MultiLine屬性為 True時，它才起作用。此外，當(dāng)在文本框中加入水平滾動條（或同時具有水平和垂直滾動條）后，文本框中文本的自動換行功能將不起作用，只能通過回車鍵或 Ctrl+Enter鍵換行
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號-1