首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画出如图3—46所示的三角形。下表给出了直线Line1、Line2的坐标值,请按此表画Line1、Line2,并画出直线Line3,从而
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画出如图3—46所示的三角形。下表给出了直线Line1、Line2的坐标值,请按此表画Line1、Line2,并画出直线Line3,从而
admin
2019-05-28
25
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画出如图3—46所示的三角形。下表给出了直线Line1、Line2的坐标值,请按此表画Line1、Line2,并画出直线Line3,从而组成如图3—46所示的三角形。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上画一个名称为List1的列表框,并任意输入若干列表项;再画一个名称为Text1的文本框,无初始内容。请编写List1和Text1的Click事件过程。程序运行后,如果单击列表框中的某一项,则在文本框中显示该项相应的顺序号,若单击第一项,则在文本框中显示1;若单击第二项,则在文本框中显示2,以此类推(如图3—47所示);如果单击文本框,则把该列表项的内容显示在文本框中。
注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
(1)【操作步骤】 步骤1:新建一个“标准EXE”工程,按表4—29在窗体中画出控件并设置其相关属性。 [*] 步骤2:按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤1:新建一个“标准EXE”工程,按表4—30在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写列表框和文本框的单击事件过程。参考代码: Private Sub List1_Click() Text1.Text=List1.ListIndex+1 End Sub Private Sub Text1_Click() Text1.Text = List1.List(List1.ListIndex) End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/MPUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在计时器控件中,Interval属性的作用是()。
假定有以下通用过程:FunctionFun(nAsInteger)AsIntegerX=n*nFun=x一11EndFunotion在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommandl_Click()Dimarrayl(10,10)AsIntegerDimiAs
现有如下语句:x=IIf(a>50,Int(a\3),aMod2)当a=52时,x的值是()。
窗体上有一个名称为Picturel的图片框控件,一个名称为Label1的标签控件,如图所示。现有如下程序:PublicSubdisplay(XAsControl)IfTypeOfxIsLabbelThenxCa
窗体上有一个名称为Option1的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程:PrivateSubOptionl_Click(IndexAsInteger)EndSub下面关于此过程的参数I
窗体上有名称为Commandl的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()Text1.Text=”程序设计”Text1.SetFocusEndSubPrivat
窗体上有1个名称为List1、含有3个项目的列表框,1个名称为Text1的文本框,以及1个Interval属性值为1000的计时器控件Timer1。某人编制了以下程序,希望程序运行时,每隔1秒,Listl中的3个项目能够依次在Text1中循环显示。
数据库设计中反映用户对数据要求的模式是()。
下面程序运行时,若输入“VisualBasicProgramming”,则在窗体上输出的是()。PrivateSubCommand1_Click()Dimcount(25)AsInteger,chAsString
随机试题
目前适用于信用证业务的主要国际法律规范是国际商会制订的()
心气不足时可见
宫颈癌术后以下哪几种情况下需补充放疗
城市人均建设用地指标是指()。
下列汽车库、修车库中可设置1个汽车疏散出口的是()。
个人申请汽车贷款可以采取的担保措施有()。
行政处罚只能()。
在TCP/IP参考模型中,不属于应用层协议的是
—Wouldyoumindmyopeningthewindows?
WhatdoesAlisonorder?WherewillMsAndrewshaveherlunch?
最新回复
(
0
)