当前位置:文档之家› VB试题3

VB试题3

〖第1题〗『判 断』(1.0分)
在VB中,可通过函数 Now返回计算机系统的日期和时间.
答案:N
〖第2题〗『判 断』(1.0分)
已知窗的fillcolor=rgb(255,0,0)红,forecolor=rgb(0,255,0)
绿,fillstyle=0(solid)语句circle(200,100),500,,,,2的输出
结果是红边绿心的长椭圆.
答案:N
〖第3题〗『判 断』(1.0分)
在VB中,可以将在Picture控件中绘制的图形以文件的形式保存
在磁盘上.
答案:Y
*** 7 ***〖第4题〗『判 断』(1.0分)
滚动条控件不可作为用户输入数据的方法.
答案:Y
〖第5题〗『判 断』(1.0分)
图象框中的Stretch 属性为 true 时,其作用是图形自动调整
大小以适应图象控件.
答案:Y
〖第6题〗『判 断』(1.0分)
同一Form窗体中的各控件可以相互重叠,其显示的上下层次的
次序不可以调整.
答案:N
*** 6 ***〖第7题〗『判 断』(1.0分)
直线控件可以在窗体上拖动,因此它具有MOVE方法.
答案:N
〖第8题〗『判 断』(1.0分)
多文档界面是指在一个父窗口下面可以同时打开多个子窗口.
子窗口归属于父窗口,当父窗口关闭时,所有子窗口全部关闭.
答案:Y
〖第9题〗『判 断』(1.0分)
单击并拖拽工具箱中所需的控件到窗体上即可完成添加控件任务.
答案:N
*** 10 ***〖第10题〗『判 断』(1.0分)
在框架控件上放置的控件可以移动到框架控件的外面.
答案:N
〖第1题〗『单项选择』(1.0分)
清除列表框的所有选项应选择下列哪种方法().
A:Clear
B:Cls
C:ClearItem
D:RemoveItem
答案:A

〖第2题〗『单项选择』(1.0分)
要改变控件的宽度,应修改该控件的()属性.
A:Top
B:Width
C:Left
D:Height
答案:B
〖第3题〗『单项选择』(1.0分)
下列()是窗体的扩展名.
A:frm
B:bas
C:cls
D:dll
答案:A
〖第4题〗『单项选择』(1.0分)
要在图片框P1中打印字符串"HowAreYou",应使用语句().
A:Picture1.Print="HowAreYou"
B:P1.Picture=LoadPicture("HowAreYou")
C:P1.Print"HowAreYou"
D:Print"HowAreYou"
答案:C
〖第5题〗『单项选择』(1.0分)
在窗体上建立了多个控件,如TEXT、LABEL1、COMMAND1,若要使程序
一运行焦点就定位在COMMAND1控件上,应将COMMAND1控件的()设
置为0.
A:INDEX
B:TABINDEX
C:TABSTOP
D:ENABLED
答案:B
〖第6题〗『单项选择』(1.0分)
重新定义图片框控件的坐标系统,可采用该图片框的()方法.
A:Scale
B:ScaleX
C:ScaleY
D:SetFocus
答案:A
〖第7题〗『单项选择』(1.0分)
将CommandDialog1通用对话框以打开对话框打开,可选以下()方法.
A:showopen
B:showcolor
C:showsave
D:showfont
答案:A
***14***〖第8题〗『单项选择』(1.0分)
在VB中过()属性来设置字体颜色.
A:FontColor
B:ForeColor
C:BackColor
D:ShowColor
答案:B
〖第9题〗『单项选择』(1.0分)
由For k=35 to 0 step 3:ne

xt k循环语句控制的循环次数是().
A:0
B:12
C:-11
D:-10
答案:A
〖第10题〗『单项选择』(1.0分)
InputBox函数返回的函数值的类型是().
A:数值
B:字符串
C:数值或字符串
D:根据需要可以是任何类型数据
答案:C
〖第11题〗『单项选择』(1.0分)
如果要在命令按钮上显示图形文件,应设置命令按钮的().
A:Style属性和Graphics属性
B:Style属性和Picture属性
C:Picture属性
D:Graphics属性
答案:B
〖第12题〗『单项选择』(1.0分)
以下叙述中错误的是().
A:双击鼠标可以触发DblClick事件
B:窗体或控件的事件的名称可以由编程人员确定
C:移动鼠标时,会触发MouseMove事件
D:控件的名称可以由编程人员设定
答案:B
〖第13题〗『单项选择』(1.0分)
不管一个对象的属性如何设置,程序运行时始终都能接收焦点的
方法是().
A:用Tab键
B:用鼠标
C:用方向键
D:不能实现
答案:D

