【正文】
題信息”)Select Case i Case 6 MsgBox “你剛才點擊的按鈕是《是》按鈕!”, 0 + 64 + 0, “標題信息” Case 7 MsgBox “你剛才點擊的按鈕是《否》按鈕!”, 0 + 64 + 0, “標題信息” Case 2 MsgBox “你剛才點擊的按鈕是《取消》按鈕!”, 0 + 64 + 0, “標題信息” End Select End SubD、循環(huán)結(jié)構(gòu)FOR NEXT語句 ——求1100的整數(shù)和Private Sub Command0_Click()Dim s As Integer s = 0 For i = 1 To 100 Step 1 s = s + i Next i MsgBox “你現(xiàn)在求解的是1——100的整數(shù)和” amp。 “=” amp。 s End Sub ——求19的乘法口訣Private Sub Command0_Click()For i = 1 To 9 For j = 1 To i s = s + CStr(i)+ “*” + CStr(j)+ “=” + Right(CStr(100 + i * j), 2)+ “ ” Next j s = Replace(s, “=0”, “= ”)+ Chr(13)+ Chr(10)Next i = s End SubE、循環(huán)結(jié)構(gòu)DO WHILE??LOOP語句 Private Sub Command0_Click()Dim i As Integer i = 0 Do While i F、循環(huán)結(jié)構(gòu)DO UNTIL??LOOP語句 Private Sub Command0_Click()Dim i As Integer i = 0 Do Until i = 5 i = i + 1 Loop MsgBox i End SubG、循環(huán)結(jié)構(gòu)DO??LOOP WHILE語句 Private Sub Command0_Click()Dim i As Integer i = 0 Do i = i + 1 Loop While i H、循環(huán)結(jié)構(gòu)DO??LOOP UNTIL語句 Private Sub Command0_Click()Dim i As Integer i = 0 Do i = i + 1 Loop Until i = 5 MsgBox i End SubI、循環(huán)結(jié)構(gòu)WHILE??WEND語句——do while??loop(退出exit do)Private Sub Command0_Click()Dim i As Integer i = 0 Do While i = 3 Then Exit Do End If Loop MsgBox i End Sub ——while??wend(退出goto)Private Sub Command0_Click()Dim i As Integer i = 0 While i = 3 Then GoTo label End If Wend label: MsgBox i End SubJ、其他語句——標號和GOTO語句關(guān)于GOTO語句,實現(xiàn)簡單跳轉(zhuǎn),比較直接,而且比較簡單,但是復(fù)雜的跳轉(zhuǎn),盡量避免使用,這樣不利于程序的維護和管理。五、實訓(xùn)小結(jié)與討論:自己書寫,實訓(xùn)的心得體會,學(xué)會了什么,有什么不足,不少于200字。六、儀器與耗材:(1)支持的操作系統(tǒng):WindowsWindows Server 2008 RWindows Server 2008 SPWindows Vista SPWindows 10(2)32位系統(tǒng):具有Intel 1GHz(或同等性能的兼容處理器)或速度更快的處理器(建議使用2GHz或速度更快的處理器)的計算機(3)64位系統(tǒng): GHz或速度更快的處理器(4)最低1GB RAM(建議使用2GB或更大的RAM)(5) GB可用硬盤空間實訓(xùn)五(會計與審計(1)班——實訓(xùn)時間:2016年5月26日)(會計與審計(2)班——實訓(xùn)時間:2016年5月30日)(會計與審計(3)班——實訓(xùn)時間:2016年5月26日)(會計與審計(4)班——實訓(xùn)時間:2016年5月27日)一、實訓(xùn)名稱:Web數(shù)據(jù)庫、數(shù)據(jù)安全二、實訓(xùn)目的: Services組件 :一是系統(tǒng)運行安全、二是數(shù)據(jù)庫應(yīng)用系統(tǒng)安全 、簽名、分發(fā)數(shù)據(jù)庫三、實訓(xùn)原理與方法: 、簽名、分發(fā)的概念 四、實訓(xùn)內(nèi)容與過程(結(jié)論):(1)Web數(shù)據(jù)庫的創(chuàng)建(2)Web數(shù)據(jù)庫對象的創(chuàng)建(3)數(shù)據(jù)庫的加密與解密(4)數(shù)據(jù)庫的備份與恢復(fù)(5)數(shù)據(jù)庫的壓縮與修復(fù)(6)數(shù)據(jù)庫在受信任位置(7)數(shù)據(jù)庫的打包、簽名、分發(fā)(8)打開數(shù)據(jù)庫時啟用禁用的內(nèi)容 (結(jié)論)(1)Web數(shù)據(jù)庫的創(chuàng)建步驟文件選項卡,點擊新建,在可用模板中選擇空白Web數(shù)據(jù)庫,輸入名稱,點擊新建。(2)Web數(shù)據(jù)庫對象的創(chuàng)建步驟 Web數(shù)據(jù)庫對象的創(chuàng)建步驟與桌面數(shù)據(jù)庫對象創(chuàng)建大體一致。(3)數(shù)據(jù)庫的加密與解密步驟A、以獨占方式打開數(shù)據(jù)庫,打開對話框的打開按鈕右側(cè)的箭頭,選擇獨占方式打開。B、文件選項卡,信息命令,用密碼進行加密按鈕,注意解密操作一致。(4)數(shù)據(jù)庫的備份與恢復(fù)步驟A、備份:文件選項卡,保存并發(fā)布命令,數(shù)據(jù)庫另存為命令,備份數(shù)據(jù)庫。B、恢復(fù):正常打開使用即可,注意有必要時可以更改文件名。(5)數(shù)據(jù)庫的壓縮與修復(fù)步驟A、當前數(shù)據(jù)庫:文件選項卡,信息命令,壓縮并修復(fù)數(shù)據(jù)庫按鈕。B、未打開數(shù)據(jù)庫:數(shù)據(jù)庫工具選項卡,壓縮并修復(fù)數(shù)據(jù)庫按鈕。C:自動壓縮與修復(fù):文件選項卡,選項命令,進行設(shè)置。(6)數(shù)據(jù)庫在受信任位置的設(shè)置步驟文件選項卡,選項命令,打開對話框,信任中心,信任中心位置按鈕,受信任位置,添加新位置按鈕。(7)數(shù)據(jù)庫的打包、簽名、分發(fā)步驟A、創(chuàng)建簽名包:文件選項卡,保存并發(fā)布,數(shù)據(jù)庫另存為,打包并簽署。B、提取并使用簽名包:文件選項卡,打開對話框,選擇Microsoft Access簽名包(*.accdc)。C、注意事項:受信任位置和不受信任位置的區(qū)別。(8)打開數(shù)據(jù)庫時啟用禁用的內(nèi)容數(shù)據(jù)庫處在不受信任位置,打開時會出現(xiàn)消息欄,提示啟用內(nèi)容,應(yīng)該放在受信任位置。五、實訓(xùn)小結(jié)與討論:自己書寫,實訓(xùn)的心得體會,學(xué)會了什么,有什么不足,不少于200字。六、儀器與耗材:(1)支持的操作系統(tǒng):WindowsWindows Server 2008 RWindows Server 2008 SPWindows Vista SPWindows 10(2)32位系統(tǒng):具有Intel 1GHz(或同等性能的兼容處理器)或速度更快的處理器(建議使用2GHz或速度更快的處理器)的計算機(3)64位系統(tǒng): GHz或速度更快的處理器(4)最低1GB RAM(建議使用2GB或更大的RAM)(5) GB可用硬盤空間