首页/ 题库 / [单选题]当Form1_Click事件发生时,窗体的答案

当Form1_Click事件发生时,窗体上显示的第三行是( )。 Option Base 1 Private Sub Form_Click() Dim i As Integer,j As Integer Dim k As Integer,a(5,5)As Integer For i=1 To 5 k=1 For j=1 To 5 If i<=j Then a(i,j)=k k=k+1 Else a(i,j)=1 End If Next j Next i For i=1 To 5 For j=1 To 5 Print a(i,j); Next j Print Next i End Sub

单选题
2022-01-03 23:45
A、1 2 3 4 5
B、1 1 2 3 4
C、1 1 1 2 3
D、1 1 1 1 2
查看答案

正确答案
C

试题解析
解析:本题首先定义了一个5行5列的数组,然后通过一个二重For循环给它的每个元素赋初值,赋值规律是左上右下对角线下面的元素值为1,该对角线上元素的值为1,该对角线上面的元素值在前一元素值的基础上增加1。接着通过一个两层For循环按行输出二维数组a,故输出的第三行为“11123”。

标签:
感兴趣题目
当延期事件发生时应按要求提交()
抢劫事件发生时,员工要()。
当Form1_Click事件发生时,窗体上显示的第三行是( )。 Dim i As Integer,j As Integer,a(5,5) As Integer For i=1 To 5 For j=1 To 5 If(i<=j)Then a(i,j)=1 Else a(i,j)=0 End If Next j Next i For i=1 To 5 For j=1 To 5 Print a(i,j), Next j Print Next i End Sub
在窗体上画—今名称为Cmmand1的命令按钮,然后编写如下事件过程 Option Base 1 Private Sub Command1_Click() Dim a(5,5)As Integer For i=1 To 5 For j=1 To 5 a(i,j)=(i+j)*510 Next j Next i s=0 For i=1 To 5 s=s+a(i,i) Next i Print s End Sub
当Form1_Click事件发生时,窗体上显示的第三行是( )。 Option Base 1 Private Sub Form_Click() Dim i As Integer,j As Integer Dim k As Integer,a(5,5)As Integer For i=1 To 5 k=1 For j=1 To 5 If i<=j Then a(i,j)=k k=k+1 Else a(i,j)=1 End If Next j Next i For i=1 To 5 For j=1 To 5 Print a(i,j); Next j Print Next i End Sub
当Form1_Click事件发生时,程序的输出结果是( )。 Private Sub Form_Click() Dim M As Integer,k As Integer,t As Integer M=5:k=7 Select Case M Case Is<0 M=M+5 Case 1 To 10 t=M:M=k:k=t Case Else M=k Mod 3 End Select Print M,k,t End Sub
只有当输入事件之一发生时才能导致输出事件发生,而当有两个或两个以上输入事件发生时,输出事件则不发生,表示这种逻辑关系的是()。  
2001年911事件发生时,正在举行哪个国际性车展()
进程状态转换图中,当等待某事件发生时,进程处于()状态。
当Form_Click;事件发生时,窗体上显示的第三行是 ______。 Private Sub Form_Click() Dim i As Integer, j As Integer, k As Integer Dim x(5, 5) As Integer For i = 1 To 5 k = 1 For j = 1 To 5 If i <= j Then x(i, j) = k + 1 k=k+2 Else x(i, j) = k + 1 End If Next j Next i For i = 1 To 5 For j = 1 To 5 Print x(i, j) Next j Print Next i End Sub
当发生Form_Click事件时,窗体上显示的第三行是( )。 Option Base 1 Private Sub Form_Click() Dim i As Integer,j As Integer,k As Integer Dim a(5,5)As Integer For i=1 To 5 k=1 For i=1 To 5 If(i<=j)Then a(i,j)=k k=k+2 Else a(i,j)=k+1 End If Next j Next i For i=1 To 5 For j=1 To 5 Print a(i,j); Next j Print Next i End Sub
在窗体上画两个单选按钮,名称分别为Option1、Option2,标题分别为“宋体”和“黑体”;1个复选框(名称为Check1,标题为“粗体”)和1个文本框(名称为Text1,Text属性为“改变文字字体”),窗体外观如图所示。程序运行后,要求“宋体”单选按钮和”粗体”复选框被选中,则以下能够实现上述操作的语句序列是(  )。
相关题目
下列()事件发生时,相关公司需公布基金澄清公告()。
人寿保险是以()为保险标的,当事件发生时,保险人履行给付保险金责任的一种保险。
要使数组的默认下标从“1开始,则应在窗体或标准模块代码的声明部分使用语句Option Base 1。 ( )
在操作系统中,当一个中断(或事件)发生时,CPU的反应是( )。
当"拉尼娜"发生时,往往会出现的现象是()。
能够在不利事件发生时及时发现的控制手段是( )。
在窗体上画1个命令按钮,并编写如下事件过程:Private Sub Command1_Click()For i=5 to 1 step -08Print Int(i);Next iEnd Sub运行程序,单击命令按钮,窗体上显示的内容为________。
下列事件发生时医师应当听从卫生行政部门调遣()
紧急事件发生时,通过()可以实现对显示屏播放内容的完全控制。
当窗体最小化后,再次还原成为活动窗体时将自动触发Paint事件。
当瘟疫类疾病发生时病室中嗅到的气味是()
当瘟疫类疾病发生时病室中嗅到的气味是()。
()指事故树中某些基本事件的集合,这些事件均不发生时,顶上事件必然不发生。
在DblClick事件发生时,不会同时发生的事件是( )。
当事件发生时()
促使或引起风险事件发生或风险事件发生时,致使损失增加、扩大的原因或条件是()
若随机事件A和B同时发生时,事件C发生,则()。
设事件A与B同时发生时,事件C必发生,则正确的结论是()。
当事件A与B同时发生时,事件C必发生,则下列结论正确的是( )。
当事件A与B同时发生时,事件C必发生,则下列结论正确的是( )。
广告位招租WX:84302438

免费的网站请分享给朋友吧