问题 问答题

在窗体上绘制两个标签,名称分别为Lab1和Lab2,标题分别为“请输入一个正整数N”和“1+2+3+…+N=”;绘制两个文本框,名称分别为Text1和Text2,内容都设为空白;绘制一个命令按钮,名为Cmd1,标题为“计算”。编写适当的程序,使程序运行时,在Text1中输入一个正整数N,单击“计算”按钮,计算出1+2-3+…+N的和显示在Text2中。程序运行结果如下图所示。

注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。

 

答案

参考答案:

第一步:新建一个名为Form1的窗体;

第二步:单击工具箱中的Label控件图标,在窗体上拖拉出两个标签,在其属性窗口设置名称分别为Lab1和Lab2,Caption属性分别为“请输入一个正整数N:”和“1+2+3+…+N=”;

第三步:单击工具箱中的CommandButton控件图标,在窗体上拖拉出一个命令按钮,在属性窗口设置该命令按钮名称为Cmd1,Caption为“计算”;

第四步:单击工具箱中TextBox控件图标,在窗体上拖拉出两个文本框,在属性窗口将文本框的名称分别设置为Text1和Text2.Text属性设置为空;

第五步:打开代码窗口输入如下代码:

1 Private Sub Cmd1_Click()

2 Dim N As Single,iAs

3 Single,s As single

4 N=Val(Text1.Text)

5 For i=1ToN

6 S=S+i

7 Next i

8 Text2.Text=S

9 End Sub

第六步:按要求保存文件即完成本题。

解析:

本题主要考查Label控件图标、CommandButton控件图标、TextBox控件属性的设置。

单项选择题
单项选择题