首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个水平滚动条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
18
问题
窗体上有两个水平滚动条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://jikaoti.com/ti/jbJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Text1的文本框,并编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSub
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimaAsInteger,sAsIntegera=8s
以下叙述中错误的是______。
在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是______。
有如下的一个函数过程:Functionfn(ByValnumAsLong)DimkAsLongk=1num=Abs(num)dowhilenumk=k*(numMod10)
设“A$=“北京”,B$="Shanghai””,则表达式“LEFTS(A$,2)+STRINGS(3,“-”)+LEFTS(BS,8)”构成的字符串是______。
设a为整型变量,不能正确表达数学关系,“10<a<15”的表达式是______。
设有如下记录类型:TypestudentNumberAsString*10NameAsString*8EndType窗体中有若干控件,单击其中的一个按钮Command1时,执行如下事件过程,该过程的功能是把数据输出到指定的文件中。根据
当我们输入代码时,VisualBasic可以自动检测______错误。
Jackson方法是一种面向______的结构化方法。
随机试题
甲公司通过协议收购的方式持有乙上市公司已发行股份的30%,以下说法正确的是:
导致乳糜尿浑浊的主要原因是
小儿肺部易发生感染的主要内因是
在波的传播方向上,有相距为3m的两质元,两者的相位差为,若波的周期为4s,则此波的波长和波速分别为()。
()指基金单位或受益凭证的持有人,它是基金资产的最终所有。
符合所有者权益类账户记账规则的是()。
根据一节课主要完成的教学任务的数量,课的类型可以划分为()。
来自巴西的火蚁现在正大批出没于美国的南部地区。不像巴西的火蚁王后,在美国两个火蚁王后分享一个窝。来自这些窝的火蚁比来自单一王后的窝里的火蚁更具侵略性。通过摧毁几乎所有在它们的窝所属区域内出现的昆虫,这些具有侵略性的火蚁独自霸占了食物资源。于是这些火蚁的数量
Itisnot______muchhisappearanceIlikeashispersonality.
ThenumberofspeakersofEnglishinShakespeare’stimeisestimatedtohavebeenaboutfivemillion.Todayitisestimatedthat
最新回复
(
0
)