填空题
下列事件过程的执行结果为在窗体中依次输出______、______、______和 ______。 Private Sub Command1_Click() Dim c i = 0 c = Array(2, 4, 6, 8, 9) Do x = c(i) For j = 10 To x Step -2 n = j + x Next j Print n + j i = i + 1 Loop While j + n <> 22 End Sub
【参考答案】
4 10 16 22
点击查看答案
<上一题
目录
下一题>
热门
试题
填空题
下列程序用于输出一个主对角线上元素值为“*”,其他元素值为“#”的5×5阶的方阵,试将程序补充完整。Private Sub Command1_Click()Dim x(5, 5)For i = 1 To 5For j = 1 To 5If ______ Thenx(i, j) = ’*’Else______End IfPrint ______Next jPrintNext iEnd Sub
点击查看答案
填空题
在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序:Function a(x As Integer, y As Integer) As Integera = IIf(x > y, x, y)End FunctionPrivate Sub Command1_Click()Dim n As Integer, m As Integern = 10m = 20Print a(n, m)End Sub程序运行后,单击命令按钮,输出结果是______。
点击查看答案
相关试题
下列程序用于判断一个整数是否为质数,试将...
下列程序是将数组a的元素倒序交换,即第一...