题目内容
（请给出正确答案）
[主观题]
以下程序的功能是在程序运行后，单击命令按钮，输出如下结果： 1 4 7 2 5 8
3 6 9 请完善以下程序。 Private Sub Command1_Click() Dim Arr(3，3)As Integer For i=1 To 3 For j=1 To 3 Arr(i，j)=【 】 Print Arr(i，j)； Next j Print NeXt i End Sub
如搜索结果不匹配，请 联系老师 获取答案
更多“以下程序的功能是在程序运行后，单击命令按钮，输出如下结果： …”相关的问题
第1题
在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后，在列表框中选择一个项目，然后单击命令按钮，即可将所选择的项目删除，并在标签中显示列表框当前的项目数。 下面是实现上述功能的程序，请填空。 Private Sub Form_Load() List1.AddItem "AAAAA" List1.AddItem "BBBBB" List1.AddItem "CCCCC" List1.AddItem "DDDDD" End Sub Private Sub Command1_Click() Dim L1 As Integer L1=【 】 If L1 ＞=0 Then List1.RemoveItem【 】 Labell.Caption=【 】 Else MsgBox("请选择要删除的项目") End If End Sub
请帮忙给出正确答案和分析，谢谢！
第3题
在窗体上画一个文本框和一个命令按钮，如下图所示。
.jpg){kind=spacer}
编写如下程序： Private Sub Form_Load() Show Text1.Text=" " Form1.KeyPreview=False Text1.SetFocus End Sub Private Sub Command1_Click() KeyPreview=Not KeyPreview Print End Sub Private Sub Form_KeyPress(KeyAscii As Integer) Print UCase(Chr(KeyAscii+1))； End Sub Private sub Text1_KeyPress(KeyAscii As Integer) Print Chr(KeyAscii+2) KeyAscii=0 End Sub 阅读以上程序，理解每个事件过程的操作，然后填空。 ①程序运行后，直接从键盘上输入abc，程序输出的结果是【 】。 ②程序运行后，单击一次“命令按钮1”，然后从键盘上输入abc，程序输出的结果是【 】。
请帮忙给出正确答案和分析，谢谢！
热门考试
全部 >
