在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框,初始内容均为空;再建立一个下拉菜单,菜单标题为“操作”,名称为Ml,此菜单下含有两个菜单项,名称分别为Copy和Clear,标题分别为“复制”、“清除”,请编写适当的事件过程,使得

admin2020-04-08  27

问题  在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框,初始内容均为空;再建立一个下拉菜单,菜单标题为“操作”,名称为Ml,此菜单下含有两个菜单项,名称分别为Copy和Clear,标题分别为“复制”、“清除”,请编写适当的事件过程,使得在程序运行时,单击“复制”选项菜单,则把Textl中的内容复制到Text2中,单击“清除”选项菜单,则清除Text2中的内容(即在Text2中填入空字符串)。运行时的窗体如图所示。要求在程序中不得使用任何变量,每个事件过程中只能写一条语句。
    注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。

选项

答案【操作步骤】 步骤l:新建窗体,按表4.2建立菜单项并设置其属性,如图4.7所示。 [*] 步骤2:同步骤l,输入第3项的标题和名称,单击确定即可。 步骤3:添加文本框控件,按表4.3设置文本框的属性。 [*] 步骤4:打开代码编写窗口,编写程序代码,如图4.8所示。 [*] 参考答案 Private Sub Clear Click() Text2.Text="" End Sub PriVate Sub Copy_Click() Text2.Text=Textl.Text End Sub 步骤5:调试并运行程序,关闭程序后按题目要求存盘。 【易错提示】在清除文本框Text2的内容时不能使用Cls方法,必须通过赋值空字符串来实现,在赋值过程时,注意要在英文状态下编写代码,区分“” 和""。

解析 在编辑窗体中单击鼠标右键选择“菜单编辑器”来创建菜单,在菜单的Click事件中,通过对Text2.Text属性的设置来完成对内容的清除和复制。
转载请注明原文地址:https://kaotiyun.com/show/UATp777K
0

最新回复(0)