2. 计算机
  3. 在考生文件夹下有一个工程文件vbsj4．vbp，请在窗体上画三个文本框，其名称分别为Txt1、Txt2和txtResult，文本框内容分别设置为“等级考试”、“全国计算机”和空白。然后画两个单选按钮，其名称分别为optChange和optLink，标题分别

在考生文件夹下有一个工程文件vbsj4．vbp，请在窗体上画三个文本框，其名称分别为Txt1、Txt2和txtResult，文本框内容分别设置为“等级考试”、“全国计算机”和空白。然后画两个单选按钮，其名称分别为optChange和optLink，标题分别

admin2016-01-31  30
问题 在考生文件夹下有一个工程文件vbsj4．vbp，请在窗体上画三个文本框，其名称分别为Txt1、Txt2和txtResult，文本框内容分别设置为“等级考试”、“全国计算机”和空白。然后画两个单选按钮，其名称分别为optChange和optLink，标题分别为“交换”和“连接”，如图3-29所示。编写适当的事件程序，要求在程序运行时，先单击“交换”单选按钮，使Txt1文本框中内容与Txt2文本框中内容进行交换，并使“交换”单选按钮消失；然后单击“连接”单选按钮，则把交换后的Txt1和Txt2的内容以Txt1在前，Txt2在后的顺序连接起来，并在txtResult文本框中显示连接后的内容。存盘时，工程文件名为vbsj4．vbp，窗体文件名为vbsj4．frm。
   
    注意：不得修改已经给出的程序。在结束程序运行之前，必须先单击“交换”单选按钮，后单击“连接”单选按钮。退出程序时必须通过单击窗体右上角的关闭按钮，否则可能无成绩。
    程序源码：
Private  Sub  Form_Unload(Cance1  As  Integer)
    Open"out4．txt"For Output As #1
    Print  #1，  Txt1．Text，  Txt2．  Text，_
    txtResult．Text
    Close  #1
End Sub
选项
答案审题分析 根据题目要求，设计本题程序的思路：在optChange单选按钮的Click事件应实现：将Txt1和Txt2文本框中的内容互换，可以通过一个中间变量来交换两个文本框中的内容，然后将optChange的Enable属性设置为False。在optIAnk单选按钮的Click事件应实现：将两个文本框中的内容连接进来，这里我们可以采用连接字符符号“＆”来连接两个文本框的Text属性。 操作步骤 步骤1：新建一个“标准EXE”工程，按表4-18在窗体中画出控件并设置其相关属性。 [*] 步骤2：在代码编辑窗口，编写3个按钮的单击事件过程。 参考代码： PriVate Sub optChange_Click() Dim temp As String temp=Txt1．Text Txt1．Text=Txt2．Text Txt2．Text=temp optChange．Visible=False End Sub PriVate Sub optLink_Click() txtResult．Text=Txt1．Text＆Txt2．Text End Sub 步骤3：按要求将文件保存至考生文件夹中。 考点链接 选择控件、变量、运算符和表达式。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/1rLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)