首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“扩
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“扩
admin
2017-10-27
90
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“扩大"和“缩小”,如图3—93所示,编写适当的事件过程。程序运行后,每单击Command1命令按钮一次,文本框中文本的字体扩大1.2倍;每单击Command2单选按钮一次,文本框中文本的字体缩小1.2倍。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frrn。
(2)在名称为Form1的窗体上画一个列表框,其名称为List1,通过属性窗口向列表框中输入9个项目,分别为10、20、30、40、50、60、70、80、90;画一个文本框,其名称为Text1,初始内容为空白;再画一个水平滚动条,其名称为HScrol11,Min属性和Max属性分别为0和100,如图3—94(a)所示,编写适当的事件过程。程序运行后,如果单击列表框中的某个项目,则在文本框中显示该项目内容,并把滚动条的滚动框移到相应的位置,如图3—94(b)所示。要求:不得使用任何变量。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
(1)【操作步骤】 步骤1:新建一/卜“标准EXE”工程,在窗体Form1中加入一个文本框和两个命令按钮,其相关属性设置如表4—58所示。 [*] 步骤2:打开代码编辑窗口,输入如下代码。参考代码: Private Sub Command1_Click() Text2.FontSize=Text1.FontSize*1.2 End Sub Private Sub Command2_C1ick() Text1.FontSize=Text1.FontSize/1.2 End Sub 步骤3:按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤1:新建一个“标准EXE”工程,在窗体上画一个列表框、一个文本框和一个水平滚动条,按表4—59设置其相关属性。 [*] 步骤2:在打开的代码编辑窗口中,编写列表框的单击事件代码。参考代码: Private Sub List1_Click() Text1.Text=List1.Text HScrol11.Value=Val(List1.Text) End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/JVGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请选择正确的程序段是(),将程序补充完整。PrivateTypeAngKAsInteg
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger,则以下叙述中正确的是()。
在窗体上画一个命令按钮Command1,然后编写如下程序:PrivateSubCommand1_Click()Dimarr()AsIntegerReDimarr(3)Fori=0To3al
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Forml和Form2,启动窗体为Forml。在Forml上画一个命令按钮Commandl,程序运行后,要求当单击该命令按钮时,Forml窗体消失,显示窗体Form2,请在横线处将程序补充
VisualBasic程序设计采用的编程机制是
为了使能在DOS或Windows下运行的可执行程序也可以在VisualBasic中调用,可通过调用函数来实现。
在窗体上画一个名称为Command1的命令按钮,一个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click()s=0Fori=1To15x=2*i-1
执行下面的语句后,所产生的信息框的标题是【】。a=msgbox("AAAA",,"BBBB","",5)
下面描述中,不属于软件危机表现的是()。
使用DoWhile循环从打开的文件中逐条读取记录。以下能够正确读取数据的程序段是
随机试题
绩效考核的起点是绩效计划中双方制定的_______。
Icameacrossanoldcountryguidebooktheotherday.Itlistedallthetradesmenineachvillage,anditwasimpressivetosee
声门下腔的黏膜下组织较疏松,炎症时易引起水肿,特别在幼儿,水肿易引起阻塞,导致呼吸困难。
马某,系归国华侨,在上海投资工厂,但在要求工人劳动时使用了不正当的手段。经检察院提起公诉,人民法院作出一审判决,认为马某符合在法定刑以下判处刑罚的条件,决定在法定刑以下判处刑罚。。检察院不服,提起抗诉,二审法院认为原判决认定事实清楚、适用法律正确、量刑适当
关于钢化玻璃特征的说法,正确的是()。
在建设工程项目进度控制工作中,分析和论证进度目标的目的是分析和论证()。
Receivedforshipmentbilloflading,statesdefinitelythatthegoodshavebeenreceivedbythecarrierandconfirmsthatthego
在计算外商投资企业和外国企业所得税时,( )不得列为成本、费用和损失。
已知VBA语句:Ifx=10theny=10,下列叙说中正确的是
ThesettlementoftheUnitedStateshasoccupiedtraditionalhistorianssince1893whenFrederickJacksonTurnerdevelopedhisF
最新回复
(
0
)