向VB大神求救
A、BASIC B、C语言 C、Word D、JAVA
2、 下列各种基本数据类型说明符中表示单精度型的是（ ）
A、 Integer B、String C、 Single D、Boolean
3、 下列各项中，合法的变量名是（ ）
A、3Set B、 abc=9 C、Integer D、 Good
4、 有两个条件P 、Q，只有二者都为真时，结果才为真的是（ ）。
A、Not P B、P And Q C、P OR Q D、NOT P AND NOT Q
5、 在VB中，表达式（16+35\4）Mod 4 的值是（ ）。
A、0 B、1 C、2 D、3
6、在VB语言中，下列数据中合法的整型数是( )。
A、123.85 B、456 C、58723 D、1.23456789E+08
7、在VB语言中，下列表达式中合法的表达式是( )。
A、pi*2*r B、bct÷7 C、a+b*≤23 D、α*β*π
8、下列能正确表示“X，Y，Z全是偶数”的逻辑表达式是（ ）
A、 (X+Y+Z) Mod 2=0
B、(X+Y+Z) Mod 2=1
C、X Mod 2=0 Or Y Mod 2=0 Or Z Mod 2=0
D、X Mod 2=0 And Y Mod 2=0 And Z Mod 2=0
9、下列程序段运行后，变量R的值是（ ）
A、100 B、90 C、80 D、70
10、下列程序段是计算（ ）公式的：
Private Sub Command1_Click( )
S = 0
T = 0
K = 1
Do
T = T + K
S = S + T
K = K + 1
Loop Until K > 10
End Sub
A、S=1+2+3＋……10 B、S=1*2*3*……10
C、S=∑1+∑2+∑3+……∑10 D、S=1!+2!+3! +……10!
二、多选题：（每小题4分，共20分。部分选对2分）
1、程序设计语言有几千种，它们可以分为三大类，它们是（ ）
A、自然语言 B、高级语言 C、汇编语言 D、机器语言
2、算法的描述可以有多种方法，下列哪些方法可以描述“求100以内所有质数”的算法（ ）
A、自然语言 B、机器语言 C、伪代码 D、流程图
3、下列各组字符，可以用做变量名的有（ ）：
A、P&G B、VeryGood C、True D、Yes
4、下列表达式的值为True的有（ ）
A、Asc(“A”)=65 B、”1234”>”21” C、33+22<66 D、10 Mod 2=0
5、程序的基本结构有三种，它们是（ ）
A、顺序结构 B、分支结构 C、循环结构 D、并行结构
三、判断题：（每小题3分，共15分）
1、 机器语言是能够被计算机直接接受和执行的计算机语言。（ ）
2、一个算法至少有一个输入。（ ）
3、 程序实际上是一组操作指令或语句的序列。（ ）
4、算法是对具体程序功能的解释说明。（ ）
5、Const st as integer=12.345 是一个正确的VB语句。（ ）
四、根据程序写出运行结果（10分）
1、运行如下程序段时，在输入框中依次输入10、19、27、33、46、-54、0，写出运行结果。
五、根据题意和程序，将程序中缺漏的部分补全（10分）
1、某游泳馆的票价：个人票40元/张；团体标（20张以上）35元/张，团购票（100张以上）30元/张。为计算收费金额，小张编写了售票程序如下，请将缺漏的部分补全。
六、编写程序（15分）
1、杨柳同学2012年植树节种了2棵树，他计划每年种树，而且每年比上一年多种1倍，坚持到至少亲自种够100棵。请编写程序，计算一下，到哪一年可以完成计划。 展开
1、下列不是用于程序设计的是（ C ）灶颂
A、BASIC B、C语言 C、Word D、JAVA
2、 下列各种基本数据类型说明符中表示单精度型的是（ C ）
A、 Integer B、String C、 Single D、Boolean
3、 下列各项中，合法的变量名是（ D ）
A、3Set B、 abc=9 C、Integer D、 Good
4、 有两个条件P 、Q，只有二者都为真时，结果才为真的是（ B ）。
A、Not P B、P And Q C、P OR Q D、NOT P AND NOT Q
5、 在VB中，表达式（16+35\4）Mod 4 的值是（ A ）。
A、0 B、1 C、2 核哪 D、3
6、在VB语言中，下列数据中合法的整型数是( B )。
A、123.85 B、456 C、58723 D、1.23456789E+08
7、在VB语言中，下列表达式中合法的表达式是( A )。
A、pi*2*r B、bct÷7 C、a+b*≤23 D、α*β*π
8、下列能正确表示“X，Y，Z全是偶数”的逻辑表达式是（ D ）
A、 (X+Y+Z) Mod 2=0
B、(X+Y+Z) Mod 2=1
C、X Mod 2=0 Or Y Mod 2=0 Or Z Mod 2=0
D、X Mod 2=0 And Y Mod 2=0 And Z Mod 2=0
9、下列程序段运行后，变量R的值是（ 看不到程序段 ）
A、100 B、90 C、80 D、70
10、下列程序段是计算（ C ）公式的：
Private Sub Command1_Click( )
S = 0
T = 0
K = 1
Do
T = T + K
S = S + T
K = K + 1
Loop Until K > 10
End Sub
A、S=1+2+3＋……10 B、S=1*2*3*……10
C、S=∑1+∑2+∑3+……∑10 D、S=1!+2!+3! +……10!
二、多选题：（每小题4分，共20分。部分选对2分）
1、程序设计语言有几千种，它们可以分为三大类，它们是（ BCD ）
A、自然语言 B、高级语言 C、汇编语言 D、机器语言
2、算法的描述可以有多种方法，下列哪些方法可以描述“求100以内所有质数”的算法（ AD ）
A、自然语言 B、机器语言 C、伪代码 D、流程图
3、下列各组字符，可以用做变量名的有（ BD ）：
A、P&G B、VeryGood C、True D、Yes
4、下列表达式的值为True的有（ ACD ）
A、Asc(“A”)=65 B、”1234”>”21” C、33+22<66 D、10 Mod 2=0
5、程序的基本结构有三种，它们是（ ABC ）
A、顺序结构 B、分支结构 C、循环结构 D、并行结构
三、判断题：（每小题3分，共15分）
1、 机器语言隐氏郑是能够被计算机直接接受和执行的计算机语言。（ T ）
2、一个算法至少有一个输入。（ F ）
3、 程序实际上是一组操作指令或语句的序列。（ T ）
4、算法是对具体程序功能的解释说明。（ F ）
5、Const st as integer=12.345 是一个正确的VB语句。（ F ）
四、根据程序写出运行结果（10分）
1、运行如下程序段时，在输入框中依次输入10、19、27、33、46、-54、0，写出运行结果。
*******************看不到程序段*****************
五、根据题意和程序，将程序中缺漏的部分补全（10分）
1、某游泳馆的票价：个人票40元/张；团体标（20张以上）35元/张，团购票（100张以上）30元/张。为计算收费金额，小张编写了售票程序如下，请将缺漏的部分补全。
*******************看不到程序段*****************
六、编写程序（15分）
1、杨柳同学2012年植树节种了2棵树，他计划每年种树，而且每年比上一年多种1倍，坚持到至少亲自种够100棵。请编写程序，计算一下，到哪一年可以完成计划。
Private Sub Form_Click()
Dim x As Integer
Dim i As Integer
Dim y As Integer
y = 2
x = 2
For i = 1 To 10
x = 2 * x
y = y + x
If y >= 100 Then Exit For
Next
If y >= 100 Then MsgBox "到" & 2012 + i & "年，杨柳同学种树达到了100棵。" & vbCrLf & "（按照计划他这一年应种" & x & "棵，实际会达到" & y & "棵)"
End Sub
有什么问题请留言。
二、cd bd bd cd acd
三、√ √ √ × ×
1、C
2、C
3、D
4、B
5、A
6、B
7、A
8、D
9、此题未给出程序代码
10、C
二、
1、BCD
2、BCD
3、BD
4、ACD
5、ABC
三、
1、举漏正确
2、错误
3、正确
4、正升宽确
5、错误
四
1、未给出序代码
五、
1、未给出程序代码
六、
1. 杨柳同学2012年植树节种了2棵树，他计划每年种树，而且每年比上一年多种1倍，坚
持到至少亲自正笑烂种够100棵。请编写程序，计算到哪一年可以完成计划。
按题意2^7=128，也就是说最长年限是7年，据此编程如下
T=2
S=2
FOR I=2012 TO 2012+7
S=S*2
T=T+S
IF t>=100 THEN
PRINT "到" & I & "年就可以完成计划,共种树" & T & "棵"
EXIT FOR
END IF
NEXT I
