计算机二级考试VB上机题级答案参照.pdfVIP

一、盘上有一名为“ 36test11.vbp ”的文件。其功能为打印如下图所示的金字塔。 请改正该程序并调试。 Private Sub Command1_Click() For i = 1 To 9 Print Space(16 - i) For j = 1 To i Print Format(j, 0); Next j If i 1 Then For j = i - 1 To 1 Step -1 Print Format(j, 0) Next j End If Print Next i End Sub Private Sub Form_Load() Command1.Caption = 开始 End Sub 二、 1、建立一个窗体，单机“生成随机数”按钮，生成 n 个【 6,30】闭区间内的随机偶数 存放于列表框 list1 中。其中， n 的值也是一个【 10,20】之间的一个随机数。 2、单击“查找完数”按钮，找出