首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Forml的窗体上画出如图3-48所示的三角形。下表给出了直线Linel、Line2的坐标值,请按此表画Line1、Line2,并画出直线Line3,从而组成如图
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Forml的窗体上画出如图3-48所示的三角形。下表给出了直线Linel、Line2的坐标值,请按此表画Line1、Line2,并画出直线Line3,从而组成如图
admin
2016-03-22
18
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画出如图3-48所示的三角形。下表给出了直线Linel、Line2的坐标值,请按此表画Line1、Line2,并画出直线Line3,从而组成如图3-48所示的三角形。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Forml的窗体上画一个名称为IAstl的列表框,并任意输入若干列表项;再画一个名称为Text1的文本框,无初始内容。请编写List1和Text1的Click事件过程。程序运行后,如果单击列表框中的某一项,则在文本框中显示该项相应的顺序号,若单击第一项,则在文本框中显示1;若单击第二项,则在文本框中显示2,以此类推(如图3-49所示);如果单击文本框,则把该列表项的内容显示在文本框中。
注意:要求程序中不得使用变量,事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按表4.29在窗体中画出控件并设置其相关属性。 [*] 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,按表4.30在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写列表框和文本框的单击事件过程。 参考代码: Private Sub List1_Click() Text1.Text=Listl.ListIrldex+1 End Sub Private Sub Text;1_Click() Text1.Text:=List1.List:(List1.List Index) End Sub 步骤3:按要求将文件保存至考生文件夹中;
解析
转载请注明原文地址:https://jikaoti.com/ti/moJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
结构化程序所要求的基本结构不包括
Defsnga定义的变量a是______类型的变量。
长度为n的顺序存储线性表中,当在任何位置上插入一个元素概率都相等时,插入一个元素所需移动元素的平均个数为______。
函数Int(Rnd*10)+10的值的范围是______。
下面关于多重窗体的叙述中,正确的是()。
将任意一个正的两位数N的个位数与十位数对换的表达式为()。
一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体“项目主管”与实体“项目”的联系属于______的联系。
对长度为n的线性表排序,在最坏情况下,比较次数不是n(n-1)/2的排序方法是
同一概念在一处为实体而在另一处为属性或联系的冲突在视图集成中叫()。
随机试题
氢氧化钾的摩尔质量为()。
支气管哮喘的临床表现特点是
【案例】男性,29岁。因心悸气促1天入院。既往有心脏病史。体检:心率170次/分,胸骨左缘第3肋间闻及4/6级收缩期杂音,伴震颤,P2亢进。心电图如图19、图20所示,患者应考虑诊断是什么
古代“子时”指的是()。
法国某公司依1958年联合国《承认与执行外国仲裁裁决公约》,请求中国法院承认与执行一项国际商会国际仲裁院的裁决。依据该公约及中国相关司法解释,下列哪一表述是正确的?(2013年卷一38题,单选)
重要的民用建筑及高层建筑的屋面防水,应按哪一项防水等级和设防要求设计?[1999年第076题][2001年第082题][2006年第076题]
建筑楼面的主要作用包括以下()项。
项目质量控制体系是()的质量控制工作体系。
旅游者欲购买一块地毯,因为暂无货,请导游人员带为购买并托运,对旅游者的这类要求,导游人员一般应婉拒。()
以下程序的执行结果是______#include<iostrearn.h>intf(intb[],intn){inti,r=l;for(i=0;i<n;i++)r=r*b[i];retu
最新回复
(
0
)