因为刚开始学VB ，所以编程就学了一点，就学了点基础，从没做过关于VB的题，求点试题做做。

—、选择题
1．函数Mid（“123456789”，3，4）的值是¬¬¬¬¬¬¬¬¬（ ）。
A） "3456 " B） "456 " C）3456 D）456
2．下面变量名不合法的是（ ）。
A）a2(2，4) B）abcd C）a$x D）CdE
3．下列表达式中，正确的Visual Basic表达式是（ ）。
A）2sin45° B）π*R2 C）x÷y×5 D）（x+1）/（x^2+1）/2
4．下面逻辑表达式的值为真的是（ ）。
A） "A "> "a " B） "9 "> "a " C） "That "> "Thank " D)12> 12.1
5．执行“PRINT 18/2*3，-3^2”命令后，屏幕显示情况为（ ）。
A）3 9 B）3 -9
C）27 -9 D）27，-9
6．执行“PRINT 9.4\3.7，9.4MOD3.7”命令后屏幕显示为（ ）。
A）2 1 B）3 0
C）2 20 D）1 2
7．下面程序输出的结果是（ ）。
X=2^ -2
Print X
End
A）-4 B）0.25 C）4 D）程序错误
8．运行下面的程序后，Z的结果是（ ）。
X = -36.7
Y = 4
Z = INT(X) MOD Y
Print Z
End
A）0 B）1 C）-1 D）-9
9．在Visual Basic中，字符串常量所使用的定界符是（ ）。
A）双引号 B）单引号 C）方括号 D）花括号
10．窗体里有两个对象，分别是图片框Picture1和标签Label1。那么下面关于Print方法的使用中，错误的一条（ ）。
A）Picture1.print 147 B）Print 147
C）Printer.Print 147 D）Label1.Print 147
11．执行下面程序的输出结果是（ ）。
a = -3 ^ 2
b = 2 ^ 3
Print a> b
A）True B）-1 C）0 D）False
12．阅读下面的程序：
n1 = InputBox（ "请输入第一个数： "）
n2 = InputBox（ "请输入第二个数： "）
Print n1+n2
当输入分别为111和222时，程序输出为（ ）。
A）111222 B）222 C）333 D）程序出错
13．语句Print“25*40”输出的结果是（ ）。
A）“25*40” B）出现错误信息 C）25*40 D）1000
14．对于语句IF X=0 THEN Y=10，说法正确的是（ ）。
A）语句中有两个等于符号
B）语句中有两个赋值符号
C）语句中第一个是等于符号，第二个是赋值符号
D）语句中第一个是赋值符号，第二个是等于符号
15．执行下面的4个打印语句，将出错的是（ ）。
A）PRINT a=3+5 B）PRINT“a=”；3+5
C）PRINT“a=3+5” D）PRINT a=；3+5
16．可以用来设置窗体最小化时所显示的图表的属性是（ ）。
A）MinButton B）MaxButton C）ControlBox D）Icon
17．将命令按钮的（ ）属性设置为True后，就可以按回车键触发其Click事件。
A）Cancel B）OK C）Enabled D）Default
18．下面关于文本框的说法中，错误的说法是（ ）。
A）Text1.Caption=“Hello”，是将在文本框Text1中显示的Hello
B）Text.locked=True，设置该文本框Text1不能编辑
C）Text.passwordChar=“#”，设置文本框Text1输入的字符都显示为#，但实际接收的还是输入的内容
D）Text1.Visible=False，设置该文本框Text1为不可见
19．有如下程序，运行时从键盘输入字符“-”，输出结果是 （ ）。
Op$ = InputBox(“op=”)
If op$ = “+” Then a = a + 2
If op$ = “-“ Then a = a – 2
Print a
A) -2 B）0 C）+2 D）+0
20．设a=1、b=2、c=3、d=4，则表达式IIf（a A）4 B）3 C）2 D）1
21．定义有5个整数型元素的数组，正确的语句是（ ）。
A）Dim a(4)As Integer B）Option Base 1: Dim a(5)
C）Dim a&(5) D）Dime a(5)As Integer
22．下面的4个数组说明语句语法正确的是（ ）。
A）Dim a[10] B）Def fn(10) C）Dim a(10) D）Dimension a(10)
23．以下对Visual Basic的Sub过程的有关描述中，正确的是（ ）。
A）调用子过程时，只能把实参的值传送给形参，形参的值不能传送给实参
B）子过程既可以嵌套定义，又可以递归调用
C）子过程没有返回值
D）具有调用关系的所有过程必须放在同一个模块中
24．在窗体上画一个文本框，然后编写如下事件过程：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim char as String
Char=Chr (KeyAscii)
KeyAscii=Asc(UCase (char))
Text1.Text=String (5,KeyAscii)
End Sub
程序运行后，如果在键盘上输入字母“e”，则文本框中显示的内容为（ ）。
A）eeeee B)EEEEE C）eeeeee D）EEEEEE
25．在用Open语句打开文件时，如果省略“For方式”，则打开的文件的存取方式是（ ）。
A）顺序输入方式 B）顺序输出方式 C）随机存取方式 D）二进制方式
26．假定有一个菜单项，名为MenuItem，为了在运行时使该菜单项失效（变灰），应使用的语句为（ ）。
A）MenuItem.Enabled=False B）MenuItem.Enabled=True
C）MenuItem.Visible=True D）MenuItem.Visible=False
27．在Visual Basic中要设置菜单项的快捷访问键，应使用的符号是（ ）。
A）* B）@ C）& D）$

这个，要不我给你出点基本题？主要就是做一些入门的程序，在练习中成长：
1、做个定时开关机程序、要求界面基本美观、友好，具有倒计时关机或重启功能
2、做个小型的财政软件（只有收入、支出、总计三个基本属性），具备输入、统计、导出为文件功能，使用access数据库（这个题目主要是联系数据库操作）
先这两个吧，有问题可以去我网站找资料或留言
www.windyland.com