首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有两个水平滚动条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
50
问题
窗体上有两个水平滚动条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全国计算机二级
相关试题推荐
窗体上有一个名称为VSeroll1的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是()。
为了在运行时能显示窗体左上角的控制框(即系统菜单),应执行的操作是
检查软件产品是否符合需求定义的过程称为
求1!+2!+……+10!的程序如下:PrivateFunctions(xAsInteger)f=1Fori=1Toxf=f*iNexts=fEndFunctionPrivate
窗体上有一个列表框控件List1。以下叙述中错误的是
窗体上有一个文本框Text1和一个水平滚动条HScroll1,且HScroll1的Min和Max属性值分别为10和40。程序运行后,如果移动HScroll1的滚动框,则文本框Text1中的文字大小随着滚动框位置的变化同步改变。以下能实现上述操作的过程是(
以下关系表达式中,其值为True的是
在学校中,“班级”与“学生”两个实体集之间的联系属于()关系。
设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为( )。
一个教师可讲授多门课程,一门课程可由多个教师讲授。则实体教师和课程间的联系是( )。
随机试题
组合体中各基本几何体表面之间有__________种情况。
函数f(x)=2x3-3x2的单调递减区间为().
人民法院审理行政案件过程中,发现地方规章与部门规章不一致时,应当选择下列哪种做法?
华诚公司系增值税一般纳税人,适用的增值税税率为17%。2010年8月份发生的部分经济业务如下:(1)“发料凭证汇总表”显示,当月生产车间共领用A材料198000元(其中,用于甲产品生产120000元,用于乙产品生产78000元),车间管理部门领
对于一些技术含量较高、市场较为狭窄、销售周期较长的产品来说,最合适的薪酬制度是()。
Therapid-transitraillinesshould______.Inthebuildingoftheraillines,______.
每个第二语言学习者的语言学能是一致的。()
简述我同专利权客体的具体类型。
编写函数fun,其功能是:将两个两位数的正整数a、b合并成一个整数放在c中。合并的方式是:将a数的十位和个位数依次放在c数的个位和百位上,b数的十位和个位数依次放在c数的十位和千位上。例如,当a=45,b=12时,调用该函数后c=2514。
Thefamilytodayisnolongertheunitofeconomicproductionthatitoncewas.Whenoursocietywaspredominantlyrural,bothh
最新回复
(
0
)