首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为H1的水平滚动条,请在属性窗口中设置它的属性值,满足以下要求:它的最大刻度值为100、最小刻度值为1,在运行时鼠标单击滚动条
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为H1的水平滚动条,请在属性窗口中设置它的属性值,满足以下要求:它的最大刻度值为100、最小刻度值为1,在运行时鼠标单击滚动条
admin
2019-01-16
32
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为H1的水平滚动条,请在属性窗口中设置它的属性值,满足以下要求:它的最大刻度值为100、最小刻度值为1,在运行时鼠标单击滚动条上滚动框以外的区域(不包括两边的按钮),滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1、L2的标签,并分别显示1、100,运行时的窗体如图1-283所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上画两个文本框,名称分别为Text1和Text2,均无初始内容;再建立一个下拉菜单,菜单标题为“操作”,名称为m1,此菜单下含有两个菜单项,名称分别为Copy和Clear,标题分别为“复制”、“清除”,请编写适当的事件过程,使得在运行时,单击“复制”菜单项,则把Text1 中的内容复制到Text2 中,单击“清除”菜单项,则清除Text2中的内容(即在Text2 中填入空字符串)。运行时的窗体如图1-284所示。要求在程序中不得使用任何变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,在窗体Form1中画一个水平滚动条和两个标签,其属性及值如表2-150所示。 [*] 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,在窗体Form1中画两个文本框,名称分别为Text1和Text2,其Text属性均为空白。 步骤2:选择【工具】→【菜单编辑器】命令,打开菜单设计器,如表2-151中的设置建立菜单项。 [*] 步骤3:打开代码编辑窗口,编写“复制”和“清除”菜单命令的单击事件过程。 参考代码: Private Sub clear_Click() Text2.Text = "" End Sub Private Sub copy_Click() Text2.Text = Text1.Text End Sub 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://jikaoti.com/ti/swm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>
要使两个单选按钮属于同一个框架,下面三种操作方法中正确的是( )。①先画一个框架,再在框架中画两个单选按钮②先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中③先画两个单选按钮,再画框架将单选按钮框起来
为使文本框具有初始值"VB",在设计阶段正确的操作是
窗体上有2个名称分别为Text1和Text2的文本框。编写如下程序:PrivateSubForm_Load()Text1.Text=""Text2.Text=""EndSubPrivateSubCommand1_Cl
编写如下程序:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=10y=20Callfun1(x,y)Printx;yEnd
耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是( )。
在窗体上画一个名称为List1的列表框,然后编写如下程序:PrivateSubForm_Click()Fori=1To10Item="Item"&iList1.AddItemItem
设窗体上有一个名称为List1的列表框,并有若干列表项。下面语句中不能在所有列表项之后追加一个列表项的是
由高中数学可知,对于连续函数f(x),若f(x1)与f(x2)值的符号相反,则在x1和x2之间必存在x0,使得f(x0)=0(该点称为"零点")。设有VB函数:PrivateFunctionf(xAsSingle)AsSingle可以返
下面对对象概念描述正确的是
随机试题
宫颈重度糜烂患者。宫颈刮片结果报告为巴氏Ⅲ级,下一步处理应为
属于大环内酯类药物的不良反应的是()。
某企业20×7年年末敏感资产总额为4000万元,敏感负债总额为2000万元。该企业20×8年度的销售额比20×7年度增加10%(即增加100万元),预计20×8年度留存收益的增加额为60万元,则该企业20×8年度应追加资金量为()万元。
债权人会议通过和解协议的法定条件是( )。
空间有一沿x轴对称分布的电场,其电场强度E随x变化的图像如图所示。下列说法中正确的是()。
设f(x)为连续正值函数,x∈[0,+∞),若平面区域Rt={(x,y)|0≤x≤t,0≤y≤f(x)}(t>0)的形心纵坐标等于曲线y=f(x)在[0,t]上对应的曲边梯形面积与之和,求f(x).
窗体上有1个名为Listl的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。PrivateSubCommand1Click()
工場の中には、いろいろな機械が並んでいます。ガーガーという機械の音【R7】________、話もよく聞きとれないくらいです。働いている人はみんな白い服に白いズボンです。わたしたちが入っていっても、手を休めないで、真剣に仕事をしていました。係りの
WantingtoBuyWriteonanoteofabout50-60wordsbasedonthefollowingsituation:Youwanttobuyapairofsnowboots,
Afewpeopleseekrefugefromreading,__________(但如果这样做,就失去了读书的全部意义)
最新回复
(
0
)