问题
填空题
子过程Test显示如下所示的4×4乘法表。
1*1=1 1*2=2 1*3=3 1*4=4
2*2=4 2*3=6 2*4=8
3*3=9 3*4=12
4*4=16
请在空白处填入适当的语句使子过程完成指定的功能。
Sub Test()
Dim i,j As Integer
For i=1 To 4
For i=1 To 4
If ______ Then
DebugPrint i&"*"&j&"="&i*j&Space(2),
End If
Next j
Debug.Print
Next i
End sub
答案
参考答案:i<=j
解析: 该程序中变量i和j是作为乘数定义的,同时也起到控制循环的作用,本程序中定义了两个For循环,“For i=1 To 4”为外循环,表示变量i的值从1到4,步长为1(当步长为l时,关键字Step可省略),“For i=1 To 4”为内循环,表示变量i的值从1到4,步长为1,根据要求,输出结果是一个4×4的乘法表,所以If后的条件填“i<=j”。