首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1的窗体上添加一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&)。运行程序后的窗体如图所示。 要求:程序中不得使用变量,每个事件过程
(1)在名称为Form1的窗体上添加一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&)。运行程序后的窗体如图所示。 要求:程序中不得使用变量,每个事件过程
admin
2018-06-29
30
问题
(1)在名称为Form1的窗体上添加一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&)。运行程序后的窗体如图所示。
要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,在属性窗口中将其形状设置为圆形。添加一个名称为List1的列表框,并在属性窗口中设置列表项的值分别为1、2、3、4、5。将窗体的标题设为“图形控件”。单击列表框中的某一项,则将其值作为形状控件的填充参数。例如,选择3,则形状控件中被竖线填充,如图所示。
要求:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名保存为sjt2。vbp,窗体文件名保存为sjt2.frm。
选项
答案
(1)步骤1:建立界面,添加相应的控件并设置控件的属性。程序中涉及的控件及属性见表3.59。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub C1_Click() Form1.BackCo1or=&HFF& End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)步骤1:建立界面,将窗体Form1的Caption属性设置为“图形控制”,然后添加相应的控件并设置控件的属性。程序中用到的控件及属性见表3.60。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub List1_Click() Shape1.FiiiStyle=List1.Text End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
(1)通过命令按钮的Name和Caption属性设置命令按钮的名称和标题,通过窗体的Caption属性设置窗体的标题,在C1_Click事件过程中,通过设置窗体的BackCobr属性实现单击命令按钮时将窗体的背景颜色改为红色。
(2)通过形状控件的Name和Shape属性设置形状控件的名称和形状,通过列表框的Name和List属性设置列表框的名称和列表项,单击列表框中的某一项,通过List1的Text属性确定选中的值,并将其值作为形状控件的填充参数,FillStyle属性用于返回/设置一个形状控件的填充样式。
转载请注明原文地址:https://jikaoti.com/ti/Esy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommandl_Click()DimstrlAsString,str2AsStringstrl=InputBox(“输入一个字符串”)subfst
下列合法的变量名是()。
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指()。
以下过程的功能是从数组中寻找最大值:PrivateSubFindMax(a()AsInteger,ByRefMaxAsInteger)DimsAsInteger.fAsInteger
设工程文件中包名称分别为Forml、Form2的两个窗体,且Forml的菜单属性设置如下:窗体FormI中的程序如下:DimFlagAsBooleanPrivateSubForm_Load()Fl
以下关于控件数组的叙述中,错误的是()。
在窗体上画一个命令按钮和一个文本框,其名称分别为Commandl和Textl,把文本框的Text属性设置为空白,然后编写如下事件过程:PrivateSubCommandl_Click()a=InputBox(“En
在考生文件夹下有一个工程文件sjt5.vbp,界面如图所示,其功能如下:①单击“读数据”按钮,则把考生文件夹下文件in5.dat中的12组整数(其中每组含有10个数,共计120个整数)读到数组a中;②单击“计算”按钮,则对每组数求平均
设在当前目录下有一个名为“file.txt”的文本文件,其中有若干行文本。编写如下程序:PrivateSubCommandl_Click()Dimch$.asciiAsIntegerOpen“file.t
随机试题
下列具体人格权中,属于精神性人格权的有()。
“在法学家们以及各个法典看来,各个个人之间的关系,例如缔结契约这类事情,一般是纯粹偶然的现象,这些关系被他们看作是可以随意建立或不建立的关系,它们的内容完全取决于缔约双方的个人意愿。每当工业和商业的发展创造出新的交往形式,例如保险公司等的时候,法便不得不承
合同权利和义务终止也称( )。
某客户持有一份九月份小麦看涨期权,期权费为200元,则该客户的利润区间为()。
已知某公司当前资本结构如下:因生产发展,公司年初准备增加资金2500万元,现有两个筹资方案可供选择:甲方案为增加发行1000万股普通股,每股市价2.5元;乙方案为按面值发行每年年末付息、票面利率为10%的公司债券2500万元。假定股票与债券的发行费用均
求过点且与平面α1:x+y+z+1=0和平面α2:2x+y-z+2=0都平行的直线方程.
把下面的六个图形分为两类,使每一类图形都有各自的共同特征或规律,分类正确的一项是()。
在图所示的电路中,电源电压保持不变。当电键S由断开到闭合,电压表V1的示数始终等于V2的示数。若电路中只有一处故障,且只发生在电阻R或灯泡L处,则可能是:
自从《行政诉讼法》颁布以来,“民告官”的案件成为了社会关注的热点。人们普遍担心的是,“官官相护”会成为公正审理此类案件的障碍。但据H省本年度的调查显示,凡正式立案审理的“民告官”案件,65%都是以原告胜诉结案。这说明,H省的法院在审理“民告官”的案件中,并
Humanity’sprimaleffortstosystematizetheconceptsofsize,shapes,andnumberareusuallyregardedastheearliestmathemati
最新回复
(
0
)