vb程序設(shè)計(jì)第十一章(編輯修改稿)
2025-02-08 20:42 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 KeyUp和 KeyDown事件 例 [111]設(shè)計(jì)一個(gè)應(yīng)用程序。在窗體上建立一個(gè)文本框和一個(gè)標(biāo)簽，當(dāng)從鍵盤(pán)向文本框英文字符時(shí)，將其轉(zhuǎn)換成大寫(xiě)字母顯示在標(biāo)簽中 。 解題思路 ： 在 text1的 keypress事件中，將鍵盤(pán)的 asc碼轉(zhuǎn)化為相應(yīng)的字符， 再將其轉(zhuǎn)化為大寫(xiě)。 Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char = UCase(Chr(KeyAscii)) = amp。 char End Sub KeyUp和 KeyDown事件 例 [112]設(shè)計(jì)一個(gè)應(yīng)用程序。在窗體上建立一個(gè)文本框，其屬性值均為默認(rèn)值，并將窗體的 KeyPreview屬性值設(shè)為 True。 解題思路 :若設(shè)置窗體的 KeyPreview屬性值為 True，則先執(zhí)行窗體的 KeyPress事件，而后執(zhí)行文本框的 KeyPress事件； Private Sub Form_KeyPress(KeyAscii As Integer) KeyAscii = KeyAscii + 1 End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) KeyAscii = KeyAscii + 1 End Sub KeyUp和 KeyDown事件
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1