填空题

下列程序用于输出一个主对角线上元素值为“*”，其他元素值为“#”的5×5阶的方阵，试将程序补充完整。 Private Sub Command1_Click() Dim x(5, 5) For i = 1 To 5 For j = 1 To 5 If ______ Then x(i, j) = ’*’ Else ______ End If Print ______ Next j Print Next i End Sub

【参考答案】

i=j x(i,j)="#" Print x(i,j)；
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个命令按钮，其名称为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程序运行后，单击命令按钮，输出结果是______。
单项选择题
单击命令按钮，并在对话框内依次输入5，7，6下列程序段的执行结果为______。 Private Sub Command1_Click() Dim n AS Integer, a As Integer, b As Integer, c As Integer n = 0 For i = 1 To 3 a = InputBox ( 请输入数字 ) n = n+a*a If n ＞ 50 Then GoTo ex End If Next i ex: Print n End Sub
A．25
B．74
C．85
D．110
相关试题