首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上添加一个名称为HS的水平滚动条,最大值为100,最小值为1。再添加一个名称为Listl的列表框,在属性窗口中输入列表项的值,分别是1000、1500、2000,如图所示。请编写适当的程序,使得运行程序时,将水平滚动条的长度改变为所
在名称为Form1的窗体上添加一个名称为HS的水平滚动条,最大值为100,最小值为1。再添加一个名称为Listl的列表框,在属性窗口中输入列表项的值,分别是1000、1500、2000,如图所示。请编写适当的程序,使得运行程序时,将水平滚动条的长度改变为所
admin
2019-08-21
63
问题
在名称为Form1的窗体上添加一个名称为HS的水平滚动条,最大值为100,最小值为1。再添加一个名称为Listl的列表框,在属性窗口中输入列表项的值,分别是1000、1500、2000,如图所示。请编写适当的程序,使得运行程序时,将水平滚动条的长度改变为所选中列表框中的某一项的值。要求程序中不得使用变量,每个事件过程中只能写一条语句。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
步骤1:程序中用到的控件及属性见表2。 [*] 步骤2:编写程序代码。 参考答案 Private Sub List1_Click() HS.Width=List1.Text End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
List1 Click事件过程中,使滚动条的Width属性值等于列表框的Text属性值,那么当选择列表框中的某一项,就将水平滚动条的长度改变为所选中的值。
转载请注明原文地址:https://www.kaotiyun.com/show/xKUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为使程序运行时通用对话框CD1上显示的标题为“对话框窗口”,若通过程序设置该标题,则应使用的语句是
窗体上有1个名称为Commandl的命令按钮,事件过程及函数过程如下:PrivateSubCommandl_Click()DimmAsStringm=InputBox("请输入字符串")Printpick_str(m)En
编写如下程序:PrivateSubCommandl_Click()DimnAsLong,SAsStringn=InputBox("输入一个数")DoWhilen<>0S=S&nMod10:s=s&n\
编写如下程序:OptionBase1PrirateSubCommandl_Click()Dimaa=Array(1,2,3,4):s=0:j=1Fori=4To1Step-1s=s+a(i)*j:j=j*10Ne
有如下程序:PrivateSubForm_Click()DimiAsInteger,nAsIntegerFori=1To20i=i+4:n=n+iIfi>10ThenExitForNext
窗体上有一个名称为Optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程PrivateSubOptionl_Click(IndexAsInteger)…EndSub下面关于此过程的参数Index的叙
随机试题
某公司发行优先认股权,公司股票市价为每股15.4元,新股发行的优惠认购价为13元,其中每认购1股新股需要7个优先认股权,该股票附有优先认股权。这该公司的优先认股权的理论价格为()
FewAmericansremaininonepositionoroneplaceforalifetime.Wemovingfromtowntocitytosuburb,fromhighschooltocol
山楂可用于治疗
心悸之阴虚而火不旺者治宜何方
咳嗽初起,忌用()
替代效应是指当某种税的征收或税率变化影响相对价格或相对效益时,人们就选择另一种消费或活动来代替原先的消费或活动。根据上述定义,下列不涉及替代效应的是()。
自我意识是对自己身心活动的觉察,即对自己的认识,具体包括认识自己的身体状况(如身高、体重、体态等)、心理特征(如兴趣、能力、气质、性格等)以及自己与他人的关系(如自己与周围人们相处的关系、自己在集体中的位置与作用等)。根据上述定义,下列不属于自我意识的是:
下列哪部名著属于文言小说的范畴?()
向信息系学生视图IS_STUDENT中插入一个新的学生记录,其中,学号01028,姓名为小红,年龄为18岁,正确的SQL语句是()。
A、Bycryingforothers’attention.B、Bypleasingotherswithsmile.C、Byaskingforfoodfromothers.D、Bymakinganoiseforca
最新回复
(
0
)