(1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行时,单击窗体则显示如图1-173所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。 注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有

admin2010-09-02  24

问题 (1)在考生文件夹下有一个工程文件sjt3.vbp。程序运行时,单击窗体则显示如图1-173所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。

(2)在考生文件夹下有一个工程文件sjt4.vbp,窗体中有一个矩形和一个圆,程序运行时,单击“开始”按钮,圆可以纵向或横向运动(通过选择单选按钮来决定),碰到矩形的边时,则向相反方向运动,单击“停止”按钮,则停止运动,如图1-174所示。可以选择单选按钮随时改变运动方向。已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不得修改已经存在的内容和控件属性,最后把修改后的文件按原文件名存盘。

选项

答案第1小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件sit3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: For i=1 To 5 For j=1 To 2*i-1 For j=1 To i+1 For j=1 To 9-2*i 步骤2:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Timerl.Enabled=False Shape2.Top=Shape2.Top+d*50 If Shape2.Top<=Shapel.Top Or Shape2.Top +Shape2.Width>=Shapel.Top+Shapel.Height Then Shape2.Left=Shape2.Left+d*50 步骤2:按要求将文件保存至考生文件夹中。

解析 第1小题
    根据本题程序所要显示的图案可知,前5行(行号1—5)有如下特点:每行“*”的前面有6-i(i为行号)个为空格,而“*”有2i-1(i为行号)个:后4行(行号l~4)有如下特点:每行“*”的前面有i+1(i为行号)个为空格,而“*”有9-2i(i为行号)个。
    第2小题
    本题原程序在计时器的Timer事件过程中,若选中“纵向”单选按钮,则通过给Shape2的Top属性增值50(-50)使圆向下(上)移动,若圆到达矩形顶端(Shape2.Top<=Shapel.Top)或底端(Shape2.Top+Sahpe2.Width>=Shapel.Top+Shapel.Height),则圆将向相反方向移动(通过表达式d=-d实现)。若选中“横向”单选按钮,其移动方法与“纵向”相似。
    单击“停止”按钮,通过停止计时器Timed,使圆停止运动。
转载请注明原文地址:https://jikaoti.com/ti/jmg0FFFM
0

最新回复(0)