首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在名称为Form1,标题为“考试”的窗体上画一个名称为Combo1、初始内容为空的下拉式组合框。下拉列表中有“隶书”、“宋体”和“楷体”三个项目。运行后的窗体如
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。 (1)在名称为Form1,标题为“考试”的窗体上画一个名称为Combo1、初始内容为空的下拉式组合框。下拉列表中有“隶书”、“宋体”和“楷体”三个项目。运行后的窗体如
admin
2018-10-29
54
问题
请根据以下各小题的要求设计Visual Basic 应用程序(包括界面和代码)。
(1)在名称为Form1,标题为“考试”的窗体上画一个名称为Combo1、初始内容为空的下拉式组合框。下拉列表中有“隶书”、“宋体”和“楷体”三个项目。运行后的窗体如图1-6 所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上画两个文本框,其名称分别为Text1、Text2,初始内容都为空,显示为三号字,且Text1 的初始状态为不可用;再画一个名称为 Command1、标题为“开始”的命令按钮,如图1-7所示。
要求:编写适当的事件过程,使得单击“开始”按钮后,Text1文本框变为可用状态,且在Text1 文本框中输入字母串时,Text2文本框中用大写字母形式显示Text1 文本框中的内容。程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。 步骤2:打开代码编辑窗口,编写Text1的Change事件过程和命令按钮的单击事件过程。 参考代码: Private Sub Command1_Click() Text1.Enabled = True End Sub Private Sub Text1_Change() Text2.Text = UCase(Text1.Text) End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/htFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
可以产生30~50(含30和50)之间的随机整数的表达式是( )。
支持子程序调用的数据结构是( )。
阅读程序:OptionBase1SubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubForm_Click()
为了通过传值方式来传送过程参数,在函数声明部分应使用的关键字为( )。
数据库设计中反映用户对数据要求的模式是( )。
命令按钮Command1的事件过程如下:PrivateSubCommand1_Click() Dimarr(5,5)AsInteger DimiAsInteger,jAsInteger Fori=1To4
窗体上有名称为Command1的命令按钮,名称分别为Label1、Label2、Label3的标签。编写如下程序:PrivatexAsIntegerPrivateSubCommand1_Click() StaticyAsIntege
顺序文件在一次打开期间( )。
随机试题
你省4月10日函_______。(收到并知晓)
戈谢病一般不常累及的组织器官是
脊髓灰质炎三价混合疫苗的初种年龄为
金融衍生工具的功能包括()。
成人往往按照自己习惯设计的蓝图去要求、塑造儿童,使儿童的天性得不到发展,这是因为在制定学前教育目的时未考虑到()
演讲采用的言语形式主要是()。[统考2007]
设Ω是由曲面围成的空间区域,三重积分在球坐标系下化为累次积分是().
设∑是曲面+(y3+2)dxdz+z3dxdy
ThemostfamouspainterinVictoria’shistoryisEmilyCarr.Whenshewasachild,shediscoveredthatwalkinginthewoods【51】m
NamesinAmericaMostparentsintheUnitedStatesgivetheir【T1】______afirst,middleandlastnamewhentheyareborn.The
最新回复
(
0
)