填空题

下面程序是用来打印九九乘法表的，请补充完整。 　　Dim i As Integer，j As Integer，Strl$ 　　Strl=" " 　　For i=1 To 9 　　Forj=1 To 9 　　　If 【 】 Then 　　　　　　Strl=Strl + Str$(j)+"X"+Str$(i)+"="+Str$(Val(i * j)) 　　　　Else 　　　Strl=Strl & Chr(13) 　　　 【 】 　　　　End If 　　　　Next j 　　Next i 　　Print Str

【参考答案】

j＜=i
<上一题 目录 下一题>
热门 试题

填空题
以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。Sub RecArea(L，W)Dim S As DoubleS=L*WMsgBox Total Area is & Str(S)End SubPrivate Sub Command1_Click()Dim M，NM=InputBox( What is the L )M=Val(M)【 】 N=Val(N)【 】 End Sub
填空题
有下面一个程序段，从文本框中输入数据，如果该数据满足条件，除以4余1，除以5余2则输出，否则，将焦点定位在文本框中，并清除文本框的内容。Private Sub Command1_Click( )x=Val(Text1．Text)If【 】 ThenPrint xElseText1．Text= 【 】 End IfEnd Sub
相关试题