vb温习题文档格式.docx

1、（A）1234 （B）12334 （C）123 （D）15722数学式Sin450对应的vb表达式是 。（A）Sin（45*180） （B）Sin（45） （C）Sin450 （D）Sin（450）24数学关系 3x10表示正确的VB表达式是 。（A）3=x10 （B） 3=x And x=3 Or x10 （D） 3=x And y Then Print xy（B） If x Then t=t*x（C） If x Mod 3=2 Then Print x（D） If xy,x,y） （B） Ifxy then MAX=X ELSE MAX=Y（C） MAX=XIF Y=X THEN MAX=

2、Y（D） IF Y=X THEN MAX=Y MAX=X1.设有以下循环结构： Do 循环体Loop While 那么以下表达中错误的选项是 （A）若“条件”是一个为0的常数，那么一次也不执行循环体；（B）“条件”能够是关系表达式、逻辑表达式，但不能够是常数；（C）循环体中能够利用Exit Do语句；（D）若是“条件“老是为True，那么不断地执行循环体。2.单击命令按钮，执行以下程序后，在文本框中显示的值是 Private Sub Command1_Click（）Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1 if i10 Th

3、en Exit For Next i Textl =str（n）（A） 2 （B） 3 （C） 4 （D） 5（A）i=5 （B） i=1Do Doi=i+1 i=i+2Loop Until i= 0 And a + c b + 3 Or Not d的值是 。28表达式12 3的值为 。7. 假设利用输入对话框输入姓名，并要求提示信息为请输入姓名：，题目为输入姓名和把输入的姓名寄存到字符串变量str中，那么利用的赋值语句为 。1. 下面事件进程的功能是：输入三个整数x、y和z，按从大到小顺序输出这三个数，在横线上填上适当内容。Private Sub Command1_Click（）Dim x!

4、, y!, z!x = InputBox（x=）y = InputBox（y=z = InputBox（z=If （1） Then t = x: x = y: y = tIf （2） Then t = x: x = z: z = tIf y=4Print sEnd sub3执行下面程序，在窗体上的输出结果为 （3） 。 Option Explicit Private Sub Form_Click（） Dim i As Integer,j As Integer j=10 For i=1 To j Step 2 j=j-i Next i Print i,j4.执行下面程序，在窗体上的输出结果为 （

5、4） 。Private Sub Commandl_Click（） a=1 b=aDo until a=5 x=a*b Print str（a） & “*” & str（b） & “=”;str（x） a=a+b b=b+aloop1数组的下界默许是 。2假设要改变更态数组的大小同时保留数组原有的值，应利用的关键字是 。3用来取得数组w第二维的上界的函数是 。4Label1（3）是控件数组Label1的第 个元素。5在运行时成立控件数组通过 方式为数组添加元素。6要使列表框控件显示一列选项，当显示不下时自动添加水平转动条，应将其Columns属性设置为 。7假设列表框的ListCount属性值为

6、6，那么List属性的下标范围是 。8假设对列表框能用Ctrl键加单击来选择多个不持续的选项，那么其MultiSelect属性应设置为 。9假设列表框的ListCount属性值为5，那么用AddItem方式为其添加选项时，第2个参数Index的值可为 。10假设列表框的ListCount属性值为5，那么用RemoveItem方式删除其中的选项时，参数Index的值可为 。12单击命令按钮Command1，以下程序的运行结果是 。 Dim a（1 To 10） As Integer For i = 1 To 10 a（i） = i * 2 - 1 Print Print a（a（a（3）18假设

7、要计算数组的累加和，将以下程序填充完整。 （1） Dim a Dim sum%, i%, j% a = Array（1, 2, 3, 4, 5, 6, 7） For i = 1 To （2） sum = （3） Print 数组的累加和为：; sum1. 图片框内可使PictureBox依照图片调整大小的属性为 ；图像框为 ，假设使Image控件可依照图片调整大小，该属性值应为 。2. 执行 语句，能够清除Picturel图片框内的图片。3. 转动条响应的重要事件有 和Change，转动条产生Change事件是因为其值变了。4. 若是要每隔15s产生一个计时器事件，那么Interval属性应设置为 。 函数将返回系统的时刻。19. 假设要设置水平或垂直转动条的最小值，需利用 属性。20. 计时器每通过一个由InterVal属性指定的时刻距离就会触发一次 事件。1在窗体上放置1个文本框Text1和1个标签Label1，编写如下代码：Function fun（s As Integer） For i = 1 To s Sum = Sum + i Next i fun = SumEnd Function = Str（fun（10）Private Sub Text1_Chang