在窗体上绘制两个标签,名称分别为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控件属性的设置。