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

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

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

    (2)在考生文件夹下有一个工程文件sjt4．vbp，窗体中有一个矩形和一个圆，程序运行时，单击“开始”按钮，圆可以横向或纵向运行(通过选择单选按钮来决定)，碰到矩形的边时，则向其相反方向运动，单击“停止”按钮，则停止运动，如图所示。可以通过选择单选按钮随时改变运动方向。
    已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。
    注意：不得修改已经存在的内容和控件属性，最后将修改后的文件按原文件名存盘。
选项
答案(1)【操作步骤】 步骤1：打开本题工程文件。 步骤2：分析并编写程序代码。 程序提供代码 Private Sub Form_Click() ’　For i = 1 To ? 　　　　For j = 1 To 6 - i 　　　　　　Print " "； 　　　　Next j ’　For j = 1 To ? 　　　　　　Print "*"； 　　　　Next j 　　　　Print Next i For i = 1 To 4 ’　For j = 1 To ? 　　　　　　Print " "； 　　　　Next j ’　For j = 1 To ? 　　　　　　Print "*"； 　　　　Next j 　　　　Print Next i End Sub 程序结束 参考答案 第1个？处填入：5 第2个？处填入：2 * i - 1 第3个？处填入：i + 1 第4个？处填入：(9 - 2 * i) 步骤3：调试并运行程序，关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1：打开本题工程文件。 步骤2：分析并编写程序代码。 程序提供代码 Dim d As Integer Private Sub Command1_Click() Timer1.Enabled = True End Sub Private Sub Command2_Click() ’　？ = False End Sub Private Sub Form_Load() d = 1 End Sub Private Sub Timer1_Timer() 　　　　If Option1 Then ’　Shape2.Top = ? + d * 50 ’　If Shape2.Top <= Shape1.? Or Shape2.Top + Shape2.Width >= Shape1.Top + Shape1.Height Then 　　　　　　　　d = - d 　　　　　　End If 　　　　ElseIf Option2 Then ’　Shape2.Left = ? + d * 50 　　　　　　If Shape2.Left <= Shape1.Left Or Shape2.Left + Shape2.Width >= Shape1.Left + Shape1.Width Then 　　　　　　　　d = - d 　　　　　　End If 　　　　End If End Sub 程序结束 参考答案 第1个？处填入：Timer1.Enabled 第2个？处填入：Shape2.Top 第3个？处填入：Top 第4个？处填入：Shape2.Left 步骤3：调试并运行程序，关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/9tQp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)