首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400、400;再画两个命令按钮,其名称分别为C1和C2,标题分别为“显示”和“扩大”,编写适当的
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400、400;再画两个命令按钮,其名称分别为C1和C2,标题分别为“显示”和“扩大”,编写适当的
admin
2019-05-28
70
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400、400;再画两个命令按钮,其名称分别为C1和C2,标题分别为“显示”和“扩大”,编写适当的事件过程。程序运行后,如果单击C1命令按钮,则在文本框中显示“等级考试”,如图3—107(a)所示;如果单击C2命令按钮,则使文本框在高、宽方向上各增加一倍,文本框中的字体大小扩大到原来的3倍,如图3—107(b)所示。
注意:要求程序中不得使用变量。存盘时必须存放在考生文件夹下,工程文件名为sit1.vbp,窗体文件名为sit1.frm。
(2)在名称为Form1的窗体上画一个命令按钮,其名称为C1,标题为“转换”;然后再画两个文本框,其名称分别为Text1和Text2,初始内容均为空白,编写适当的事件过程。程序运行后,在Text1中输入一行英文字符串,如果单击转换按钮,则Text1文本框中的字母都变为小写,而Text2中的字母都变为大写。例如,在Text1中输入visual basic programming,则单击转换按钮后,结果如图3—108所示。
注意:不得使用任何变量。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
第1小题 步骤1:新建一个“标准EXE”工程,如表4—65在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写两个命令按钮的单击事件过程。 参考代码: Private Sub C1_Click() T1="等级考试" End Sub Private Sub C2_Click() T1.Height=2*Me.T1.Height T1.Width=2*T1.Width T1.FontSize=3*Form1.T1.FontSize End Sub 步骤3:按要求将文件保存至考生文件夹中。 第2小题 步骤1:新建一个“标准EXE”工程,如表4—66在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写命令按钮的单 击事件过程。 参考代码: Private Sub C1_Click() Text1.Text=LCase(Text1.Text) Text2.Text=UCase(Text1.Text) End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
第1小题:要在单击“扩大”按钮时,使文本框在高、宽方向上各增加一倍,只需在“扩大”按钮的Click事件中编写设置文本框的Height和Width属性值为原来2倍的语句。要使文本框中的字体大小扩大到原来的3信,需编写设置文本框的FontSize属性值为原来3倍的语句。
第2小题:本题源程序是在命令按钮的单击事件过程中,将文本框Text1中的字符用UCase函数转换为大写并显示在Text2中,同时用LCase函数转换为小写并显示在Text1中。
转载请注明原文地址:https://kaotiyun.com/show/gXUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在名称为Form1的窗体上添加一个名称为Label1、标题为“添加项目”的标签;添加一个名称为Text1的文本框,初始内容为空;添加一个名称为Combo1的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别为Co
以下不能设置Picture属性的控件是
设窗体上有一个名称为List1的列表框,并有若干列表项。下面语句中不能在所有列表项之后追加一个列表项的是
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件n.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()Open"c:\f1.txt"For
设有如下事件过程:PrivateSubCommand1_Click()Fori=1To5j=iDoPrint"*"j=j-1LoopUntilj=0NextiEndSub运行程序,输出“*”的个数是
有下面程序代码:PrivateSubCommand1_Click()DimsignAsIntegersign=13a=1b=2Fork=1To5c=a+sign*ba=bb=cPrintc;sign=-signNe
随机试题
阿托品滴眼后可产生的效应有
患者,女性,36岁,葡萄胎清官术后4个月,近2周出现阴道不规则流血,近几日食欲减退,咳嗽,咳痰,痰中有少许血丝,来院就诊。查体:体温37.5℃,血压90/60mmHg,脉搏90次/分。妇科检查:外阴、阴道正常,宫体前倾前屈位,子宫如孕50天大小,质软,可活
门静脉高压症的治疗错误的是
可以用沉降平皿法检测其中细菌数量的环境介质是()。
在国家选定的非国际单位制单位中,质量计量单位的名称和符号有()。
我国古代历史出现的“百家争鸣”文化繁荣景象发生在()。
薪酬体系设计要体现薪酬的基本职能,主要包括()
A、 B、 C、 D、 B每行前两个图形去同存异得到第三个图形。
有关数据显示,从2005年以来,广东高校毕业生自主创业的数量约占当年高校毕业生的1%~2%。以2008年为例,应届高校毕业生中选择自主创业的仅占1.2%。而在西方发达国家.这个数字为20%~30%。由此看来,西方发达国家的大学生更具有创业才能。以下哪一项正
Whathasthewomanbeendoing?
最新回复
(
0
)