首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400、400;再画两个命令按钮,其名称分别为Cl和C2,标题分别为“显示”和“扩大”,编写适当的事件过程。程序运行后,如果单击C1命令按钮,则在文本框中显示“等级考试”,如图3
(1)在名称为Form1的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400、400;再画两个命令按钮,其名称分别为Cl和C2,标题分别为“显示”和“扩大”,编写适当的事件过程。程序运行后,如果单击C1命令按钮,则在文本框中显示“等级考试”,如图3
admin
2017-09-22
16
问题
(1)在名称为Form1的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400、400;再画两个命令按钮,其名称分别为Cl和C2,标题分别为“显示”和“扩大”,编写适当的事件过程。程序运行后,如果单击C1命令按钮,则在文本框中显示“等级考试”,如图3.107(a)所示;如果单击C2命令按钮,则使文本框在高、宽方向上各增加一倍,文本框中的字体大小扩大到原来的3倍,如图3-107(b)所示。
注意:要求程序中不得使用变量。存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sjtl.frm。
(2)在名称为Form1的窗体上画一个命令按钮,其名称为Cl,标题为“转换”;然后再画两个文本框,其名称分别为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.FontSi ze=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/MkGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Text1的文本框,并编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSub
在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程:PrivateFuncdonf(mAsInteger)IfmMod2=0Thenf=mE1Se
下面的数组声明语句中正确的是()。
假定有一个文本框,其名称为Text1,为了使该文本框具有焦点,应执行的语句是______。
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Fomil中有语句PublicXAsInteger,在Model1中有语句PublicYAsInteger.则以下叙述中正确的是
为了清除列表框中的所有内容,应使用的方法是______。
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整()。PrivateTypeAngKAsInteger
编写如下事件过程:PrivateSubForm_keyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)EndSubPrivateSubForm_Keypress(
程序执行结果s的值是【】。PrivateSubsub1(ByvalpAsInteger)p=p*2EndSubPrivateSubCommand1_Click()DimiAsIntegeri=3Callsub1(i
以下程序代码用来实现如下功能:单击命令按钮弹出对话框,在其中输入正数后单击确定,弹出一个提示信息显示刚才输入的正数,否则提示"error"。请填空。PrivateSubCommand1_Click()DimaAsInteger,bAsSt
随机试题
A.钙离子拈抗剂B.β受体阻滞剂C.抗血小板制剂D.ACEI类药物双侧肾动脉严重狭窄禁用的是
急性胰腺炎的最典型临床表现是
以下有关代理记账委托人的义务表述不正确的是( )。
()在国际上也叫议付,即给付对价的行为。
下列各项中,会对固定资产处置损益有影响的因素有()。
课程有不同分类标准,根据任务分为()。
市公安局以李某故意毁坏公共财物为由,对其处以拘留5日,李某不服,提起行政复议。市公安局未按规定提交当初作出具体行政行为的证据、依据和其他有关材料,行政复议机关应决定撤销该具体行政行为。()
在Word的编辑状态下,()方式可以同时显示水平标尺和垂直标尺。
Windspeedsaregettingfasterworldwide,andthat’sgoodnewsforrenewableenergyproduction—atleastfornow.Astudypublish
TelevisionSinceitsinventionin【1】______,【1】______televisionhasplayedanincreasinglyimportantr
最新回复
(
0
)