首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个文本框,其名称为Textl,然后编写如下程序: Option Base 1 Private Sub Form_Click()Dim Arr(10)As Integer For i=6 To 10 Arr(i
在窗体上画一个文本框,其名称为Textl,然后编写如下程序: Option Base 1 Private Sub Form_Click()Dim Arr(10)As Integer For i=6 To 10 Arr(i
admin
2020-01-02
28
问题
在窗体上画一个文本框,其名称为Textl,然后编写如下程序:
Option Base 1
Private Sub Form_Click()Dim Arr(10)As Integer
For i=6 To 10
Arr(i)=i.3
Next i
Textl.Text=Str(Arr(6)+Arr(Arr(6)+Arr(10)))
End Sub
程序运行后,单击窗体,在文本框中显示的内容是
选项
A、7
B、8
C、9
D、10
答案
D
解析
本题中在循环中为数组部分元素赋值,把Arr(6)~Arr(10)分别赋值为3~7,其余的数组元素保持默认值0;最终输出的是Arr(6)+Arr(Arr(6)+Arr(10))即Arr(6)+Arr(10)=10。
转载请注明原文地址:https://jikaoti.com/ti/Ebx0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“扩
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为Frame1、标题为“目的地"的框架,在框架中添加三个复选框,名称分别为Check1、Check2、Check3,其标题分别
(1)考生文件夹下有一个工程文件sjt3.vbp,其窗体上有1个名称为Text1的控件数组;一个标题为”排序”的命令按钮。程序运行时,在文本框数组中输入8个整数,如图3—29(a)所示;然后单击“排序”按钮,则8个整数按降序排序,如图3—29(b)所示。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为VScroll1的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其
在考生文件夹中有一个工程文件sjt5.vbp,如图3—164所示。运行程序时,从文件中读入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
设x=4,y=6,则以下不能在窗体上显示出“A=10”的语句是
有如下语句序列:Dima,bAsIntegerPrintaPrintb执行以上语句序列,下列叙述中错误的是
下面程序计算并输出的是PrivateSubCommandl_Click()a=10:s=0Dos=s+a*a*a:a=a-1LoopUntila
下面对软件特点描述正确的是()。
某棵树中共有25个结点,且只有度为3的结点和叶子结点,其中叶子结点有7个,则该树中度为3的结点数为()。
随机试题
灌浆时水泥、砂子、石子的混合比(重量比)为()。
远程过程调用发展起来的基础是()
足厥阴肝经起始穴是
血清淀粉酶测定主要用于诊断的疾病是
在外感咳嗽中,病程缠绵,久则导致肺阴亏耗的是
维生素D缺乏性佝偻病时由骨样组织增生所致的骨骼改变为()
设矩阵,则A与B().
EconomicReforminChinaMoreUSsinologistshaveexpressedconfidenceinChina’seconomicreformandtheprospectsforChi
5WeekstoaStress-FreeLife[A]Whowillyoubethisyear?Willyoubeabetter,wiserversionofyourselfbythetimethecal
A、Warmandhumid.B、Coldandhumid.C、Warmanddry.D、Coldanddry.D选项均为天气形容词表明,本题考查西藏的气候状况。由对话中提到的Nohumidity和coldinwinter可知,
最新回复
(
0
)