vb實驗報告(含答案)(編輯修改稿)
2025-07-23 04:34 本頁面
【文章內(nèi)容簡介】 ” Then = a * bElseIf c = “/” ThenIf b = 0 Then MsgBox “除數(shù)為0” else = a / b End If End IfEnd Sub3. 通過單選按鈕和復(fù)選框控制文字的顯示,Command1命令的單擊事件的程序代碼是什么Private Sub Command1_Click()If = True Then = “宋體”ElseIf = True Then = “華文仿宋” ElseIf = True Then = “黑體” Else = “楷體_GB2312”End IfIf = True Then = 24ElseIf = True Then = 16Else = 8End IfIf = 1 Then = TrueElse = FalseEnd IfIf = 1 Then = TrueElse = FalseEnd IfIf = 1 Then = TrueElse = FalseEnd IfIf = 1 Then = TrueElse = FalseEnd IfEnd Sub實驗四 循環(huán)程序設(shè)計一．實驗?zāi)康模?．理解循環(huán)程序設(shè)計的特點。2．掌握常用的循環(huán)語句。 3．掌握常用的循環(huán)算法。4．掌握圖片框、圖像框和計時器。1k100∑1k50∑1+二．實驗內(nèi)容：1．求2．設(shè)計一條滾動的廣告字幕。三．實驗結(jié)果：對象屬性設(shè)置1． 求和結(jié)果要求窗體載入時直接顯示，設(shè)置窗體的某個屬性。對象屬性屬性值說明Form1AutoRedrawTrue窗體2． 滾動字幕。對象屬性屬性值說明Label1Caption“歡迎使用VB”標簽Timer1Interval1000時鐘四．實驗思考：1．求和的窗體載入事件的程序代碼是什么？Private Sub Form_Load() Dim k%, s!s = 0For k = 1 To 100 s = s + 1 / kNext kFor k = 1 To 50 s = s + kNext kPrint sEnd Sub2．滾動字幕的觸發(fā)時鐘控件的程序代碼是什么？。Private Sub Timer1_Timer()If Then = 0Else = + 100End IfEnd Sub 實驗五 數(shù)組程序設(shè)計一．實驗?zāi)康模?．熟練掌握固定數(shù)組。2．掌握動態(tài)數(shù)組。 3．掌握列表框和組合框。4．了解直線控件和形狀控件。二．實驗內(nèi)容：1．設(shè)計一個程序，找出數(shù)組中的最大值、最小值，并計算所有元素的平均值。在列表框中隨機產(chǎn)生10個100到200之間的整數(shù)，在文本框中顯示結(jié)果信息。界面如圖51所示。圖51 窗體界面三．實驗結(jié)果：對象屬性設(shè)置對象屬性屬性值說明Label1Caption 10個100到200之間的整數(shù)標簽Label2Caption 最大值標簽Label3Caption 最小值標簽Label4Caption平均值標簽Command1Caption計算命令按鈕Text1—Text4Text““文本框四．實驗思考：1．數(shù)組
公司管理相關(guān)推薦
鄂ICP備17016276號-1