首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为Combol的组合框,其宽度为1200,其类型如图3—188所示(即简单组合框)。要求如下: ①请按图中所示,通过属
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为Combol的组合框,其宽度为1200,其类型如图3—188所示(即简单组合框)。要求如下: ①请按图中所示,通过属
admin
2019-05-28
57
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为Combol的组合框,其宽度为1200,其类型如图3—188所示(即简单组合框)。要求如下:
①请按图中所示,通过属性窗口输入“北京”、“上海”、“广州"、“深圳”。
②设置适当的属性,使得运行时,窗体的最大化按钮和最小化按钮消失。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上画两个文本框,名称分别为Text1、Text2,再画两个命令按钮,名称分别为Command1、Command2,标题分别为“左”、“右”,如图3—189。
要求:编写适当的事件过程,使得程序运行时,单击“左”按钮,则焦点位于Text1上;单击“右”按钮,则焦点位于Text2上。
注意:程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
(1)【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。 步骤2:按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤1:新建一个“标准EXE”工程,按要求画出控件并设置属性。 步骤2:双击“左”命令按钮,打开代码编辑窗口,在按钮的Click事件过程中输入代码。 步骤3:从代码编辑窗口的“对象”下拉列表中选择Command2,从“事件”下拉列表选择Click,编写以下事件过程。参考代码: Private Sub Command1_C1iCk() Text1.SetFocus End Sub Private Sub Command2_C1ick() Text2.SetFocuS End Sub 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/zXUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列过程定义正确的是()。
一个栈的初始状态为空。现将元素1,2,3,A,B,C依次入栈,然后再依次出栈,则元素出栈的顺序是
在考生文件夹下有一个工程文件sjt3.vbp,其功能是:①单击“读数据”按钮,则将考生文件夹下in3.dat文件中的100个正整数读入数组a中。②单击“计算”按钮,则找出这100个正整数中的所有完全平方数(一个整数若是另一个整数的平方,那么它就是完全平
窗体上有一个名称为VScrolll的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
为了删除列表框中的一个列表项,应使用的列表框方法是
设有如下事件过程:PrivateSubCommand1_Click()Fori=1To5j=iDoPrint"*"j=j-1LoopUntilj=0NextiEndSub运行程序,输出“*”的个数是
在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.txt文件(如图1所示),单击“打开”按钮,则把文件中的内容读入并
随机试题
胞宫通过胞脉、胞络直接与()
女,30岁,4小时前跌伤后昏迷5分钟,清醒后步行回家。1小时前因剧烈头痛,呕吐3次来诊。查体:昏迷,P64次/分,BP180/90mmHg,R18次/分,左瞳3ml,右瞳2ml,右上、下肢肌力Ⅲ级。应立即采取的急救措施是
损伤的处理不正确的有()。
工人在工作过程中为恢复体力所必需的短暂休息和生理需要的时间消耗属于()。
入境货物可以在检验检疫地以外的销售地、使用地加施检验检疫标志。()
下列关于质权设立的表述中,符合《物权法》规定的有()。
下列乐器中不属于中国民族乐器的是()。
教育学的根本任务是()。
在现场勘验或者搜查中,侦查人员可以决定扣押各种物证、书证。()
Whatisthemandoing?
最新回复
(
0
)