单项选择题

窗体上有1个名称为Command1的命令按钮，事件过程如下：
Private Sub Command1_Click()
Dim x%, y%, z%
x = InputBox( "请输入第1个整数" )
y = InputBox( "请输入第2个整数" )
Do Until x =y
If x＞y Then x=x-y Else y=y-x
Loop
Print x
End Sub
运行程序，单击命令按钮，并输入2个整数169和39，则在窗体上显示的内容为( )。

A) 11
B) 13
C) 23
D) 39
<上一题 目录 下一题>
热门 试题

问答题
考生文件夹中有一个工程文件sjt4. vbp。该程序的功能是：程序运行时，向文本框控件数组Text1(有5个文本框)中任意输入5个数，单击名称为Command1的命令按钮，则找出其中最小数并在标签lblResult中显示。给出的窗体文件中已经有了全部控件，但程序不完整，其中函数FindMin的作用是返回两个数中的较小数。要求：去掉程序中的注释符，把程序中的改为正确的内容。 注意：不能修改程序的其他部分和控件属性，最后将修改后的文件按原文件名进行存盘。
问答题
在名称为Form1的窗体上添加一个名称为Label1、标题为“滚动条控件”的标签，一个名称为HScroll1的水平滚动条。请通过属性窗口设置属性使水平滚动条取值范围的最大值为100，最小值为1，滚动条的高度为300，宽度为3000，滚动块的初始位置为20。程序运行后的窗体如图所示。 注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt1. vbp，窗体文件名保存为sjt1. frm。
相关试题