vb等級(jí)考試題目與評(píng)析66-閱讀頁
2024-09-24 13:01本頁面
【正文】 移動(dòng)（每次移動(dòng)一個(gè)刻度），移到最左端后，自動(dòng)回到最右端，再重新向左移動(dòng)。 該程序不完整，請(qǐng)把它補(bǔ)充完整。最后用原來的文件名保存工程文件和窗體文件。 vbCrLf For j = 1 To M Mat(i, j) = Int(Rnd * 100) S = S amp。 Next j Next i S = S amp。 矩陣對(duì)角線上的數(shù)為： amp。 Mat(i, j) amp。 第二小題： 該題 主要考查了計(jì)時(shí)控件的使用，在計(jì)時(shí)控件中可以通過設(shè)置 Interval屬性值來設(shè)定計(jì)時(shí)間隔（毫秒），通過設(shè)置 Enabled屬性來設(shè)置開始、停止計(jì)時(shí)，在計(jì)時(shí)器的 Timer事件中編寫代碼，當(dāng)計(jì)時(shí)器到達(dá)計(jì)時(shí)時(shí)間間隔時(shí)，它的 Timer事件將被觸發(fā)。窗體上有一個(gè)名稱為Text1的文本框，三個(gè)命令按鈕，名稱分別為 Command Command2和 Command3，標(biāo)題分別 為 讀文件 、 刪除 和 計(jì)算 /保存 。 要求： 1）要?jiǎng)h除的字母不區(qū)分大小寫。 3）編寫 計(jì)算 /保存 按鈕的事件過程。最后把修改后的文件按原文件名存盤。 \ For Input As 1 Do While Not EOF(1) Input 1, a$ S = S amp。 ch End If Next i = tmpStr End Sub Private Sub Command3_Click() Dim sum As Long, i As Integer sum = 0 For i = 1 To Len() sum = sum + Asc(Mid(, i, 1)) Next i Open am
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1