填空题

下面程序是用来打印九九乘法表的，请填空。
Dim i As Integer，j As Integer，Str1 $
Str1=""
For i=1 To 9
For j=1 To 9
If [12] Then
Str1=Str1+Str$(j)+"X"+Str$(i)+"="+Str$(Val(i*j))
Else
Str1=Str1 & Chr(13)
[13]
End If
Next
Next
Print Str1

【参考答案】

[12] j＜=i
[13] Exitfor
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画两个文本框和一个命令按钮，然后在代码窗口中编写如下事件过程： Private Sub Command1_Click() Text1.Text= VB Programming Text2.Text=Text1.Text Text1.Text= ABCD End Sub 程序运行后，单击命令按钮，Text1文本框中显示的内容为______。
填空题
下列事件过程的功能是：建立一个名为Data1的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度：1，2，3，…，90。请在空白处填入适当的内容，将程序补充完整。 Private TyPe Ang K As Integer Sinx As Single Cosx As Single End TyPe Dim Ksc As Ang Private Sub Form_Click() Dim Y As Single Open ______ Y=3.14159 180 For i=1 T0 90 Ksc.K=i Ksc.Sinx=Sin(i*Y) Ksc.Cosx=Cos(i*Y) Put #2，i，Ksc Next i Close #2 End Sub
相关试题