问题 问答题

在窗体中绘制一个文本框(名称为Text1)大于和一个命令按钮并将所有数据写入考生文件夹名称为Cmd1,标题为Display。请编写Cmd1的Click事件过程,使得Begin按钮变成,“E完成键就调”按钮用这个事件过程且在文本框中显示VisualBasic,程序运行结果如下图所示。
该程序不完整,注意:及所有注释符“’”,但不能修改其他部分,在程序中不能使用任何变量;文件必须存放在考生文件夹中,相应的数据文件也保存到考生文件夹下,工程文件名为sj1.vbp,窗体文件名为sj1.frm。

答案

参考答案:①新建一个名为Form1的窗体;
②单击工具箱中的TextBox控件图标,在窗体上拖拉出一个文本框,在属性窗口设置该文本框名称为Text1;
③单击工具箱中的Command Button控件图标,在窗体上拖拉出一个命令按钮,在属性窗口设置该命令按钮名称为Cmd1,Caption属性为Display。KeyPress事件是当用户按下和松开一个键时发生,用参数KeyAscii来返回所按键的Ascii码;
④打开代码窗口输入如下代码:
Private Sub Cmd1_Click()
Text1.Text="Visual Basic"当单击按钮时在文本框显示“Visual Basic”
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
If KeyAscii=27 Then’当按键盘Esc键时,也就是KeyAscii=27时,调用按钮事件
Call Cmd1_Click
End If
End Sub
⑤按要求保存文件即完成本题。

单项选择题
单项选择题