freepeople性欧美熟妇, 色戒完整版无删减158分钟hd, 无码精品国产vα在线观看DVD, 丰满少妇伦精品无码专区在线观看,艾栗栗与纹身男宾馆3p50分钟,国产AV片在线观看,黑人与美女高潮,18岁女RAPPERDISSSUBS,国产手机在机看影片

正文內(nèi)容

第三章窗體和簡(jiǎn)單的輸入輸出(存儲(chǔ)版)

  

【正文】 行后,輸入焦點(diǎn)會(huì)位于控件上,焦點(diǎn)控件對(duì)于鍵盤(pán)事件有優(yōu)先響應(yīng)的權(quán)利,窗體就無(wú)法接受到鍵盤(pán)事件了。 設(shè)置啟動(dòng)窗體 多個(gè)窗體的應(yīng)用程序必須指定一個(gè)啟動(dòng)窗體 ? 有啟動(dòng)窗體 默認(rèn)情況下是第一個(gè)創(chuàng)建的窗體,否則: – 在“工程”菜單中,選“工程屬性” – 選“通用”選項(xiàng)卡 – 在“啟動(dòng)”列表框中,選中所要窗體 ***如果需要程序啟動(dòng)時(shí)的快速顯示窗體 *** 可以使用“ Splash屏幕” 模板創(chuàng)建一個(gè)啟動(dòng)屏幕窗體 ? 不使用啟動(dòng)窗體 – 在標(biāo)準(zhǔn)模塊 (.bas)中定義主過(guò)程 Main(類似 C的 main) Sub Main() …. End Sub – 在“啟動(dòng)”列表框中,選中“ Sub Main” 結(jié)束應(yīng)用程序 以下三種方法可以結(jié)束程序 : ? End語(yǔ)句,使應(yīng)用程序立即結(jié)束,所有對(duì)象都釋放,不觸發(fā) Unload和 QueryUnload事件 ? 只有一個(gè)窗體,在窗體代碼中使用 Unload me語(yǔ)句 ? 程序有多個(gè)窗體,使用 Forms集合和 Unload語(yǔ)句(此方法不常用) For i=0 to 1 Unload Forms(i) Next 消息框 MsgBox 消息框的組成: ? 圖標(biāo) ? 消息正文 ? 命令按鈕 ? 消息標(biāo)題 消息框之消息正文 MsgBox( prompt [,buttons] [,title] [,helpfile, context] ) ? prompt 對(duì)話框中顯示的消息 如果有多行信息,則每行結(jié)尾加上回車(chē)符chr(10) 和換行符 chr(13),或者常量 vbCrlf 如: “但愿人長(zhǎng)久” amp。 但字符串的值 , 值 A和值a是兩個(gè)不同的值 。 此外可以使用 “ 編輯 ” 工具欄進(jìn)行整段代碼左移 、 右移或進(jìn)行注釋等 使用編輯工具欄 ? “編輯 ” 工具欄通過(guò) 【 視圖 】 → 【 工具欄 】 菜單來(lái)選擇。 Private Sub Form_Click() Dim num As Integer num = InputBox(“請(qǐng)輸入數(shù)字 ) Print num * num End Sub ? 提示:雖然 Print方法是窗體的方法,但在當(dāng)前窗體下,可以省略窗體名。 ) 代碼如下: Private Sub Form_Resize() 0, 0, , End Sub 設(shè)計(jì)多個(gè)窗體的應(yīng)用程序 ? 執(zhí)行菜單命令“工程 |添加窗體”可以讓一個(gè)應(yīng)用程序包含多個(gè)不同界面的窗體。 Private Sub Form_KeyPress(KeyAscii As Integer) Select Case KeyAscii Case Asc(+) = * = * Case Asc() = * = * End Select End Sub
點(diǎn)擊復(fù)制文檔內(nèi)容
教學(xué)課件相關(guān)推薦
文庫(kù)吧 www.dybbs8.com
備案圖鄂ICP備17016276號(hào)-1