首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 在名称为Form1的窗体上画一个名称Shape1的形状控件,在属性窗口中将其设置为圆形。画一个名称为List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 在名称为Form1的窗体上画一个名称Shape1的形状控件,在属性窗口中将其设置为圆形。画一个名称为List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。
admin
2016-01-31
42
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
在名称为Form1的窗体上画一个名称Shape1的形状控件,在属性窗口中将其设置为圆形。画一个名称为List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则将所选的值作为形状控件的填充参数。例如,选择3,则形状控件中被竖线填充。如图3-22所示。
要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。
选项
答案
审题分析 当形状控件的Shape属性值是3时显示为圆;形状控件的填充色样式通过FillStyle属性设置,其中0为实线、1为透明、2为水平线、3为垂直线、4为向上对角线、5为向下对角线、6为交叉线、7为对角交叉线,缺省值为1。要通过单击列表框中的项目,来改变形状控件的填充样式,需在列表框的Click事件过程中,用语句将列表框中所选的值(通过其Text属性返回)作为形状控件的填充参数。 操作步骤 步骤1:新建一个“标准EXE”工程。 步骤2:在窗体Form1中加入一个列表框和一个形状控件,并分别如表4-15设置它们的相关属性。 [*] 步骤3:打开代码编辑窗口,编写列表框的Click事件过程: 参考代码: Private Sub List1 Click() Shape1.FillStyle=List1.Text End Sub 步骤4:按要求将文件保存至考生文件夹中。 考点链接 图形控件、选择控件
解析
转载请注明原文地址:https://kaotiyun.com/show/0uLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)If(ButtonAnd3)=3ThenPrint"OK"EndIfEndSub程序运行后
为了使模块尽可能独立,要求()。
在窗体上添加一个文本框Text1,然后编写下列Load事件过程,则程序运行结果是()。PrivateSubForm_Load()Text1.Text=""Text1.SetFocusFork=1To5t=t*kNextkT
为了避免流程图在描述程序逻辑时的灵活性,提出了用方框图来代替传统的程序流程图,通常也把这种图称为______。
以下关于函数过程的叙述中,正确的是()。
有序线性表能进行二分查找的前提是该线性表必须是存储的。
在窗体模块中用Public定义的变量的作用范围是
在修改列表框内容时,AddItem方法的作用是
关于变量作用域,下列叙述中正确的是()。
随机试题
王主任是某护理部主任,她把工作分配给总护士长等管理人员,对于例行性业务按照常规措施和标准执行,她加以必要的监督和指导,只有特殊情况时她来处理。她可集中精力研究及解决全局性管理问题,也调动了下级的工作积极性。这种工作方式遵循的组织原则是
驱铅治疗的首选药物是()
患者,女,27岁。上前牙咀嚼不适1个月余。口腔检查可见远中邻腭面深龋,穿髓,探诊(-),叩诊(±),牙髓活力电测验(-),牙周检查(-)。X线片示:根尖有边界不清楚的透影区,呈云雾状。该患者最佳治疗措施是
治疗原发性支气管肺癌阴虚毒热证,应首选的方剂是()
专利申请人依法提出的专利申请被专利局受理后,享有以下权利( )。
针对刘稳的起诉,人民法院应:如果开庭当天刘稳因没有坐上开往县城的早班车,未能出庭,对此,人民法院应当:
下列有关票据承兑的说法正确的是()。
下列各项中,应记入“预付账款"科目借方的是()。
甲方击球后,球触网又翻落在乙方台面的网架夹钳上,弹起后在乙方台面上空被乙一板将球击中甲方台面成“死球”。此时应判()。
Jackarrivedattherailwaystationat4o’clockintheafternoon.Itwas4o’clockintheafternoon______Jackarrivedatther
最新回复
(
0
)