首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base0 Dim a()As Integer,m As Integer Private Sub Command1_Click() m=InputBox("请输入一个正
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base0 Dim a()As Integer,m As Integer Private Sub Command1_Click() m=InputBox("请输入一个正
admin
2018-06-20
49
问题
窗体上有Command1、Command2两个命令按钮。现编写以下程序:
Option Base0
Dim a()As Integer,m As Integer
Private Sub Command1_Click()
m=InputBox("请输入一个正整数")
ReDim a(m)
End Sub
Private Sub Command2_Click()
m=InputBox("请输入一个正整数")
ReDim a(m)
End Sub
运行程序时,单击Command1后输入整数10,再单击Command2后输入整数5,则数组a中元素的个数是( )。
选项
A、5
B、6
C、10
D、11
答案
B
解析
程序中Option Base0表示指定数组的下标默认下界为0。ReDim语句用来重新定义动态数组,按定义的上下界重新分配存储单元。在一个程序中,可以多次用ReDim语句定义同一个数组,随时修改数组中元素的个数。程序中先执行ReDim a(10),然后执行了ReDim a(5),因此数组a的下界为0,上界为5,共有6个元素。
转载请注明原文地址:https://www.kaotiyun.com/show/HYGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
某人为计算n!(0<n<=12)编写了下面的函数过程:PrivateFunctionfun(nAsInteger)AsLongDimPAsLongp=1
设窗体上有Textl、Text2两个文本框,并编写了下面的程序代码:PrivateSubTextl_KeyPress(KeyAsciiAsInteger)If"A"<=Chr(KeyAscii)AndChr(KeyA
假定有如下的程序段:DimintVarAsIntegerintvar=TruePrintintVar则输出结果是
为了显示弹出式菜单,要使用
为了保存数据,需打开顺序文件“E:\UserData.txt”,以下正确的命令是
设有如下程序:PrivateSubForm_Click()num=InputB0x(”请输入一个实数”):P=InStr(num,”.”)Ifp>0Then
窗体上建立了一个名为CommonDialongl的通用对话框,用下面的语句建立一个对话框:CommonDialongl.Action=2,则以下语句与之等价的是()。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml标题为”选课”的窗体上画一个复选框数组,名称为CHl,共有四个复选框,按顺序其标题分别是”数学”、”语文”、”外语”、”计算机”,其中”语文”、”计算机”复选
假定在图片框Picturel中装入了一个图片,在程序运行中,为了清除该图片(注意,清除图片,而不是删除图片框),应采用的正确方法是()。
在窗体画一名为CommonDialogl,则下列与CommonDialogl.ShowOpen方法等效的语句是
随机试题
()’=()
服碘番酸后胆囊显影达最高浓度的时间是
胃有积热,牙痛牵引头脑,面颊发热,其齿恶热喜冷,或牙龈溃烂,牙宣出血,唇舌颊腮肿痛,口气热臭,舌红苔黄,脉滑大而数者。治宜选用
男性,35岁。间断腹泻,脓血便4年,再发1个月。口服抗生素无缓解。结肠镜检示:直肠和乙状结肠弥漫充血水肿,黏膜粗颗粒样改变,质地脆,易出血。活动期黏膜活检可能的病理发现是
下列哪项为有出血的血小板减少症患者的早期症状
根据公司设立的有关规定,下列哪一说法是错误的?
混凝土浇筑时,出料口距离工作面大于()时,应采用溜槽或串筒等措施。
根据《税收征收管理法》的规定,纳税人未按规定期限缴纳税款的,税务机关除责令其限期缴纳外,从滞纳税款之日起,按日加收滞纳金。该滞纳金的比例是滞纳税款的( )。
A公司于2016年12月31日购入不需安装的设备一台并投入使用。该设备入账价值为1800万元,采用年限平均法计提折旧(税法规定采用双倍余额递减法),折旧年限为5年(与税法规定一致),预计净残值为零(与税法规定一致)。该公司从2018年1月1日开始执行新会计
Itisnotsmallfoodproductionthatpresentsathreattoourhealth,butlarge-scalefactoryfarming.MadCowDisease,with
最新回复
(
0
)