47 喜欢·299 浏览
解答题

注意:下面出现的“”均为c:wexam25160001。

请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。

(1)在名称为Form1的窗体上画一个名称为Text1的文本框,通过属性窗口设置文本框属性,在文本框中显示“WWB”,如图7-1所示;再建立一个名称为Cmd1,标题为“清除”的命令按钮。编写适当的事件过程,要求程序运行后,如果单击“清除”命令按钮,则清除文本框中所显示的信息。

注意:保存时必须存放在考生文件夹下,窗体文件名为sjt1.frm,工程文件名为sjt1.vbp。

(2)在名称为Form1的窗体上建立两个名称分别为Cmd1和Cmd2,标题分别为“输入”和“连接”的命令按钮。如图7-2所示。要求程序运行后,单击“输入”按钮,可通过输入对话框输入两个字符串,存入字符串变量a和b中(a和b定义为窗体变量),如果单击“连接”按钮,则把两个字符串连接为一个字符串(顺序不限)并在信息框中显示出来,如图7-3所示,在程序中不得使用任何其他变量。

注意:保存时必须存放在考生文件夹下,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。

主观题和计算题请自行在草稿纸上作答

题目答案

在窗体上建立好控件后,先设置控件属性,再编写事件过程。 命令按钮的标题由Caption属性设置,单击命令按钮触发Click事件;将文本框的Text属性设置为空,就可以清除文本框中显示的内容。解题步骤: 第一步:建立界面并设置控件属性。程序中用到的控件及其属性见表7-1。 第二步:编写程序代码。 参考代码: Private Sub Cmd1_Click() Text1.Text="" End Sub 第三步:调试并运行程序。 第四步:按题目要求存盘。 (2) 在窗体

答案解析

暂无解析
举一反三

Fatal error: Uncaught Error: Call to a member function query() on null in F:\duqu8.com\SaxueFrame\common\funarticle.php:16 Stack trace: #0 F:\duqu8.com\SaxueFrame\common\funarticle.php(51): formatContent('<p>\xE5\x9C\xA8\xE8\x80\x83\xE7\x94\x9F\xE6\x96\x87...', Object(blockquestionlist)) #1 F:\duqu8.com\SaxueFrame\blocks\block_questionlist.php(107): formatQuestion(Array, Object(blockquestionlist)) #2 F:\duqu8.com\SaxueFrame\lib\template\template.php(640): blockquestionlist->setcontent(true) #3 F:\duqu8.com\SaxueFrame\data\compiled\templates\wap\question.detail.html.php(354): saxue_get_eloop(Array) #4 F:\duqu8.com\SaxueFrame\lib\template\template.php(329): include('F:\\duqu8.com\\Sa...') #5 F:\duqu8.com\SaxueWap\detail.php(81): saxuetpl->fetch('F:/duqu8.com/Sa...') #6 {main} thrown in F:\duqu8.com\SaxueFrame\common\funarticle.php on line 16