首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个水平滚动条HV、HT,还有一个文本框Text1和一个标题为"计算"的命令按钮Command1,并编写了以下程序: Private Sub Command1_Click() Call calc(HV.Value,HT.Value) End Su
窗体上有两个水平滚动条HV、HT,还有一个文本框Text1和一个标题为"计算"的命令按钮Command1,并编写了以下程序: Private Sub Command1_Click() Call calc(HV.Value,HT.Value) End Su
admin
2015-08-28
19
问题
窗体上有两个水平滚动条HV、HT,还有一个文本框Text1和一个标题为"计算"的命令按钮Command1,并编写了以下程序:
Private Sub Command1_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 Control)
C、计算结果在文本框中显示出来
D、程序不能正确运行
答案
C
解析
访问滚动条控件的值,可以直接使用控件的名称,也可以在名称后面指明Value属性。滚动条位置是用数值来表示的,因此定义Calc过程时参数应该定义为Integer类型。程序中,Text1.Text=x*y语句说明计算的结果在文本框中显示出来。
转载请注明原文地址:https://kaotiyun.com/show/inLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列叙述中错误的是()。
以下能正确定义数据类型TelBook的代码是______。
下面的程序是找出两个正整数a和b,使得a<b、a+b=99、a和b的最大公约数是3的倍数,并统计满足条件数对的个数。OptionExplicitDimaAsInteger,bAsInteger,nAsInteger,cAsI
下列程序实现的功能是:当在窗体上单击时,从键盘上读入5个学生的学号、姓名、英语成绩并存入到文件d:\stu1.dat中,然后从文件中读出第3个人的学号、姓名和英语成绩并显示在窗体中。TypestudentNoAsLongNameAsStri
程序如下:PrivateSubform_Activate()DimaAsIntegerfori=4To5a=fun(i)Printa,NextiEndSubPrivateFu
为了使一个窗体从屏幕消失但仍在内存中,所使用的方法或语句为______。
当我们输入代码时,VisualBasic可以自动检测______错误。
以下叙述中错误的是______。
符号%是声明______类型变量的类型定义符。
在E盘当前目录文件夹下建立一个名为“Student.txt”,的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有下列记录类型和窗体的事件过程,请选择正确的语句完成程序(
随机试题
女,63岁,小脑梗死后2周,右上肢不能平稳完成动作,伴有震颤,步行时步幅大,足着地轻重不等,伴有摇摆。针对该患者协调功能的检查不包括
患者,女,41岁。既往有胆结石,晚餐后突然出现中上腹痛,阵发性加剧,频繁呕吐,呕吐物含胆汁,呕吐后腹痛未减轻,化验血淀粉酶为2500U/L,于今日住院治疗。饮食护理应为
查体可见患者上腹部蠕动波自左向右移动。考虑患者可能的情况是
上题中,若XL=R=10Ω,以I1为参考相量,则电压为()V。
建设单位延期发出图纸,承包方()。
汉译英:“公司”,正确的翻译为()。
下列属于违反治安管理行为特征的有()
Thehumanbeinglongsforasenseofbeingaccomplished,ofbeingabletodothings,withhishand,withhismind,withhiswill
环回接口是一种应用最为广泛的虚接口,其接口号的有效值为()。
A、There’sapaperbythedoor.B、Thepapermusthaveblownaway.C、Heshouldlookfurtherunderthedesk.D、Hecanbuyanothero
最新回复
(
0
)