首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Form1、标题为“文本框练习”的窗体上添加一个名称为Text1的文本框,设置属性,使其宽度为1600、初始文本内容为空、显示字号为“三号”,且最多只能输入6个字符。程序运行后的窗体如图所示。 注意:存盘时必须存放在考生文件夹下,工
(1)在名称为Form1、标题为“文本框练习”的窗体上添加一个名称为Text1的文本框,设置属性,使其宽度为1600、初始文本内容为空、显示字号为“三号”,且最多只能输入6个字符。程序运行后的窗体如图所示。 注意:存盘时必须存放在考生文件夹下,工
admin
2015-06-30
16
问题
(1)在名称为Form1、标题为“文本框练习”的窗体上添加一个名称为Text1的文本框,设置属性,使其宽度为1600、初始文本内容为空、显示字号为“三号”,且最多只能输入6个字符。程序运行后的窗体如图所示。
注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件名保存为sjt1.frm。
(2)在名称为Form1的窗体上,添加一个名称为Label1的标签,其标题为“计算机等级考试”,显示为宋体12号字,且能根据标题内容自动调整标签的大小。再添加两个名称分别为“Command1”、“Command2”,标题分别为“放大”、“还原”的命令按钮。
要求:编写适当的事件过程,若单击“放大”按钮,则Label1中所显示的标题内容自动增大两个字号;单击“还原”按钮,Label1中所显示的标题内容自动恢复到12号字。
注意:要求程序中不得使用变量,每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下,工程文件名保存为sjt2.vbp,窗体文件名保存为sjt2.frm。
选项
答案
(1)【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.162。 [*] 步骤2:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:建立界面,并设置控件的属性。程序中用到的控件及属性见表3.163和表3.164。 [*] 步骤2:编写程序代码。 参考答案 Private Sub Command1_Click() Label1.FontSize = Label1.FontSize + 2 End Sub Private Sub Command2_Click() Label1.FontSize = 12 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/Z260FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关系表达式中,其值为False的是
以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组,然后画一个名为Text2的文本框和名为Command1的命令按钮。运行时在文本框数组中输入7个分数,单击“计算得分”命令按钮,则最后得分显示在Text2文本框中(去掉一个最高分和一个最低分
下列数据结构中,能用二分法进行查找的是
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填上合适的代码,将程序补充完整。PrivateTypeAngKAsInteger
执行语句Open"TC,dat"ForRandomAs#1Len=50后,对文件TC.dat中的数据能执行的操作是()。
在新建一个VisualBasic工程时,将新建窗体的Name属性设置为TheFirst,则默认的窗体文件名为()。
假定有一个菜单,名为Menultem,为了运行时使该菜单项失效,应使用的语句为()
数据库系统的三级模式分别为【】模式、内部级模式与外部级模式。
代数式对应的VisualBasic6.0表达式是
数据库系统的三级模式分别为【】模式、内部级模式与外部级模式。
随机试题
伊瑟尔认为,文学文本最根本的结构特征是【】
试述矛盾普遍性及特殊性的辨证关系原理及其意义。
患者,男性,20岁,与人口角后,被人用利器扎伤颧颞部,造成软组织出血,急诊采用压迫止血,应该压迫的动脉是
已知微分方程y’+p(x)y=q(x)[q(x)≠0]有两个不同的特解y1(x),y2(x),则该微分方程的通解是:(C为任意常数)
目前国际应用较多的基本分析方法主要有( )。
只有在没有现金净流量为正的项目的时候才会支付股利的方式是()。
将下列五线谱译成简谱旋律。
近日,哈药集团制药总厂被曝明目张胆偷排乱放,你觉得这反映出什么样的问题?
3,7,17,115,()
下列代码实现的功能是:在窗体中一个文本框tNum,运行时若在其中输入课程编号,则会自动在"课程表"中找出对应的"课名"显示在另一个名为tName文本框中。PrivateSub【】()Me!tName=DLookup("课
最新回复
(
0
)