首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1,标题为“测试”的窗体上添加一个名称为Frame1、标题为“字体”的框架。在框架内再添加两个名称分别为Opt1和Opt2、标题分别为“隶书”和“宋体”的单选按钮。程序运行后的窗体如图所示。 注意:存盘时必须存放在考生文件夹下
(1)在名称为Form1,标题为“测试”的窗体上添加一个名称为Frame1、标题为“字体”的框架。在框架内再添加两个名称分别为Opt1和Opt2、标题分别为“隶书”和“宋体”的单选按钮。程序运行后的窗体如图所示。 注意:存盘时必须存放在考生文件夹下
admin
2015-06-30
24
问题
(1)在名称为Form1,标题为“测试”的窗体上添加一个名称为Frame1、标题为“字体”的框架。在框架内再添加两个名称分别为Opt1和Opt2、标题分别为“隶书”和“宋体”的单选按钮。程序运行后的窗体如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。
(2)在名称为Form1的窗体上用名称为shape1的形状控件添加一个直径为1000(高、宽均为1000)的圆;再添加两个标题分别是“垂直线”和“水平线”,名称分别为Cornmand1、Command2的命令按钮,如图所示。然后编写两个命令按钮的Click事件过程。程序运行后,如果单击“垂直线”命令按钮,则圆的内部用垂直线填充;如果单击“水平线”命令按钮,则圆的内部用水平线填充。
注意:程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
(1)【操作步骤】 步骤1:按照题目要求建立窗体和控件,并设置控件的属性。程序中用到的控件及属性见表3.120。 [*] 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:按照题目要求建立窗体和控件,并设置控件的属性。程序中用到的控件及属性见表3.121和表3.122。 [*] 步骤2:编写程序代码。 参考答案 Private Sub Command1_Click() Shape1.FillStyle = 3 End Sub Private Sub Command2_Click() Shape1.FillStyle = 2 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/ygQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行下面的程序段后,i的值为______,s的值为______。s=2Fori=2To9Step0.8s=s+1Nexti
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimaAsInteger,sAsIntegera=8s=1
在窗体上画一个名称为Commandl的命令按钮,然后编写如下代码:OptionBase1PrirateSubCommand1Click()d=0c=10x=Array(10,
下面程序运行时,内层循环的循环总次数是ForM=1To3ForN=0ToM-1NextNNextM
下列程序段运行后,a的值为______。a=600b=50a=a+bb=a-ba=a-b
如果要在程序代码中为图片框动态加载或清除图形,可以通过()函数来实现。
数据库系统中实现各种数据管理功能的核心软件是______。
若要求在文本框中输入密码时文本框中只显示#号,则应在此文本框的属性窗口中设置()
下列程序执行后,变量S的值为DimsAsLong,xAsIntegers=0Forx=1To10Step2s=s+xNextxText1.Text=s
随机试题
属于磁共振血管成像技术之外的是
通过查阅有关文献资料,并对其进行整理统计从而获取评估信息的方法是
消化性溃疡的并发症有()
腹泻患儿有明显循环衰竭时早期扩容宜选用()
郁病痰气郁结证的治疗宜选用()郁病心神惑乱证的治疗宜选用()
下列选项属于社会保险法律关系主体按社会保险责任分类的有()。
改革开放以来,我国主要区域政策经历了不同的阶段:①以经济特区为重心的沿海地区优先发展阶段;②以缩小区域差距为导向的西部大开发阶段;③以浦东开发为龙头的沿江沿边地区重点发展阶段;④以区域协调发展为导向的共同发展阶段。这四个阶段按时问顺序排列应为(
发明了象形文字的是()
法律的强制力()。
NowthepoliticsofUShealthreformisinamessbuttheoddsonabillpassingintheendareimproving.Itwillnotbeatidy
最新回复
(
0
)