vb實驗報告(含答案)-資料下載頁
2025-06-26 04:34本頁面
【正文】 (m As Integer, n As Integer) As Integer Dim r As Integer r = m Mod nDo While r 0 m = n n = r r = m Mod nLoopgbs = nEnd Function3. 拖動滾動條的滑塊，可改變圖片控件的背景顏色，三個滾動條的程序代碼相似，請寫出HScroll1的事件過程。Dim r As Integer, g As Integer, b As IntegerPrivate Sub HScroll1_Change()r = g = b = = RGB(r, g, b)End Sub實驗七 界面設(shè)計一．實驗?zāi)康模?．掌握多窗體程序設(shè)計的方法。2．掌握下拉式菜單。3．了解通用對話框。二．實驗內(nèi)容：。在窗體1輸入用戶名和密碼，如果密碼正確就彈出第二個窗體，第二個窗體自 行設(shè)計操作內(nèi)容；如果密碼不正確，彈出信息框，顯示”用戶名或密碼錯誤，請重新輸入”，回到窗體1繼續(xù)輸入用戶名和密碼。密碼輸入有三次機(jī)會，超過三次就彈出第三個窗口，顯示”對不起，你不能使用該系統(tǒng)！”（注：凡是文字提示內(nèi)容可自行設(shè)計，不要求與題目一樣。三個窗體界面可參照圖71 圖72 圖73所示。）圖71圖72圖73 ，具有打開、保存、字體、顏色功能。要求用菜單實現(xiàn)，有”文件”和”格式”兩個菜單，”文件”菜單下包含”打開”、”保存”和”退出”三項?！备袷健辈藛蜗掳弊煮w”和”顏色”兩項，打開文件顯示在文本框中。（窗體界面可參照圖74 所示。）圖74三．實驗結(jié)果：對象屬性設(shè)置1．設(shè)置三個窗體的控件及其屬性。對象控件名稱屬性屬性值Form1Form1CaptionForm1Form2Form2CaptionForm2Form3Form3CaptionForm32．設(shè)置窗體控件及屬性值。對象控件名稱屬性屬性值窗體Form1CaptionForm1文本框1Text1TextText1打開OpenCaption打開保存SaveCaption保存退出ExitCaption退出字體FontCaption字體顏色ColorCaption顏色四．實驗思考：1．下列程序為實驗內(nèi)容1的部分程序代碼，單擊確定命令按鈕的程序代碼是什么？Private Sub Form_Load() = “*” = ““ = ““End SubPrivate Sub Command1_Click()Static i As Integeri = i + 1If i = 3 Then Exit SubEnd IfIf = “abc” And = “123” Then Else MsgBox “用戶名或密碼錯誤，請重新輸入” = ““ = ““End ifEnd Sub歡迎您的光臨，！希望您提出您寶貴的意見，你的意見是我進(jìn)步的動力。贈語； 如果我們做與不做都會有人笑，如果做不好與做得好還會有人笑，那么我們索性就做得更好，來給人笑吧！ 現(xiàn)在你不玩命的學(xué)，以后命玩你。我不知道年少輕狂，我只知道勝者為王。不要做金錢、權(quán)利的奴隸；應(yīng)學(xué)會做“金錢、權(quán)利”的主人。什么時候離光明最近？那就是你覺得黑暗太黑的時候。最值得欣賞的風(fēng)景，是自己奮斗的足跡。壓力不是有人比你努力，而是那些比你牛幾倍的人依然比你努力。
公司管理相關(guān)推薦
鄂ICP備17016276號-1