(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。在窗体上有一个名称为Command1、标题为“计算”的命令按钮;两个水平滚动条,名称分别为Hscroll1和Hscroll2,其Max属性均为100,Min属性均为1;四

admin2017-09-22  42

问题 (1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。在窗体上有一个名称为Command1、标题为“计算”的命令按钮;两个水平滚动条,名称分别为Hscroll1和Hscroll2,其Max属性均为100,Min属性均为1;四个标签,名称分别为Label1、Label2、Label3和Label4,标题分别为“运算数1”、“运算数2”、“运算结果"和空白;此外还有一个包含四个单选按钮的控件数组,名称为Optionl,标题分别为“+”、“.”、“*”和“/”,如图3—129(a)所示。程序运行后,移动两个滚动条中的滚动框,用滚动条的当前值作为运算数,如果选中一个单选按钮,然后单击计算按钮,相应的计算结果将显示在Label4中,程序运行情况如图3.129所示。这个程序不完整,请把它补充完整,并能正确运行。
    要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分,也不能修改控件的属性。最后用原来的文件名保存工程文件和窗体文件。

    (2)在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm。在窗体上有一个命令按钮,其名称为Command1,标题为“输/k/显示”;此外还有一个文本框,其名称为Text1,初始内容为空白。程序的功能是,程序运行后,单击命令按钮,显示输入对话框,在对话框中输入某个月份的数值(1~12),然后单击“确定”按钮,即可在文本框中输出该月份所在的季节。例如输入5,将输出“5月份是夏季”,如图3.130所示。程序不完整,请补充完整。
    要求:去掉程序中的注释符,把程序中的“?”改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。

选项

答案(1)步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: If Optionl(i)=True Then elect Case opt Label4.Caption=Str(Hsbl.Value)&"" & opt & Str(Hsb2.Value) & " = " & Str(Result) 步骤2:按要求将文件保存至考生文件夹中。 (2)步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: Loop Until n>0 And n<13 Select Case n Select Case m 步骤2:按要求将文件保存至考生文件夹中。

解析 (1)本题其实就是根据所选运算符计算两个水平滚动条产生值的结果。题目源程序利用一个For循环语句逐一判断单选按钮数组中各元素是否选中,若选中则用变量opt记录下所选项的标题;接下来则根据opt可能出现的不同值,用Select Case语句分别做出处理;最后将运算表达式及结果显示在标签Label4上。
    (2)本题源程序利用一个Loop循环语句使得输入月份,只有当输入的月份为1~12之间的整数时才是合法的输入;接下来使用Select Case语句分别对月份n做出处理;最后再使用Select Case语句根据不同的季节m的值进行输出。
转载请注明原文地址:https://jikaoti.com/ti/oWy0FFFM
0

最新回复(0)