首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个水平滚动条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
41
问题
窗体上有两个水平滚动条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/CeQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
标准模块中有如下程序代码:PublicxAsInteger,YAsIntegerSubvat_pub()x=10:Y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:PrivateSubCommandl—Click(
在窗体上画1个命令按钮,并编写如下事件过程iPrivateSubCommandl—Click()Dima(3,3)Form=1T03F0rn=1To3Ifn=mOrn=4-mThena(m,n)=m+nElsea(
窗体卜有Listl、List2两个列表框,Listl中有若干列表项(见图),并有下面的程序:PrivatesubCommandl_Click()Fork:Listl.ListCount_lTo0step-1TfListl.Selecte
在考生文件夹下有一个工程文件sj5.vbp,相应的窗体文件为sj5.frm。此外在考生文件夹下还有一个名为in5.txt的文本文件,其中共有25个数据,其内容如下:10,11,12,13,14,15,16,17,18,19,20,21,22,23
在考生文件夹下有一个工程文件sj5.vbp,相应的窗体文件为sj5.frm,此外还有一个名为in5.dat的文本文件,其内容如下:10111213141516171819202122232425程序运行后,单击窗体
(1)在名称为Forml的窗体上画一个文本框,名称为Textl,字体为宋体,文本框中的初始内容为“模拟试题”;请编写适当事件过程,使得在运行时,双击窗体,则把文本框中文字加下划线,如图62—1所示。程序中不得使用任何变量。注意:保存时必须存放在考
符号%是声明______类型变量的类型定义符。
设a="MicrosoftVisualBasic",则以下使变量b的值为“VisualBasic”的语句是______。
在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数据独立性最高的阶段是______。
下面关于完全二叉树的叙述中,错误的是______。
随机试题
根据不同的特征,存储器可以哪几种分类方式?
肝郁气滞,月经不调,胸胁胀痛,常选用的药是
酸催化水解较难水解的苷是酸催化水解最难水解的苷是
结核菌最主要的传播途径是
行气管切开时,切口不宜低于第5气管软骨环是因为易
下面叙述正确的是:
损失控制是风险管理的重要措施之一,损失控制通常采用的方法包括()。
根据税收征收管理法律制度的规定,从事生产、经营的纳税人应当自领取营业执照或者发生纳税义务之日起()内,按规定设置账簿。
1.03,2.05,2.07,4.09,(),8.13
简述创造性思维的培养方法。
最新回复
(
0
)