(1)在名称为Forml的窗体上建立一个名称为Commandl、标题为“输出”的命令按钮,再建立一个名称为Textl的文本框,字体为四号、常规、黑体,编写适当的事件过程,要求程序运行后,如果单击“输出”命令按钮,则在文本框上显示“模拟考试”,如图31—1所

admin2009-03-26  28

问题 (1)在名称为Forml的窗体上建立一个名称为Commandl、标题为“输出”的命令按钮,再建立一个名称为Textl的文本框,字体为四号、常规、黑体,编写适当的事件过程,要求程序运行后,如果单击“输出”命令按钮,则在文本框上显示“模拟考试”,如图31—1所示。程序中不能使用任何变量,直接显示字符串。
    注意:保存时必须存放在考生文件夹下,窗体文件名为sjl.frm,工程文件名为sjl.Vbp。
    (2)在名称为Forml的窗体上画一个标签,名称为Labell,边框属性为1;再画一个命令按钮,名称为Commandl,标题为“最右端”,运行界面如图31—2所示。请编写适当的事件过程,使运行界面在运行时,单击“最右端”按钮,则标签水平移动到窗体的最右端。程序中不得使用任何变量。

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

选项

答案(1)根据题意,新建“标准EXE”工程,将一个Text控件和一个Command控件添加到窗体上。Text的名称为Textl,Text属性为空,Font属性为四号、常规、黑体,Command的名称为Commandl,Caption属性为“输出”。双击Commandl命令按钮,编写如下代码: Private Sub Commandl_Click() Textl.Text="模拟考试" End Sub 单击[*]按钮运行程序,并按要求保存。 (2)根据题意,新建“标准EXE”工程,将一个Label控件和一个Command控件添加到窗体上。Label的名称为Labell、Caption属性为空,BorderStyle属性为1,Command的名称为Commandl,Caption属性为“最右端”。双击Commandl命令按钮,编写如下代码: Private Sub Command l_Click() Labell.Left=Forml.Width-Labell.Width’将Labell移动到最右端 End Sub 单击[*]按钮运行程序,并按要求保存。

解析
转载请注明原文地址:https://jikaoti.com/ti/CLq0FFFM
0

最新回复(0)