在考生文件夹下游一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器，以及名称为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件，在两条直线之间画一个宽和高都相等的形状，其显示形式为圆，并设置适当属性使其满足以下要求：①圆的顶端距窗体Form1顶端的距离为360；②圆的颜色为红色（红色对应的值为：&H000000FF&或&HFF&），如图所示。程序运行时，Shape1将在Line1和Line2之间运动。当Shape1的顶端到达Line1时，会自动改变方向而向下运动；当Shape1的底部到达Line2时，会改变方向而向上运动。文件中给出的程序不完整，请去掉程序中的注释符，把程序中的？改正确内容，使其实现上述功能
　　注意：不能修改程序的其他部分和已给出控件的属性。最后将修改后的文件按原文件名存盘。

　　（2）在考生文件夹下有一个工程文件sjt4.vbp，包含了所有控件和部分程序，如图所示。程序功能如下：①单击“读数据”按钮，可将考生文件夹下in4.dat文件中的100个整数读到数组a中；②单击“计算”按钮，可根据从名称为Combol的组合框中选中的项目，对数组a中的数据计算平均值，并将计算结果四舍五入取整后显示在文本框Text1中。“读数据”按钮的Click事件过程已经给出，请为“计算”按钮编写适当的事件过程以实现上述功能。
　　注意：不得修改已经存在的控件和程序，在结束程序运行之前，必须进行一次计算，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。

[问答题]在考生文件夹下有一个工程文件sjt3.vbp。窗体上有名称为Timer1的定时器，以及名称为Line1和Line2的两条水平直线。请用名称为Shape

[试题]在考生文件夹下有一个工程文件sjt3．vbp。窗体上有名称为Timer1的定时器，以及名称 为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件，在两条直线之间画一个宽和高都相等的形状，其显示形式为圆，并设置适当属性使其满足以下要求： ①圆的顶端距窗体Form1顶端的距离为360； ②圆的颜色为红色(红色对应的值为&H000000FF&或&HFF&)，如图3所示。 程序运行时，Shape1将在Line1和Line2之间运动。当Shape1的顶端到

[单选题]窗体的左右两端各有一条直线，名称分别为Line1、Line2；名称为Shape1的圆靠在左边的Line1直线上，如下图所示；另有一个名称为Timer1

[问答题]考生文件夹下的工程文件sjt2.vbp中有一个由直线Line1、Line2和Line3组成的三角形，直线Line1、Line2和Line3的坐标值如下

[试题]在考生文件夹下有一个工程文件sjt3．vbp，请在名称为Forml的窗体上画一个名称为Text1 的文本框和一个名称为C1、标题为“转换”的命令按钮，如图8所示。在程序运行时，单击“转换”按钮，可以把Text中的大写字母转换为小写，把小写字母转换为大写。 窗体文件中已经给出了“转换”按钮的Click事件过程，但不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。 注意：不能修改程序中的其他部分，最后把修改后的文件按原文件名存盘。 (2)在考生文件夹下有一个工程文件sjt4．vbp，其功能是：

[单选题]设窗体上有2个直线控件Line1和Line2，若使两条直线相连接，需满足的条件是（　　）。A.Line1.X1=Line2.X2且Line1.YI=L

[单选题]设窗体上有2个直线控件Line1和Line2，若使两条直线相连接，需满足的条件是（　　）。A.Line1.X1＝Line2.X2且Line1.Y1＝L

[单选题]窗体上有一个名称为Timer1的计时器控件，一个名称为Shape1的形状控件，其Shape属性值为3（Circle）。编写程序如下：以下关于上述程序的

[主观题]在考生文件夹下有一个工程文件sjt5．vbp。其窗体中有一个名称为Text1的文本框数组，下标从0开始。程序运行时，单击“产生随机数”按钮，就会产生10个3位数的随机数，并放入Text1 数组中，如图6(a)所示单击“重排数据”按钮，将把Text1中的奇数移到前面，偶数移到后面，如图6(b)所示。文件中已经给出了所有控件和部分程序。 要求：请去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。 提示：在“重排数据”按

[单选题]窗体的左右两端各有1条直线，名称分别为Linei、Line2；名称为Shapel的圆靠在左边的Linel直线上(见图)；另有1个名称为Timerl的计时器控件，其Enabled属性值是True。要求程序运行后，圆每秒向右移动100，当圆遇到Line2时则停止移动。为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序：Private Sub Timerl Timer()F．or k=Line1．Xl To Line2．X1 Step 100If Shapel．Left