首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个水平滚动条HV、HT,还有一个文本框Text1和一个标题为“计算”的命令按钮Commandl, 并编写了以下程序: Private Sub Commandl.Click() Call calc(HV.Value,HT.Value) End S
窗体上有两个水平滚动条HV、HT,还有一个文本框Text1和一个标题为“计算”的命令按钮Commandl, 并编写了以下程序: Private Sub Commandl.Click() Call calc(HV.Value,HT.Value) End S
admin
2020-07-22
26
问题
窗体上有两个水平滚动条HV、HT,还有一个文本框Text1和一个标题为“计算”的命令按钮Commandl,
并编写了以下程序:
Private Sub Commandl.Click()
Call calc(HV.Value,HT.Value)
End Sub
Public Sub calc(x As Integer,y As Integer)
Text1.Text=x*y
End Sub
运行程序,单击“计算”按钮,可根据速度与时间计算出距离,并显示计算结果。
对以上程序,下列叙述中正确的是( )。
选项
A、过程调用语句不对,应为calc(HV,HT)
B、过程定义语句的形式参数不对,应为Sub calc(x As Control,y As Contr01)
C、计算结果在文本框中显示出来
D、程序不能正确运行
答案
C
解析
访问滚动条控件的值,可以直接使用控件的名称,也可以在名称后面指明Value属性。滚动条位置是用数值来表示的,因此定义Cale过程时参数应该定义为Integer类型。程序中,Text,1.Text=x*y语句说明计算的结果在文本框中显示出来。
转载请注明原文地址:https://kaotiyun.com/show/oJHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于线性链表的叙述中,正确的是
设有如下事件过程:PrivateSubCommand1_Click()Fori=1To5j=1DoPrint"*"j=j-1LoopUntilj=0NextiEndSub运行程序,输出“*”的个数是
命令按钮Command1的MouseUp事件过程结构如下:PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)EndS
关于文件操作,以下叙述中正确的是
在VisualBasic环境下设计应用程序时,系统能自动检查出的错误是
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
考生文件夹下有一个工程文件sjt5.vbp。运行程序后,从文件中读出数据,将其放入一个5×5的二维数组a中。请编写程序,找出数组a中每行的最大值及该值在行中的次序(列下标),并将所找到的结果分别保存到一维数组b、c中(a中第一行的最大值保存在b(1)中,最
A、DYBEAFCZXB、YDEBFZXCAC、ABDYECFXZD、ABCDEFXYZC前序遍历是指在访问根结点、遍历左子树与遍历右子树这三者中,首先访问根结点,然后遍历左子树,最后遍历右子树;并且,在遍历左右子树时,仍然先访问根结点,然后遍历左
随机试题
仓库容积利用率指标是指报告期()与仓库有效容积的比率。
肌力测定的分级描述中,错误的是
医师注册后有下列情形之一的应当注销注册,除了
采用超声单面平测法检测混凝土裂缝深度时,裂缝中应灌注清水作为耦合剂。()
某施工企业施工时使用自有钢模板,已知一次使用量为1000m2,每平方米钢模板价格为85元,若钢模板可使用25次,补损率为4%,施工损耗为4%,同时不考虑支、拆、运输费,则钢模板费为()元。
单项工程综合概算文件一般包括()。
只有每年训练兵团毕业生的前10名或驻扎兵团中经验丰富的士兵才能成为宪兵团成员,驻守在城墙内仅负责管理人民和维持秩序。所有驻扎兵团同样驻守在城墙内仅负责修理、维护和强化城墙。调查兵团并不驻扎在城墙内,仅负责城墙外的搜索和调查行动。训练兵团中的人员并非正式士兵
软件工程研究的内容主要包括:【】技术和软件工程管理。
Whatisthesourceofeachonebelowinthissurvey?ChooseFOURanswersfromtheboxandwritethecorrectletter,A-F,nextto
A、Client-lawyer.B、Student-teacher.C、Patient-doctor.D、Customer-salesman.B
最新回复
(
0
)