在窗体上绘制两个标签,名称分别为Lab1和Lab2,标题分别为“请输入一个正整数N”和“1+2+3+…+N=”;绘制两个文本框,名称分别为Text1和Text2,内容都设为空白;绘制一个命令按钮,名为Cmd1,标题为“计算”。编写适当的程序,使程序运行时,在Text1中输入一个正整数N,单击“计算”按钮,计算出1+2+3+…+N的和显示在Text2中。程序运行结果如下图所示。
注意:程序中不得使用任何变量;文件必须存放在考生文件夹中,窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。
参考答案:第一步:新建一个名为FormA的窗体:
第二步:单击工具箱中的LabeA控件图标,在窗体上拖拉出两个标签.在其属性窗口设置名称分别为LabA和LabB,Caption属性分别为“请输入一个正整数N:”和“A+B+C+…+N=”;
第三步:单击工具箱中的CommandButton控件图标,在窗体上拖拉出一个命令按钮,在属性窗口设置该命令按钮名称为CmdA,Caption为“计算”;
第四步:单击工具箱中TextBox控件图标,在窗体上拖拉出两个文本框,在属性窗口将文本框的名称分别设置为TextA和TextB,Text属性设置为空;
第五步:打开代码窗口输入如下代码:
A Private Sub CmdA Click( )
B Dim N As Single, iAs
C Single, S As Single
D N=Val(TextA Text)
E For i=AToN
F S=S+i
G Next i
H TextB. Text=S
I End Sub
第六步:按要求保存文件即完成本题。
解析: 本题主要考查Labe1控件图标、CommandButton控件图标、TextBox控件属性的设置。