题目内容

执行下面程序后,显示的结果是____。x = Int(Rnd) + 3Select Case xCase 4 Print "优"Case 3 Print "良"Case Else Print "差"End Select

查看答案

搜索结果不匹配？点我反馈

更多问题

执行如下代码,输出的结果是____。 k = 0: a = 0Do While k < 70 k = k + 2 k = k * k + k a = a + kLoopPrint a

执行下面的代码,窗体上显示的是____。 Dim x%, y%, z%x = 242: y = 44z = x * yDo Until x = y If x > y Then x = x - y Else y = y - xLoopPrint x

程序运行时输出的结果是____。Option Base 1Private Sub Form_Click()Dim a(30)For i=1 To 5j=i*i a(j)=jNext iPrint a(25);End Sub

单击命令按钮command1后,程序代码执行结果为 ____ 。 Private Sub Command1_Click() sum = p(1) + p(2) + p(3) Print sumEnd SubPublic Function p(n As Integer) t = 1 For i = 1 To n t = t * i Next i p = tEnd Function