网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
单选题
窗体上有一个名称为Timer1的计时器控件，一个名称为Shape1的形状控件，其Shape属性值为3（Circle）。编写程序如下：以下关于上述程序的叙述中，错误的是（ ）。
A
每执行一次Timer1_Timer事件过程，x的值都在原有基础上增加1
B
Shape1每移动10次回到起点，重新开始
C
窗体上的Shape1由下而上移动
D
Shape1每次移动100
参考答案
参考解析
解析：
C项，控件Shape1的Top属性是距离窗体顶的位置，数值越大距离越远，因此Shape1会由上向下移动。A项，变量x定义为Static，即每次进入Timer事件过程时，x都会保留上次的值，从而实现每执行一次Timer1_Timer事件过程x的值都在原有基础上增加1；B项，程序中判断调用Timer事件过程10次后，重置Shape1的top值为0，即回到起点。D项，Shape1.Top值每次增加100，所以Shape1每次移动100。
C项，控件Shape1的Top属性是距离窗体顶的位置，数值越大距离越远，因此Shape1会由上向下移动。A项，变量x定义为Static，即每次进入Timer事件过程时，x都会保留上次的值，从而实现每执行一次Timer1_Timer事件过程x的值都在原有基础上增加1；B项，程序中判断调用Timer事件过程10次后，重置Shape1的top值为0，即回到起点。D项，Shape1.Top值每次增加100，所以Shape1每次移动100。
更多 “单选题窗体上有一个名称为Timer1的计时器控件，一个名称为Shape1的形状控件，其Shape属性值为3（Circle）。编写程序如下：以下关于上述程序的叙述中，错误的是（ ）。A 每执行一次Timer1_Timer事件过程，x的值都在原有基础上增加1B Shape1每移动10次回到起点，重新开始C 窗体上的Shape1由下而上移动D Shape1每次移动100” 相关考题
考题
（ 26 ）窗体上有 1 个名称为 Text1 的文本框； 1 个名为 Timer1 的计时器控件，其 Interval 属性值为5000 ， Enable 属性值是 True 。 Timer1 的事件过程如下：Private Sub Timer1_Timer()Static flag As IntegerIf flag=0 Then flag=1flag=-flagIf flag=1 ThenText1.ForeColor=HFF ‘ HFF 为红色ElseText1.ForeColor=HC000 ‘ HC000 为绿色End IfEnd Sub以下叙述正确的是A ）每次执行些事件过程时， flag 的初始值为 0B ） flag 的值只可能取 0 或 1C ）程序执行后，文本框的文字每 5 秒改变一次颜色D ）程序有逻辑错误， Else 分支总也不能被执行
考题
窗体上有1个名称为Textl的文本框；1个名称为Timerl的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timerl的事件过程如下：Private Sub Timerl Tliner()Static flag As IntegerIfflag=0 Then flag=1flag=-flagIfflag=1 ThenTextl．ForeColor=HFF HFF为红色ElseTextl．ForeColor=HC000 HC000为绿色End IfEnd Sub以下叙述中正确的是A．每次执行此事件过程时，flag的初始值均为0B．flag的值只可能取0或lC．程序执行后，文本框中的文字每5秒改变一次颜色D．程序有逻辑错误，Else分支总也不能被执行
考题
窗体上有1个名称为Text1的文本框；1个名称为Timer1的计时器控件，其Interval 属性值为5000，Enabled属性值是True。Timer1的事件过程如下：Private Sub Timer1 Timer（ ）Static flag As IntegerIf Flag=0 Then Flag=1Flag=-flagIf flag=1 ThenText1．ForeColor=＆HFF＆ ＆HFF＆为红色ElseText1．ForeColor=＆HCOO＆ ＆HCOO＆为绿色End IfEnd Sub以下叙述中正确的是（ ）。A.每次执行此事件过程时，flag的初始值均为0B.flag的值只可能取0或1C.程序执行后，文本框中的文字每5秒改变一次颜色D.程序有逻辑错误，Else分支总也不能被执行
考题
在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1。为了使得每一秒钟在文本框中显示一次当前的时间，应将Interval属性值设置为A．1)B．10C．100D．1000
考题
在窗体上有一个文本框控件，名称为TxtTime一个计时器控件，名称为Timer1，要求每1秒钟在文本框中显示一次当前的时间，程序为： Private Sub Timer1 ______() TxtTime. text=Time End Sub 在下划线上应填入的内容是 ______。A．EnabledB．VisibleC．IntervalD．Timer
考题
考生文件夹中有工程文件sjt3．vbp。在窗体上有名称为Combo1的组合框，请设置该组合框的属性，使该组合梃只能用于选择操作，不能输入文本。窗体上还有两个标题分别为“输入正整数”、“判断”的命令按钮。程序运行时在组合框中选中一项，如图5(a)所示，单击“输入正整数”按钮，通过输入对话框输入一个正整数，再单击“判断”按钮，则按照选定的选项内容，将判断结果显示在信息框中。如图5(b)所示的是输入56且选中的组合框选项为“判奇偶数”时显示的信息框。 在给出的窗体文件中已经有了全部控件，但程序不完整，要求：按照题目要求设置组合框的 有关属性，去掉程序中的注释符，把程序中的?改为正确的内容。 、 注意：考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。(2)在考生目录下有一个工程文件sjt4．vbp。窗体上有一大一小两个名称分别为Shape2、Shape1的Shape控件。请在属性窗口中将Shape1控件设置为圆形，并将其颜色设置为红色(颜色值为H000000FF)，如图6所示。 要求：当单击窗体时，Shape1移动到矩形(即 Shape2)左上角，再次单击窗体，则Shapel移动到矩形的右下角。在给出的窗体文件中已经有了全部控件，但程序不完整。要求：在属性窗口中设置有关的属性值，去掉程序中的注释符，把程序中的?改为正确的内容。 注意：不能修改程序的乓他部分和控件属性。最后把修改后的文件按原文件名存盘。
考题
窗体的左右两端各有1直线，名称分别为Line1、Line2；名称为Shape1的圆靠在左边的Linel直线上(见图)；另有1个名称为Timer1的计时器控件，其Enabled属性值是True。要求程序运行后，圆每秒向右移动100，当圆遇到Line2时则停止移动。为实现上述功能，某人把计时器的Interva1属性设置为1000，并编写了如下程序：Private Sub Timer1 Timer（ ）For k=Line1．X1 To Line2．X1 Step 100If Shape1．Left+Shape1．widthLine2．X1 ThenShape1．Left=Shape1．Left+100End IfNext kEnd Sub运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是（ ）。A.把计时器的Interval属性设置为1B.把For k=line1．X1 To Line2．X1 Step 100和Next k两行删除C.把For k=Line1．X1 To Line2．X1Step 100改为For k=Line2．X1 To Line1．X1 Step 100D.把If Shape1．Left+Shepe1．WidthLine2．X1 Then改为If Shape1．LeftLine2．X1 Then
考题
在考生文件夹中有一个工程文件execise107.vbp及窗体文件execise107.frm。在名为 Form1的窗体上已经绘制出所有控件，如下图所示。在运行时，如果单击Move按钮，则窗体上的汽车图标每0.1秒向右移动一次(初始状态下不移动)；如果单击Stop按钮，则停止移动。要求：(1)设置适当控件的适当属性，使得汽车图标每0.1秒向右移动一次，而初始状态下不移动。(2)请去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容。(3)为两个命令按钮编写适当的事件过程。最后以原文件名保存。注意：不得修改已经给出的程序。编写的事件过程中不能使用变量，每个事件过程中只能有一条语句。
考题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Forml的窗体上建立一个名称为Commandl的命令按钮数组，含三个命令按钮，它们的Index属性分别为0、1、2，标题依次为“是”、“否”、“取消”，每个按钮的高、宽均为300、800。窗体的标题为“按钮窗口”。运行后的窗体如图4所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为sjtl．vbp，窗体文件名为sjtl．frm。(2)在名称为Forml的窗体上画一个名称为Shal的形状控件，然后建立一个菜单，标题为“形状”，名称为shape0，该菜单有两个子菜单，其标题分别为“正方形”和“圆形”，其名称分别为shape1和shape2，如图5所示，然后编写适当的程序。程序运行后，如果选择“正方形”菜单项，则形状控件显示为正方形；如果选择“圆形”菜单项，则窗体上的形状控件显示为圆形。 注意：程序中不能使用变量，每个事件过程中只能写一条语句。保存时必须存放在考生文件夹下，工程文件名为sjit2.vbp．窗体文件名为sjt2.frm。
考题
在考生文件夹下有一个工程文件sjt3．vbp。窗体上有名称为Timer1的定时器，以及名称 为Line1和Line2的两条水平直线。请用名称为Shape1的形状控件，在两条直线之间画一个宽和高都相等的形状，其显示形式为圆，并设置适当属性使其满足以下要求： ①圆的顶端距窗体Form1顶端的距离为360； ②圆的颜色为红色(红色对应的值为H000000FF或HFF)，如图3所示。 程序运行时，Shape1将在Line1和Line2之间运动。当Shape1的顶端到达Line1时，会自动改变方向而向下运动；当Lhape1的底部到达Line2时，会改变方向而向上运动。 文件中给出的程序不完整，请去掉程序中的注释符，把程序中的?改为正确内容，使其实现 上述功能。 注意：不能修改程序的其他部分和已给出控件的属性。最后将修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件sjt4．vbp，包含了所有控件和部分程序，如图4所示。程序功能如下： ①单击“读数据”按钮，可将考生文件夹下in4．dat文件中的100个整数读到数组a中； ②单击“计算”按钮，则根据从名称为Combo1的组合框中选中的项目，对数组a中的数据计算平均值，并将计算，墙果四舍五入取整后显示在文本框Text1中。“读数据”按钮的Click事件过程已经给出，请为“计算”按钮编写适当的事件过程实现上述功能。 注意：不得修改已经存在的控件和程序，在结束程序运行之前，必须进行一次计算，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。
考题
在窗体上画一个文本框控件，名称为TxtTime；再画一个计时器控件，名称为Timer1，程序运行后，要求每1秒钟在文本框中显示一次当前的事件。以下是实现上述操作的程序，则在下划线后(括号前)应填入的内容是______。 Private Sub Timer1 () TxtTimE．text = Time End SubA．EnabledB．VisibleC．IntervalD．Timer
考题
窗体上有一个名称为Shape1的形状控件和由三个命令按钮组成的名称为cmd Draw的控件数组。窗体外观如图所示(从上到下的3个命令按钮的下标值分别为0、1、2)。有事件过程如下： Private Sub cmdDraw Click(Index As Integer) Select Case Index Case 0 Shape1．Shape=0 Case 1 Shape1．Shape=1 Case 2 Shape1．Shape=3 End Select End Sub当单击“画圆”命令按钮时，会执行cmdDraw Click事件过程。以下叙述中正确的是（ ）。A.Case 2分支有错，此Case后面表达式的值应该与赋给Shape1．Shape的值一致B.程序运行有错，控件数组的下标应该从1开始C.Index是形状控件的参数D.程序正常运行，形状控件被显示为圆形
考题
（ 6 ）窗体如图所示，其中汽车是名称为 Image1 的图像框，命令按钮的名称为 Command1, 计时器的名称 为Timer1, 直线的名称为 Line1 。 程序运行时 ， 单击命令按钮 ， 则汽车每 0.1 秒向左移动 100 ， 车头到达左边的直线时停止移动。请填空完成下面的属性设置和程序，以便实现上述功能。1 Timer1 的 Interval 属性的值应事先设置为【 6 】2 Private Sub Command1_Click()Timer1.Enabled=TrueEnd SubPrivate Sub Timer1_Timer()If Image1.Left= 【 7 】 ThenImage1.Left= 【 8 】 -100End IfEnd Sub
考题
设窗体上有图片框Picture1和计时器Timer1两个控件，运行程序时，将图片加载到图片框中，然后图片框以每5秒钟一次的速度向窗体的右下方移动，每次向右、向下移动100。请补充程序中的空白处。
考题
窗体中有图片框（Picture1）和计时器（Timer1）两个控件，运行程序时，将图片加载到图片框中，然后图片框以每2秒钟一次的速度向窗体的右下角移动，每次向左、向右移动100单位。请在[ ]填空：
考题
在表单Form1中有一个矩形框形状的形状控件Shape1，而Form1的Init事件代码如下：FORIX=0TO99THISFORM.SHAPE1.CURVATURE=IXTHISFORM.SHAPE1.BACKCOLOR=RGB（2*IX+57，0，0）ENDFOR该表单运行后，形状控件Shape1的状态是（）。A、蓝色矩形B、红色矩形C、蓝色椭圆D、红色椭圆
考题
单选题窗体的左右两端各有一条直线，名称分别为Line1、Line2；名称为Shape1的圆靠在左边的Line1直线上，如下图所示；另有一个名称为Timer1的计时器控件，其Enable属性值是True。要求程序运行后，圆每秒向右移动100，当圆遇到Line2时则停止移动。为实现上述功能，某人把计时器的Interval属性设置为1000，并编写了如下程序：运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果下面修改方案中正确的是（ ）。A
把设计器的Interval属性设置为1B
把For k=Line1.X1 To Line2.X1 Step 100和Next k两行删除C
把Fork=Line1.X1 To Line2.X1 Step 100改为For k=Line2.X1 To Line1.X1 Step l00D
把If Shape1Left+Shape1.WidthLine2.X1 Then改为If Shape1.LeftLine2.X1 Then
考题
单选题在表单Form1中有一个矩形框形状的形状控件Shape1，而Form1的Init事件代码如下：FORIX=0TO99THISFORM.SHAPE1.CURVATURE=IXTHISFORM.SHAPE1.BACKCOLOR=RGB（2*IX+57，0，0）ENDFOR该表单运行后，形状控件Shape1的状态是（）。A
蓝色矩形B
红色矩形C
蓝色椭圆D
红色椭圆
考题
单选题窗体上有一个名称为Text1的文本框；一个名称为Timer1的计时器控件，其Interval属性值为5000，Enable属性值是True。Timer1的事件过程如下：以下叙述中正确的是（ ）。A
每次执行些事件过程时，flag的初始值为0B
flag的值只可能取0或1C
程序执行后，文本框的文字每5秒改变一次颜色D
程序有逻辑错误，Else分支总也不能被执行
考题
单选题窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器，并有下面的事件过程：程序运行时单击命令按钮，则产生的结果是（ ）。A
命令按钮每10秒向左移动一次B
命令按钮每10秒向右移动一次C
命令按钮每10毫秒向左移动一次D
命令按钮每10毫秒向右移动一次
热门标签
最新试卷
