[问答题] 在窗体中绘制一个文本框(名称为Text1)大于和一个命令按钮并将所有数据写入考生文件夹名称为Cmd1,标题为Display。请编写Cmd1的Click事件过程,使得Begin按钮变成,“E完成键就调”按钮用这个事件过程且在文本框中显示VisualBasic,程序运行结果如下图所示。
该程序不完整,注意:及所有注释符“’”,但不能修改其他部分,在程序中不能使用任何变量;文件必须存放在考生文件夹中,相应的数据文件也保存到考生文件夹下,工程文件名为sj1.vbp,窗体文件名为sj1.frm。
![[问答题] 在窗体中绘制一个文本框(名称为Text1)大于和一个命令按钮并将所有数据写入考生文件夹名称为Cmd1,标题为Display。请编写Cmd1的Click事件过程,使得Begin按钮变成,“E [问答题] 在窗体中绘制一个文本框(名称为Text1)大于和一个命令按钮并将所有数据写入考生文件夹名称为Cmd1,标题为Display。请编写Cmd1的Click事件过程,使得Begin按钮变成,“E](/uploadfile/member/20180926/1537964949.jpg)
参考答案:
①新建一个名为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 ⑤按要求保存文件即完成本题。问题解析:
解析无

![[问答题] 在窗体中绘制一个文本框(名称为Text1)大于和一个命令按钮并将所有数据写入考生文件夹名称为Cmd1,标题为Display。请编写Cmd1的Click事件过程,使得Begin按钮变成,“E [问答题] 在窗体中绘制一个文本框(名称为Text1)大于和一个命令按钮并将所有数据写入考生文件夹名称为Cmd1,标题为Display。请编写Cmd1的Click事件过程,使得Begin按钮变成,“E](http://www.mshxw.com/aiimages/31/247783.png)