〖第14题〗『单项选择』(1.0分)
引用列表框的最后一项应使用().
A:List1.List(List1.ListCount-1)
B:List1.List(List1.ListCount)
C:List1.List(ListCount)
D:List1.List(ListCount-1)
答案:A
〖第15题〗『单项选择』(1.0分)
下列方法中可用于列表框动态添加数据的是().
A:add
B:additem
C:addlist
D:removeitem
答案:B
〖第16题〗『单项选择』(1.0分)
\、/、Mod、*等4个算术运算符中,优先级最低的是().
A:B:/
C:Mod
D:*
答案:C
〖第17题〗『单项选择』(1.0分)
文本框控件中将Text的内容全部显示为所定义的字符的属性项是().
A:PasswordChar
B:需要编程来实现
C:Password
D:以上都不是
答案:A
〖第18题〗『单项选择』(1.0分)
为了把焦点移到某个指定的控件,所使用的方法是().
A:SetFocus
B:Visible
C:Refresh
D:GetFocus
答案:A
〖第19题〗『单项选择』(1.0分)
vb 程序设计中的窗体在oop 中称为().
A:屏幕
B:事件
C:对象
D:控件
答案:C
***17***〖第20题〗『单项选择』(1.0分)
要将一个组合框设置为简单组合框(SimpleCombo),则应将其Style
属性设置为().
A:0
B:1
C:2
D:3
答案:B
(9.0分)
'-------------------------------------------------------
'【程序填空】〖第1题〗『程序填空』
'-------------------------------------------------------
'题目:以下程序用于判断一个正整数(≥3)是否为素数。

'-------------------------------------------------------

Private Sub Form_Click()
n = InputBox("请输入一个正整数(≥3)")
k = Int(Sqr(n))
i = 2
swit = 0
'**********SPACE**********
While i <= k And 【?】
'**********SPACE**********
If 【?】 Then
swit = 1
Else
'**********SPACE**********
【?】
End If
Wend
If swit = 0 Then
Print n; "是一个素数"
Else
Print n; "不是素数"
End If
End Sub


答案:
1). swit = 0
2). n Mod i = 0 或 n/i ★= ★ n\i 或 n/i

★=★ int(n/i)
3). i = ★i ★+★ 1



〖〖第第22题题〗『〗『程序填空程序填空』』((99..00分分))

'-------------------------------------------------------
'【程序填空】
'-------------------------------------------------------

'题目:下面的事件过程判断文本框Text1中输入的数所在区间,
' 并在文本框Text2中输出判断结果


'请在【】处填入正确的内容

'-------------------------------------------------------

Private Sub Command1_Click()

Dim int1 As Integer
'**********SPACE**********
【?】 = Val(Text1.Text)
Select Case int1
Case 0
Text2.Text = "值为0"
'**********SPACE**********
Case 【?】
Text2.Text = "值在1和10之间(包括1和10)"
'**********SPACE**********
Case Is > 【?】
Text2.Text = "值大于10"
Case Else
Text2.Text = "值小于0"
End Select

End Sub


答案:
1). int1
2). 1 To 10
3). 10




〖〖第第11题题〗『〗『程序设计程序设计』』((66..00分分))
'-------------------------------------------------
'【程序设计】
'-------------------------------------------------

'题目:编写函数fun,函数的功能是:计算并输出给定
' 整数n的所有因子之和(不包括1与自身)。规定
' n的值不大于1000。
' 例如:n的值为855时,应输出704。

'-------------------------------------------------
'注意:请在指定的事件内编写代码。
'-------------------------------------------------
答案:
----------------------
Dim s, i As Integer

For i = 2 To n - 1
If n Mod i = 0 Then
s = s + i
End If
Next
Fun = s
----------------------


〖第2题〗『程序设计』(6.0分)

'-------------------------------------------------
'【程序设计】
'-------------------------------------------------

'题目:(事件)单击窗体。
' (响应)求出100~200之间,能被5整除,但不能被3
' 整除的数。并求所有数之和,存入变量中
' SUM中。

'-------------------------------------------------
'注意:请在指定的事件内编写代码。
'-------------------------------------------------
答案:
----------------------
Dim i As Integer


For i = 100 To 200
If ((i Mod 5) = 0) And ((i Mod 3) <> 0) Then
Print (CStr(i))
sum = sum + i
End If
Next
----------------------


〖第1题〗『窗体设计』(20.0分)

------------------------------------------------
【窗体设计】
------------------------------------------------
题目:请按照题目要求设计指定的窗体。
建立如(图1)所示界面:请按所给窗体的样子设计


