产生a,b(a,b 都是整数且a<b)范围内某一随机整数的VB 表达式是(  )

A．Int(Rnd ∗ a)+b	B．Int(Rnd ∗ b)+a
C．Int(Rnd ∗(b-a+1))+a	D．Int(Rnd ∗(b-a))+a

小杨在上信息技术课时，为了计算100以内所有能被7整除的数之和，画了如下图所示流程图，则空白处应该填写的赋值语句是：（   ）

A．i ←i+7

B．i ← i*7

C．i ← 7

D．i ← S+7

计算下列表达式的值
(1).156\10 mod 7的值是_________________
(2).12+5^2 MOD 23*3\72/2^3+1值为_________________
(3).如果变量a=2,b=3,c=4,d=5，表达式NOT a>b AND NOT d<>c的值是_________________
(4).如果变量 a=7、b=6、c=4、d=5，则表达式 a<d OR b>c AND c<>d 的值为_________________

下面是一段关于计算变量S的算法，下列能正确描述S的算式是（  ）
①变量S的初值是0，变量T的初值是1，循环变量A的初值为1；
②循环变量A从1循环到100，且步长为2，做第③步中的2个语句；
③ T="-T:" S=S+A*T
④输出变量S的值

A．1+3+5+7…+100	B．1+3+5+7…+99
C．1-3+5-7…-99	D．-1+3-5+7…+99

使用 VB 编写一个数字逆序功能的程序，在文本框 Text1 中输入若干整数，相互之间用逗号隔开，单击“开始逆序”按钮，在文本框 Text2 中输出逆序后的数字序列。程序运行界面如图所示，请改正划线处的错误语句使程序能正确运行。

Private sub Command1_click()
Dim s1 As String, s2 As String, t As String, ch As String
Dim i As Integer
s1 = Text1.Text
i = Len(s1)
t = "": s2 = "" Do While i > 0
ch = Mid(s1, i, 1)
If ch >= "0" And ch <= "9" Then
t = ch + t
Else
s2 = s2 + t +，  改正________
t = "" End If
i = i + 1 改正________
Loop
s2 = s2 + t
Text2.Text = s2
End sub