首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其名称为Form1的窗体上已有三个文本框Text1、Text2、Text3,以及部分程序代码,请完成以下工作。 ①在属性窗扣中修改Text3的适当属性,使其在运行时 不显示,作为模拟的剪贴板使用,窗体如
在考生文件夹下有一个工程文件sjt5.vbp,其名称为Form1的窗体上已有三个文本框Text1、Text2、Text3,以及部分程序代码,请完成以下工作。 ①在属性窗扣中修改Text3的适当属性,使其在运行时 不显示,作为模拟的剪贴板使用,窗体如
admin
2019-05-14
28
问题
在考生文件夹下有一个工程文件sjt5.vbp,其名称为Form1的窗体上已有三个文本框Text1、Text2、Text3,以及部分程序代码,请完成以下工作。
①在属性窗扣中修改Text3的适当属性,使其在运行时
不显示,作为模拟的剪贴板使用,窗体如图所示。
②建立下拉式菜单,如下表所示。
③窗体文件中给出了所有事什过程,但不完整,请去掉程序中的注释符,把程序中的?改为正确的内容,以便实现如下功能:当光标所在的文件框中无内容时,“剪切”、“复制”不可用,否则可以把该文本框中的内容剪切或复制到Text3中;若Text3中无内容,则“粘贴”不能用,否则可以把Text3中的内容粘贴在光标所在的文本框中的内容之后。
注意:不能修改程序中的其他部分,各菜单项的标题名称必须正确。最后将修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件,将Text3的Visible属性设置为False,然后按照题目要求建立菜单并设置其属性,如图3.20所示。 [*] 菜单属性如表3.12所示。 [*] 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考答案 Dim which As Integer Private Sub copy_Click()’复制按钮 If which=1 Then’当焦点在Text1中,将rext1中的内容复制给Text3 Text3.Text=Text1.TeXt ElseIf which=2 Then’同理,焦点在Text2中,将Text2中的内容复制给Text3 Text3.Text=Text2.Text End If End Sub Private Sub cut C1ick()’剪切按钮 If which=1 Then’当焦点在Text1中,则将内容复制给Text3,并清空Text1内容 Text3.Text=Text1.Text Textl.Text="" ElseIf which=2 Then’同上 Text3.Text=Text2.Text Text2.Text="" End If End SUb Private Sub edit_C1ick()’编辑 If which=1 Then If Text1.Text=""Then Cut.Enabled=False Copy.Enabled=False Else Cut.Enabled=True Copy.Enabled=True End If ElseIf which=2 Then If Text2.Text=""Then Cut.Enabled=False Copy.Enabled=False E1se Cut.Enabled=True Copy.Enabled=True End If End If If Text3.Text=""Then Paste.Enabled=False E1se Paste.Enabled=True End If End Sub Private Sub paste_Cick()’粘贴按钮 If which=1 Then’当焦点在Text1中则将 Text3的内容追加到Text1文件末尾 Text1.Text=Text1.Text+Text3.Text ElseIf which=2 Then。’同上 Text2.Text=Text2.Text+Text3.Text End If End Sub Private Sub Text1 GotFocus()’本过程的作用是当焦点在Text1中时,which=1 which=1 End Sub Private Sub Text2 GotFocus()’本过程的作用是当焦点在Text2中时,which=2 which=2 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/BTUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目,则应把该列表框的MultiSelect属性设置为()。
在考生目录下有一个工程文件sit5.vbp。窗体左边的图片框名称为Picturel,框中还有六个小图片框,它们是一个数组,名称为Pic,在窗体右边从上到下有三个显示不同物品的图片框,名称分别为Picture2、Picture3、Picture4,还有一个文
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Commandl和Command2,标题分别为“扩大”和“
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为CmdChange、标题为“改变颜色”的命令按钮,窗体标题为“设置窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml、标题为“标签”的窗体上画一个名称为Labell的标签,并设置适当属性以满足以下要求:①标签的内容为“计算机等级考试”;②标签可根据显示内容自动调整
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为Combol的组合框,其宽度为1200,其类型如图3.102所示(即简单组合框)。要求如下:①请按图中所示,通过属性窗口输入“北
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml标题为“选课”的窗体上画一个复选框数组,名称为CHl,共有四个复选框,按顺序其标题分别是“数学”、“语文”、“外语”、“计算机”,其中“语文”、“计算机
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Textl;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3-20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
在考生文件夹中有一个工程文件sjt5.vbp,如图3.129所示。运行程序时,从文件中渎入矩阵数据并放入二维数组a中。单击“计算”按钮时,将统计矩阵两个对角线的元素中能被3整除的个数,统计结果显示在标签lblFirst中;同时计算矩阵主对角线的元素之和,计
随机试题
ItwasClark’sfirstvisittoEngland,andhewaslookingforwardtohisfirstjourneyonLondon’sUndergroundRailway.Against【
刀具材料硬度与耐磨性的关系为()。
孕30周,枕左前位,胎心音的听诊部位应在
患者男性,22岁,呼吸困难,心前区不适,体征有奇脉,颈静脉怒张。听诊心动过速,心音遥远,临床怀疑为大量心包积液。其与限制型心肌病相鉴别,后者超声表现有
A.氨苄西林B.舒巴坦钠C.头孢氨苄D.亚胺培南E.氨曲南单环β一内酰胺类抗生素是()。
28岁孕妇,妊娠35周,G3P0。曾有2次人工流产史。今晨突然大量阴道流血,无腹痛,即来门诊。查体:血压80/60mmHg,胎心率130次/分,胎头浮,有细弱宫缩。诊断为()。
某期房预计两年后竣工交付使用,目前与其类似在现房价格为4500元每平米,出租的年末净收益为500元每平米。假设年折现率为8%,风险补偿估计为现房价格的3%,则该期房目前的价格为()元/每平米。
2017年4月,国家主席习近平对推进“两学一做”学习教育常态化制度化作出重要指示,他强调,要把()摆在首位,坚持用党章党规规范党员、干部言行,用党的创新理论武装全党,引导全体党员做合格党员。
全球率先实现5GSA网络商用的运营商是()。
设x=e-t,y=∫01ln(1+μ2)dμ,则=________。
最新回复
(
0
)