窗体(不要求控件的尺寸一样,运行时得到所给
窗体即可,有时需要简单的事件过程)。
------------------------------------------------

1:在窗体内添加2个按钮(Command1,Command2),1个列表
框(List1),4个文本框(Text1,Text2,Text3,Text4),
6个标签(Label1,Label2,Label3,Label4,Label5,Label6)。
4个复选框(Check1,Check2,Check3,Check4),2个组合框(Combo1,Combo2)。

2:窗体设置:
设置窗体名称(Name)为"Form26"。
设置窗体标题(Caption)为"菜单编辑器"。

3:标签设置:
设置第1个标签(Label1)的标题(Caption)为"标题(&P):"。
设置第2个标签(Label2)的标题(Caption)为"名称(&M):"。
设置第3个标签(Label3)的标题(Caption)为"索引(&X):"。
设置第4个标签(Label4)的标题(Caption)为"帮助上下文 ID(&H):"。
设置第5个标签(Label5)的标题(Caption)为"快捷键(&S):"。
设置第6个标签(Label6)的标题(Caption)为"协调位置(&O):"。

4:文本框设置:
适当调整第1个文本框(Text1),第2个文本框(Text2)
和第3个文本框(Text3)的位置和大小。
设置第4个文本框(Text4)的文本(Text)为"0"。

5:列表框设置:
在列表框(List1)中输入文本(Text)"菜单列表"。

6:按钮设置:
设置第1个按钮(Command1)的标题(Caption)为"确定","Default"属性为真。
设置第2个按钮(Command2)的标题(Caption)为"取消","Cancel"属性为真。

7:复选框设置:
设置第1个复选框(Check1)的标题(Caption)为"复选(&C)"。
设置第2个复选框(Check2)的标题(Caption)为"有效(&E)"。
设置第3个复选框(Check3)的标题(Caption)为"可见(&V)"。
设置第4个复选框(Check4)的标题(Caption)为"显示窗口列表(&W)"。

8:组合框设置:
在第1个组合框(Combol1)中输入文本"Ctrl+A"。
在第2个组合框(Combol2)中输入文本"3 - Right"。


〖第2题〗『窗体设计』(20.0分)

------------------------------------------------
【窗体设计】
------------------------------------------------
题目:请按照题目要求设计指定的窗体。
建立如(图1)所示界面:请按所给窗体的样子设
计窗体,不要求控件的尺寸一样,运行时得到所
给窗体即可,有时需要简单的事件过程。要求
'退出'选项包含在'文件'菜单中,其余选项包含
在'选项'菜单中。
------------------------------------------------

1:在窗体内添加2个菜单(名称分别为menu_File,menu_Option),
然后在菜单(menu_File)下添加1个菜单(名称为menu_File_Exit)
在菜单(menu_Option)下添加6个菜单(名称分别为menu_Option_TestButton,
menu_Option_CheckBox,menu_Option_TextWarp,menu_Option_OptionButton,
menu_Option_TextBox,menu_Option_Image,)。

窗体内添加7个按钮(Command1,Command2,Command3,Command4,Command5,
Command6,Command7)。

2:窗体设置:
设置窗体名称(Name)为"Form21"。
设置窗体标题(Caption)为"控件示例"。

3:菜单设置:
设置菜单(menu_File)的标题(Caption)为"文件(&F)"。
设置菜单(menu_Option)的标题(Caption)为"选项(&O)"。
设置菜单(menu_Option)下的菜单(menu_Option_TestButton)的标题(Caption)为"测试按钮"。
设置菜单(menu_Option)下的菜单(menu_Option_CheckBox)的标题(Caption)为"复选框"。
设置菜单(menu_Option)下的菜单(menu_Option_TextWarp)的标题(Caption)为"文本换行"。
设置菜单(menu_Option)下的菜单(menu_Option_OptionButton)的标题(Caption)为"选项按钮...
设置菜单(menu_Option)下的菜单(menu_Option_TextBox)的标题(Caption)为"文本框"。
设置菜单(menu_Option)下的菜单(menu_Option_Image)的标题(Caption)为"图像"。

4:按钮设置:
设置按钮(Command1)的标题(Caption)为"测试按钮(&T)"。
设置按钮(Command2)的标题(Caption)为"复选框(&C)"。
设置按钮(Command3)的标题(Caption)为"文本换行(&W)"。
设置按钮(Command4)的标题(Caption)为"选项按钮(&P)"。
设置按钮(Command5)的标题(Caption)为"文本框(&E)"。
设置按钮(Command6)的标题(Caption)为"图像(&I)"。
设置按钮(Command7)的标题(Caption)为"退出(&X)"。


相关主题
相关文档 最新文档