首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a( )As Integer,m As Integer Private Sub Command1 Chek( )
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a( )As Integer,m As Integer Private Sub Command1 Chek( )
admin
2020-08-10
46
问题
窗体上有Command1、Command2两个命令按钮。现编写以下程序:
Option Base 0
Dim a( )As Integer,m As Integer
Private Sub Command1 Chek( )
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 Base 0表示指定数组的下标默认下界为0。ReDim语句用来重新定义动态数组,按定义的上下界重新分配存储单元。在一个程序中,可以多次用ReDim语句定义同一个数组,随时修改数组中元素的个数。程序中先执行ReDim a(10),然后执行了ReDim a(5),因此数组a的下界为0,上界为5,共有6个元素。
转载请注明原文地址:https://www.kaotiyun.com/show/ylHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimnAsLong,sAsStringn=InputBox("输入一个数")DoWhilen0s=s&nMod10:s
下面关于VB应用程序的叙述中正确的是
VisualBasic中的“启动对象”是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic“启动对象”的描述中,错误的是
数学式y2>x>=10在VB中应表示为
以下关于控件的叙述中,正确的是
窗体上有名称为Command1的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()Text1.Text="程序设计"TeXtl.SetFocusEndSubPriv
设x是小于10的非负数。对此陈述,以下正确的VB表达式是
下面关于菜单的叙述中正确的是
数列1,1,3,5,9,15,25,41,…,的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图3—192所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,单击
在考生文件夹下有一个工程文件vbsj5.vbp,其功能是:①单击“读数”按钮,则把考生文件夹下in5.dat文件中的100个0~999之间的整数读入数组a中;②单击“计算”按钮,则对这100个数中的水仙花数(当一个数的值等于该数中各位数字的立方和时,此数
随机试题
220V灯线,相线必须经开关装设,用螺口灯头时,相线应接在灯头中心弹簧的端头上。()
绘制初步网络图一般按()的步骤进行。
某城市供电部门对城区内供电管网进行改造,其建设安装工程费180077元,设备购置费3200万元,依据《建设工程监理范围和规模标准规定》,该工程()。
根据《水电建设工程质量管理暂行办法》,事故调查权限按以下原则确定()。
商业银行的最高风险管理/决策机构是()。
根据我国《劳动法》的规定,用人单位与工会和劳动者协商后,一般情况下加班时间为()。
设有如下函数定义:#includeintfun(intk){if(k<1)return0;elseif(k==1)return1;elsereturnfun(k-1)+1:
Completethenotesbelow.WriteNOMORETHANTWOWORDSforeachanswer.NecessaryimprovementstotheexistingSelf-
Inthesentence"Thebasketfullofsomefruitsbelongstotheoldwoman",theitalicizedpartis
A、Oneday.B、Twodays.C、Threedays.D、Fourdays.BHowlongwillthesports-meetinglast?
最新回复
(
0
)