首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下程序: Option Base 1 Dim a(3,4)As Integer,b(4,3)As Integer Private Sub Command1_Click() 循环1 For i=1
设有如下程序: Option Base 1 Dim a(3,4)As Integer,b(4,3)As Integer Private Sub Command1_Click() 循环1 For i=1
admin
2015-08-13
35
问题
设有如下程序:
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<b(i,j)Then x=b(i,j)
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/HvQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮时,下列程序代码的执行结果为()FunctionFirProc(xAsInteger,yAsInteger,zAsInteger)FirProc=2*x+y+3*zEndFu
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommandl—Click()x=InputBox(“请输入一个整数”)Printx+345EndSub程序运行后,单击
下列关于Do…Loop语句的叙述不正确的是()
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下两个事件过程:PrivateSubCommandlClick()a=
阅读以下程序:PrivateSubForm_click()Dimk,n,mAsintegern=20m=1k=1DoWhile
为了把一个记录型变量的内容写入文件中指定的位置,所使用的语句的格式为______。
窗体的左右两端各有1条直线,名称分别为Linei、Line2;名称为Shapel的圆靠在左边的Linel直线上(见图);另有1个名称为Timerl的计时器控件,其Enabled属性值是True。要求程序运行后,圆每秒向右移动100,当圆遇到Line2时则停
设x是整型变量,与函数IIf(X>0,-x,x)有相同结果的代数式是
(1)在名称为Forml的窗体中画一个名称为Textl的文本框,再添加一个名称为Timer1的计时器。请设置适当的控件属性并编写适当的事件过程,使得程序在运行时,每隔3秒钟文本框中的数字加1,如图62—3所示。程序中不得使用任何变量。注意:存盘时
表达式(7\3+1)*(18\-1)的值是______。
随机试题
如果系统只有一个临界资源,同时有很多进程要竞争该资源,那么系统_______发生死锁。
下列资产负债表项目中,不能根据总账余额直接填列的是()。
脊髓半横断后,在断面以下出现()
A急性肾衰竭B急性肾小球肾炎C慢性肾衰竭D慢性肾小球肾炎E肾病综合征大量蛋白尿,血浆蛋白<30g/L
有关mRNA的叙述,哪项是错误的
背书的绝对记载事项有()。
下列不属于基金管理人应履行的职责的是()
新业影视公司于2019年年底推出一档贺岁片。该片公映前,公司召开新片发布会,全体创作人员、导演和阵容强大的主要演员集体在媒体和影视界嘉宾前亮相,宣称此片将“进军奥斯卡”。公司在会上散发了该片的精彩剧照,透露了令人捧腹的拍摄花絮,并请与会人员免费观看了该片的
设w=f(u)可导,u=φ(x,y)具有连续偏导数,则必有()
(1)Thishasbeenquiteaweekforliterarycoups.Inanalmostentirelyunexpectedmove,theSwedishAcademyhavethislunchtime
最新回复
(
0
)