8、怎樣獲得鍵盤輸入和判斷敲鍵的Ascii值?
把窗體的KeyPreview屬性設(shè)置成True,然后在Form_KeyPress 事件里編寫程序代碼如下:
Private Sub Form_KeyPress(KeyAscii As Integer)
Me.Caption = Str(KeyAscii) ‘取得鍵盤輸入的字符
...
End Sub
9、我希望窗體一運(yùn)行就在屏幕的中央,怎么實(shí)現(xiàn)?
Sub CenterForm(frm As Form) ‘定義過程
frm.Move (Screen.width - frm.width) 2, (Screen.Height - frm.Height) 2
End Sub
Private Sub Form_Load()
CenterForm Me ’調(diào)用過程
End Sub
Private Sub Text1_GotFocus()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text) ’過程調(diào)用
End Sub
2007年4月計(jì)算機(jī)等級(jí)考試二級(jí)VB筆試試題 【打包下載】2004-2006年計(jì)算機(jī)二級(jí)VB真題
希望與更多計(jì)算機(jī)等級(jí)考試的網(wǎng)友交流,請(qǐng)進(jìn)入計(jì)算機(jī)等級(jí)考試論壇
更多信息請(qǐng)?jiān)L問:考試吧計(jì)算機(jī)等級(jí)考試欄目
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |