首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Forml的窗体上画一个命令按钮和一个水平滚动条,其名称分别为Commandl和HScrolll,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置水平滚动条的属性: Max=窗体宽度 Min=0 LargeChang
在名称为Forml的窗体上画一个命令按钮和一个水平滚动条,其名称分别为Commandl和HScrolll,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置水平滚动条的属性: Max=窗体宽度 Min=0 LargeChang
admin
2013-10-18
44
问题
在名称为Forml的窗体上画一个命令按钮和一个水平滚动条,其名称分别为Commandl和HScrolll,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置水平滚动条的属性:
Max=窗体宽度
Min=0
LargeChange=50
SmallChange=1 0
而如果移动水平滚动条的滚动框,则在窗体上显示滚动框的位置值。程序的运行情况如图2-135所示。
要求:不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
步骤1:新建一个”标准EXE”工程,在窗体Forml中画一个命令按钮和一个水平滚动条,在属性设置窗口中设置其相关属性,其属性及值如表3-76所示。[*] 步骤2:打开代码编辑窗口,分别编写命令按钮的Click事件过程和水平滚动条的Change事件过程。 参考代码: Private Sub Commandl_Click( ) HScrolll.Max=Forml.Width HScrolll.Min=0 HScrolll.LargeChange=50 HScrolll.SmallChange=1 0 End Sub PriVate Sub HScrolll_Change( ) Print Me.HScrolll.Value End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/qHQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
按照软件测试的一般步骤,集成测试应在【】测试之后进行。
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码:optionBase1PdvateSubCommandl_Click()Dimaa=Array(1,2,3,4)J=1Fori=3To1Step-1s=s+a(
下列叙述中正确的是
(1)在名称为Forml的窗体上画一个名称为Textl的文本框,其高、宽分别为600、1800。请在属性框中设置适当的属性满足以下要求:Text1的字体为“隶书”,字号为“三号”;窗体的标题为“字体大小”,不显示最大化按钮和最小化按钮,如图4
在考生文件夹下有一个工程文件sj5.vbp,程序代码中已经写入部分代码,要求根据下面的描述在窗体模块中定义3个名称分别为readdatal、readdata2和writedata的Sub过程。请先装入工程文件sj5.vbp,然后完成以下操作:
数据库系统的核心是【】。
下列关于栈的叙述中正确的是______。
在VisualBasic中,实参传递给形参有两种方式,【】方式可以通过改变过程中的相应的参数来改变实参变量的值;而【】被调用过程中改变了这个形参的值,但对应的实参的值并不改变。
在数据库管理系统提供的数据语言中,负责数据的查询及增、删、改等操作的是
以下叙述中错误的是______。
随机试题
Oneofthemajorcausesoftheprevalentanxietyaboutthefutureofthefamilyisrootednotsomuchinactualityasintheten
效果评价的方法是
拔除下颌阻生第三磨牙的意义不包括
有关胸外心脏按压,错误的是
热轧钢筋试验项目包括()。
[2008年第26题,2004年第25题]下列哪种光源的寿命长?
在生活中有时候可以看到一些人会反复地洗手,反复对餐具高温消毒,反复地检查门锁等。重复这类无意义的动作并使自己感到十分烦恼和苦闷,这就是神经症中的一种,称为强迫症。王强每天洗手的次数超过普通人的20倍,看来王强是得了强迫症。以下哪项如果为真,将对上述结论构成
不属于宪法部门的是()。
Youshouldapologize______yourrudewords______thegirl.
Thecreditcard,DiscoverIt,isouttochangethewayyouthinkaboutcreditcards.Thereisnoannualfee.Plus,there’s
最新回复
(
0
)