填空题
执行下列程序后输出如下所示矩阵,填空将程序补充完整。 1 0 0 2 0 3 4 0 0 5 6 0 7 0 0 8 Private SubCommand1_Click() Dim a(4,4) For i=1 To 4 For i=1 To 4 If
【9】
Then
【10】
a(i,j)=k Else a(i,j)=0 End If Print a(i,j); Next i Print Next i End Sub
【参考答案】
[9]i=j Or j=4-i+1 [10]k=k+1
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
对测试阶段中没有发现的错误所进行的测试、诊断、定位、纠错以及验证修改的回归测试过程称为 【4】 性维护。
点击查看答案&解析
填空题
在窗体上加上一个富文本控件RichTextBox,画一个命令按钮,当单击命令按钮的时候,将显示“保存文件”对话框,设置该对话框可用于保存文本文件(默认文件类型)和Word文档,然后将富文本控件中显示的内容以指定的文件名保存,完成程序。Private SubCommand1_Click()CommonDialogl.Filter= 【6】 CommonDialogl.FilterIndex= 【7】 CommonDialogl.ShowSaveRichTextBoxl.SaveFile 【8】 End Sub
点击查看答案&解析
相关试题
以下程序运行后的输出结果是 【11】 。...
以下程序的功能是:从键盘上输入若干个学生...