D. <a name='vbpos (31)在Ⅴ SCript中,注释采用() A.∥B./*C.D.” (32)若要求 VBScript的变量在使用前必须事先定义,则应使用()语句来设置 A Option Explicit B. Option Base C Dim D ReDim (33)可用于计算一个表达式的值的函数是() A Fix B Eval C. ValO D Roundo (34)若要将 txtdata变量所保存的数据中的单引号替换为双引号,则实现的语句为() Replace( txtdata,”,)B. txtdata= Replace( txtdata”,”) Replace(txtdata, , )D. txtdata=Replace( txtdata, chr(34)) (35)函数Insr(“ xPPppXXpx”,"pp)的返回值为() B.5 C.2 D.4 (36)若要获得一周后的日期,可使用()函数来实现 A. DateAddo B Date Diff( C Date D Now (37)以下语句用法中,正确的是() A Dim A=10 C Dim a If A>10 Do while A<10 End lf S=S+A A=A+1 B Dim As EndDO S=S+A D Dim A, s Next A=1 S=S+a Loop while A<10 (38)退出Do循环,应使用的语句是()。 A. Exit B. Exit Sub C. Exit For D. exit do (39)退出函数过程,应使用的语句是()。 Exit B Exit Sub CExit Function D BreakC．<a name=vbpos> D．<a name=”vbpos”></a> (31)在 VBScript 中，注释采用( ) A. // B. /*…*/ C. ’ D.” (32)若要求 VBScript 的变量在使用前必须事先定义，则应使用( )语句来设置. A. Option Explicit B. Option Base C. Dim D. ReDim (33)可用于计算一个表达式的值的函数是( ) A. Fix() B. Eval() C. Val() D. Round() (34)若要将 txtdata 变量所保存的数据中的单引号替换为双引号，则实现的语句为( ) Replace(txtdata,””,””) B.txtdata =Replace(txtdata,””,”””) Replace(txtdata,””,”””)D.txtdata=Replace(txtdata,””,chr(34)) (35)函数 Instr(“xxPPppXXpx”,”pp”)的返回值为( ) A. 3 B. 5 C. 2 D. 4 (36) 若要获得一周后的日期，可使用（）函数来实现。 A. DateAdd() B. DateDiff() C. Date() D. Now (37) 以下语句用法中，正确的是（）。 A.Dim A=10 If A>10 A++ End If B. Dim A,S For A=1 To 10 S=S+A Next C. Dim A A=1 Do While A<10 S=S+A A=A+1 EndDO D. Dim A ,S A=1 Do S=S+a A=A=a Loop While A<10 (38) 退出 Do 循环，应使用的语句是（）。 A..Exit B. Exit Sub C. Exit For D. Exit Do (39) 退出函数过程，应使用的语句是（）。 Exit B. Exit Sub C.Exit Function D.Break