首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其名称为Form1的窗体上已有三个文本框Text1、Text2、Text3,以及部分程序代码,请完成以下工作。 ①在属性窗扣中修改Text3的适当属性,使其在运行时 不显示,作为模拟的剪贴板使用,窗体如
在考生文件夹下有一个工程文件sjt5.vbp,其名称为Form1的窗体上已有三个文本框Text1、Text2、Text3,以及部分程序代码,请完成以下工作。 ①在属性窗扣中修改Text3的适当属性,使其在运行时 不显示,作为模拟的剪贴板使用,窗体如
admin
2019-05-14
25
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
数据库系统的核心是()。
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个文本框,其名称为T1,宽度和高度分别为1400、400;再画两个命令按钮,其名称分别为C1和C2,标题分别为“显示”和“扩大”,编写适当的
在考生目录下有一个工程文件vbsj5.vbp,用来计算勾股定理整数组合的个数。勾股定理中3个数的关系是:a2+b2=c2。例如,3、4、5就是一个满足条件的整数组合(注意:a,b,c分别为4,3,5与分别为3,4,5被视为同一个组合,不应该重复计算)。编写
在考生目录下有一个工程文件sit5.vbp。窗体中已经给出了所有控件(如图3—82所示)。请编写适当的事件过程完成以下功能:单击“读数”按钮,则把考生目录下的in5.txt文件中的一个整数放入Text1;单击“计算”按钮,.则计算出大于该数的第一个素数,并
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm,在窗体上有一个命令按钮(名称为Commandl,标题为“计算并输出”)和两个文本框(名称分别为Text1和Text2),如图3—8所示。程序运行后,单击命令按钮,即可计算
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上建立一个名称为Commandl的命令按钮数组,含三个命令按钮,它们的Index属性分别为0、1、2,标题依次为“是”、“否”、“取消”,每个按钮
考生文件夹下有工程文件sjt5.vbp。程序运行时,外观如图3.187所示,单击“显示数据”按钮,则将考生文件夹下in5.dat文件的内容读入到5行40列的二维数组a中,并按5行显示在Textl文本框内;单击“统计"按钮,则计算每行中小于50的数之和,及这
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为Pic的图片框,通过属性窗口将考生文件夹下的文件Tul一1jpg添加到图片框,然后编写适当的事件过程。运行程序时,单击窗体,在图片框
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Fomal的窗体上建立一个如下表所示的下拉菜单,其中“设置”菜单项为灰色(不可用),如图3-58所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1
在考生文件夹下有一个工程文件sjt4.vbp。窗体上的控件如图所示。程序运行时,若选中“累加”单选按钮,则“10”、“12”菜单项不可用,若选中“阶乘”单选按钮,则“1000”、“2000”菜单项不可用(如图所示)。选中菜单中的一个菜单项后,单击“计算”按
随机试题
Justsevenyearsago,theTexasLegislatureprescribedthatallhighschoolersmustpasstwomathcoursesandgeometrytogradua
营销渠道一端联系着生产,一端联系着_______。
关于抗感染免疫的叙述,下列那些是正确的
居室空气中甲醛污染来源于
A.主动脉型心B.二尖瓣型心C.双侧心界扩大D.心绝对浊音界扩大E.心底浊音区扩大扩张型心肌病时属()
某工程建设单位在开工前已投保“建筑工程一切险”。当工地发生意外事故造成()的伤亡损失属于第三者保险责任。
以下关于各种围护结构特点,错误的是()。
设f(x)=lnx,且函数φ(x)的反函数,则f[φ(x)]=________。
求函数y=(x∈(0,+∞))的单调区间与极值点,凹凸区间与拐点及渐近线.
Awebcamisadigitalcamerathatsendsvideoimagestoothercomputerusers.It’saboutthe【C1】______ofagolfballandtyp
最新回复
(
0
)