首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下程序: Option Base 1 Dim a(3, 4)As Integer, b(4, 3)As Integer Private Sub Command1_Click() ’循环1 For i=1 To 3 For j=1 To 4
设有如下程序: Option Base 1 Dim a(3, 4)As Integer, b(4, 3)As Integer Private Sub Command1_Click() ’循环1 For i=1 To 3 For j=1 To 4
admin
2019-03-14
58
问题
设有如下程序:
Option Base 1
Dim a(3, 4)As Integer, b(4, 3)As Integer
Private Sub Command1_Click()
’循环1
For i=1 To 3
For j=1 To 4
b(j, i)=a(i, j)
Next j
Next i
’循环2
x=b(1, 1)
For i=1 To 4
For j=1 To 3
Print b(i, j);
If x
Next j
Print
Next i
End Sub
程序中的数组a已被赋值。以下关于上述程序的叙述中,正确的是( )。
选项
A、窗体模块中,不能使用Dim声明a、b数组
B、循环1可以正常运行
C、循环2中循环变量i、j的终值不对,所以不能正常运行
D、程序可以正常运行,x中保存的是数组b中所有元素中最小的数
答案
B
解析
Dim用于在标准模块、窗体模块或过程中定义变量或数组。程序可以正常运行,x中保存的是数组b元素中的最大值。
转载请注明原文地址:https://kaotiyun.com/show/8BUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名为Command1的命令按钮,然后编写以下程序:PrivateSubCommand1Click()DimM(10)AsIntvgerFork=1To10M(k)=12-kNextkx=8PrintM(2+M(
以下程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以5余2”的条件,则在窗体上输出文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容,在横线处应填写()。PrivateSubCommand1_Click(
在窗体上建立一个命令控件数组Commandl,并双击第一个命令按钮,编写如下事件过程:PrivateSubCommand1_Click(IndexAsInteger)Commandl(index).Caption=FormatS(Now,“h
为了在按下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的()属性设置为True。
用户在组合框中输入或选择的数据可以通过一个属性获得,这个属性是()。
以下事件过程的功能是:从已存在于磁盘上的顺序文件Numl.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件Num2.txt中。则在以下横线处合适的语句是()。PrivateSubFormClick()Dim
在窗体Form1上放一个名为Text1的文本框和一个名为Command1的命令按钮,然后编写一个事件过程。要求程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“VB等级考试二级”。以下能正确实现上述操作的事件过程是()。
软件是指
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是
某二树有5个度为2的结点,则该二叉树中的叶子结点数是()。
随机试题
猪维生素B2缺乏症的症状不包括
能在无生命培养基上生长繁殖的最小的原核细胞型微生物是
腹痛的基本病机是
关于电气设备及灯具施工方法的说法,正确的有()。
在隐蔽工程施工过程中,承包人完成自检后,应在隐蔽前()小时以书面形式通知监理工程师验收。
企业集团财务公司发行金融债券后资本充足率不低于()
甲想去澳门赌博,但苦于没有资金,遂与乙携匕首将企业主丙劫持到宾馆客房,要求丙筹款。丙以参与竞标名义让财务送来2000万元银行承兑汇票。乙继续看守丙,甲携汇票至澳门赌博,获利650万元,第三天甲回来,将2000万元汇票还给丙。并支付32万元利息。下列判断
根据《社区矫正法》,下列社区矫正对象,经县级司法行政部门负责人批准,可以对其使用电子定位装置,加强监督管理的是()。
人们偶然看到天上的朵朵白云会下意识地脱口说出它像棉絮、小山等,这种心理现象是()
下面有关NTFS文件系统优点的描述中,(5)是不正确的。要把FAT32分区转换为NTFS分区,并且保留原分区中的所有文件,不可行的方法是(6)。
最新回复
(
0
)