[问答题] 在考生文件夹下完成如下基本操作。 1．新建一个工程，在窗体中创建两个文本框，其名称分别为Text1和Text2。编写一个事件过程，实现在程序运行后，当文本框Text1获得焦点时，其前景颜

[问答题] 在考生文件夹下完成如下基本操作。
1．新建一个工程，在窗体中创建两个文本框，其名称分别为Text1和Text2。编写一个事件过程，实现在程序运行后，当文本框Text1获得焦点时，其前景颜色与背景颜色交换显示。如图13所示。程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为ylcl.vbp，窗体文件名为ylcl.frm。

参考答案：

Visual Basic集成环境中，执行“文件”→“新建工程”命令，选择“标准Exe”。创建窗体Form1。 (2)在工具箱中选择文本框控件，在窗体上创建两个文本框。双击文本框Text1，弹出代码窗口，添加如下代码： Private Sub Text1_Gotfocus() Dim a As Long a=Text1. ForeColor Text1.ForeCotor=Text1.BackColor Text1.BackColor=a End Sub (3)按F5键运行程序。如图13所示。 (4)执行“文件”→“保存工程”命令，将工程文件命名为ylcl.vbp，窗体文件命名为 ylcl.frm。

问题解析:

(1)第1小题中使用了临时变量a，在事件中，利用这个临时变量将Text1的前景色与背景色进行交换。