vb第八章系統(tǒng)環(huán)境資源的應(yīng)用-展示頁(yè)
2024-10-15 16:45本頁(yè)面
【正文】 常數(shù)。 , ,鍵盤(pán)檢測(cè) End Sub 167。通過(guò)鍵代碼常數(shù)或相應(yīng)的 ASCII值檢測(cè)這些鍵。字母鍵的鍵代碼與此字母的大寫(xiě)字符的 ASCII值相同。 167。 （ 2） Shift參數(shù)指示 Shift、 Ctrl和 Alt鍵的狀態(tài)。它們是有相同的 KeyCode值。 （ 1） KeyCode參數(shù)指示按下的物理鍵。 167。 （ 5）不僅響應(yīng)按鍵操作而且響應(yīng)釋放鍵的操作。 （ 3） PageUp和 PageDown鍵。 鍵盤(pán)事件 二、 KeyDown、 KeyUp事件 KeyDown和 KeyUp事件提供了最低級(jí)的鍵盤(pán)響應(yīng)，在程序中可用這些事件檢測(cè)下列 KeyPress事件無(wú)法檢測(cè)到的情況： （ 1） Shift、 Ctrl和 Alt鍵的特殊組合。 鍵盤(pán)事件 ? 例 1：將某文本框中正在輸入的所有字符都強(qiáng)制轉(zhuǎn)換為大寫(xiě)字符 Private Sub Text1_KeyPress(KeyAscii As Integer) KeyAscii = Asc(Ucase(Chr(KeyAscii))) End Sub ? 例 2：檢測(cè)用戶(hù)是否正在按 BackSpace鍵 : Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii=8 then MsgBox “ 您按下了 BackSpace鍵。但是 KeyPress事件只識(shí)別 Enter、Tab和 BackSpace鍵。 此事件中只有一個(gè)參數(shù)，是用戶(hù)按鍵的 ASCII碼值。 鍵盤(pán)事件 一、 KeyPress 事件 當(dāng)用戶(hù)按下與 ASCII字符相對(duì)應(yīng)的鍵時(shí)，將觸發(fā)此事件。當(dāng)您希望無(wú)論何時(shí)按下某按鍵都會(huì)執(zhí)行同一個(gè)操作，而不管哪個(gè)控件在此時(shí)具有焦點(diǎn)時(shí)，設(shè)置 KeyPreview屬性將極為有用。這種情況只有在空窗體和窗體上的控件都無(wú)效時(shí)才發(fā)生。 ? 只有獲得焦點(diǎn)的對(duì)象才能夠接受鍵盤(pán)事件。 鍵盤(pán)事件 ? 鍵盤(pán)事件和鼠標(biāo)事件都是用戶(hù)與程序之間交互操作中的主要元素。 拖放 167。 鼠標(biāo)屬性 167。第八章 系統(tǒng)環(huán)境資源的應(yīng)用 主要內(nèi)容 167。 鍵盤(pán)事件 167。 鼠標(biāo)事件 167。 系統(tǒng)對(duì)象 167。單擊鼠標(biāo)任意鍵和按下鍵盤(pán)上的任何按鍵都可觸發(fā)事件。對(duì)于鍵盤(pán)事件，只有當(dāng)窗體為活動(dòng)窗體且其上所有控件均未獲得焦點(diǎn)時(shí)，窗體才獲得焦點(diǎn)。但是，如果將窗體上的 KeyPreview屬性設(shè)置為 True，則對(duì)每個(gè)控件在控件識(shí)別其所有鍵盤(pán)事件之前，窗體就會(huì)接受這些鍵盤(pán)事件。 鍵盤(pán)事件 觸發(fā)原因 KeyPress 按下對(duì)應(yīng)某 ASCII字符的鍵 KeyDown 按下鍵盤(pán)的任意鍵 KeyUp 釋放鍵盤(pán)的任意鍵 167。通過(guò) KeyPress事件可對(duì)標(biāo)準(zhǔn)鍵盤(pán)編寫(xiě)代碼來(lái)處理大多數(shù)按鍵。 ASCII字符不僅代表標(biāo)準(zhǔn)鍵盤(pán)的字母、數(shù)字和標(biāo)點(diǎn)符號(hào)，而且也代表大多數(shù)控制鍵。 167?！?, ,” 檢測(cè)鍵盤(pán)” End Sub 167。 （ 2）方向鍵。 （ 4）區(qū)分?jǐn)?shù)值小鍵盤(pán)的數(shù)字鍵與標(biāo)準(zhǔn)鍵盤(pán)中的數(shù)字鍵。 （ 6）與菜單命令無(wú)聯(lián)系的功能鍵。 鍵盤(pán)事件 KeyDown和 KeyUp事件通過(guò)提供 KeyCode和 Shift兩個(gè)參數(shù)返回輸入字符的信息。這時(shí)將“ A” 與“ a”作為同一個(gè)鍵返回。但是請(qǐng)注意，主鍵盤(pán)上的“ 1” 和數(shù)字小鍵盤(pán)的“ 1” 被作為不同的鍵返回，盡管它們生成相同的字符。只有檢查此參數(shù)才能判斷輸入的是大寫(xiě)字母還是小寫(xiě)字母。 鍵盤(pán)事件 ? 例 3： KeyCode參數(shù)通過(guò) ASCII值或鍵盤(pán)代碼常數(shù)來(lái)識(shí)別鍵。 Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyA Then MsgBox 你按的是 A鍵 “ End Sub ? 例 4： KeyDown和 KeyUp事件可識(shí)別標(biāo)準(zhǔn)鍵盤(pán)上的大多數(shù)控制鍵。 Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyPageUp Then MsgBox 您按的是 PageUp鍵。 鍵盤(pán)事件 ? Shift參數(shù)是用來(lái)在事件發(fā)生時(shí)記錄 Shift， Ctrl和Alt鍵狀態(tài)的一個(gè)整數(shù)，它實(shí)際上是一個(gè)位域，它用第 0位對(duì)應(yīng) Shift鍵，第 1位對(duì)應(yīng) Ctrl鍵，第 2位對(duì)應(yīng) Alt鍵，如圖所示： 167。 二進(jìn)制值 十進(jìn)制值 常數(shù) 意義 001 1 VbShiftMask 按 Shift鍵 010 2 VbCtrlMask 按 Ctrl鍵 100 4 VbAltMask 按 Alt鍵 011 3 VbShiftMask+ VbCtrlMask 同時(shí)按 Shift、 Ctrl鍵 101 5 VbShiftMask+ VbAltMask 同時(shí)按 Shift、 Alt鍵 110 6 VbCtrlMask+ VbAltMask 同時(shí)按 Ctrl鍵、 Alt鍵 111 7 VbCtrlMask+VbAltMask+ VbShiftMask 同時(shí)按 Shift、 Ctrl、Alt鍵 167。也就是說(shuō)，鼠
規(guī)章制度相關(guān)推薦
鄂ICP備17016276號(hào)-1