首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“扩大”和“缩小”,如图3.93所示,编写适当的事件过程。程序运行后,每单击Command1
(1)在名称为Form1的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“扩大”和“缩小”,如图3.93所示,编写适当的事件过程。程序运行后,每单击Command1
admin
2017-09-22
59
问题
(1)在名称为Form1的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“扩大”和“缩小”,如图3.93所示,编写适当的事件过程。程序运行后,每单击Command1命令按钮一次,文本框中文本的字体扩大1.2倍;每单击Command2单选按钮一次,文本框中文本的字体缩小1.2倍。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
(2)在名称为Form1的窗体上画一个列表框,其名称为List1,通过属性窗口向列表框中输入9个项目,分别为10、20、30、40、50、60、70、80、90;画一个文本框,其名称为Text1,初始内容为空白;再画一个水平滚动条,其名称为HScroll1,Min属性和:Max属性分别为O和100,如图3.94(a)所示,编写适当的事件过程。程序运行后,如果单击列表框中的某个项目,则在文本框中显示该项目内容,并把滚动条的滚动框移到相应的位置,如图3—94(b)所示。要求:不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
(1)步骤1:新建一个“标准EXE”工程,在窗体Form1中加入一个文本框和两个命令按钮,其相关属性设置如表4.58所示。 [*] 步骤2:打开代码编辑窗口,输入如下代码。参考代码: Private Sub Command1_Click() Text1.FontSize=Text1.FontSize*1.2 End Sub Private Sub Command2_Click() Text1.FontSize=Text1.FontSize/1.2 End Sub 步骤3:按要求将文件保存至考生文件夹中。 (2)步骤1:新建一个“标准EXE”工程,在窗体上画一个列表框、一个文本框和一个水平滚动条,按表4.59设置其相关属性。 [*] 步骤2:在打开的代码编辑窗口中,编写列表框的单击事件代码。参考代码: Private Sub List1_Click() Text1.Text=List1.Text HScroll1.Value=Val(List1.Text) End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
(1)要实现题目要求的功能,只需在两个命令按钮的Click事件过程中,分别设置文本框的FontSize属性为指定值。
(2)列表框的Text属性用于返回列表框中选择的项目的内容,返回值总与列表框的List(List1ndex)属性的返回值相同。本题需要在列表框的属性窗口中输入列表框中的项目,然后在列表框的单击事件中将选定项赋值给文本框和滚动条的value属性。
转载请注明原文地址:https://kaotiyun.com/show/EjGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
VisualBasic标题栏上显示了应用程序的
在随机文件中使用用户自定义数据类型时,要注意它的成员的要求,它的成员不能是()。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1Click()n=5f=1s=0Fori=1Tonf
在窗体上有一个命令按钮,然后编写如下事件过程 PrivateSubCommand1_cickc() a=InputBox("enterthefirstinteger") b=InputBox("enterthesecon
为了清除列表框中的所有内容,应使用的方法是______。
编写如下事件过程:PrivateSubForm_keyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubForm_Keypress(
下列语句的输出结果是【】。PrintFormat(Int(12345.6789*100+0.5)/100,"0000,0.00")
程序执行结果s的值是【】。PrivateSubsub1(ByvalpAsInteger)p=p*2EndSubPrivateSubCommand1_Click()DimiAsIntegeri=3Callsub1(i
在窗体上画一个命令按钮Command1,然后编写如下程序:PrivateSubCommand1_Click()Dimarr()AsIntegerReDimarr(3)Fori=0To3al
随机试题
设计无要求时,现浇混凝土结构拆模的顺序是()。
Withatremendousroarfromitsrocketengine,thesatelliteissentupintothesky.Minuteslater,atanaltitudeof300miles
一次性负荷的安全性是指X线管的
动力生产建设项目方面,通常不会采用()。
因海关关员的责任造成被查验货物损坏的,进出口货物收发货人或其代理人可以要求海关赔偿。但下列情况海关将不予赔偿,包括()。
市场风险由证券市场的基本特性决定,也称为证券交易的基本风险。()
个体在修正自我意识过程中,表现出两种形式:()。
()是指空间上接近、时间上连续、形状上相同、颜色上一致的事物,易于构成一个整体为人们清晰地感知。
建立社会主义市场经济体制是我国经济体制的根本性创新,是实现社会主义现代化的根本途径,它具有自身质的基本特征。对社会主义市场经济体制的正确认识有()
设A=,B为3阶非零矩阵,且AB=O,则t=_______.
最新回复
(
0
)