单项选择题
窗体上有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。
点击查看答案
相关试题
在考生文件夹中有一个工程文件sjt5. vbp...
在名称为Form1的窗体上添加一个名称为Shap...