网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
单选题
下述代码A和B正确的值是（） Dim X As String = "123" Dim Y As Integer = 123 Dim A As String = X + Y Dim B As String = X & Y
A
“246”，“123123”
B
246，“123123”
C
“123123”，“123123”
D
123123，“123123”
参考答案
参考解析
解析：
暂无解析
更多 “单选题下述代码A和B正确的值是（） Dim X As String = "123" Dim Y As Integer = 123 Dim A As String = X + Y Dim B As String = X YA “246”，“123123”B 246，“123123”C “123123”，“123123”D 123123，“123123”” 相关考题
考题
下面可以正确定义2个整形变量和1个字符串变量的语句的是（ ）。A．Dim n,m AS Interger,s AS StringB．Dim a%,b$,c AS StringC．Dim a AS Integer,b,c AS StringD．Dim x%,y AS Integer,z AS String
考题
下面可以正确定义两个整型变量和—个字符串变量的语句是______。A．Dim n,m As Integer,s As StringB．Dim a%,b$,c As StringC．Dim a As Integer,b,c As StringD．Dim x%,y As Integer,z As String
考题
（ 11 ）下面可以正确定义 2 个整形变量和 1 个字符串变量的语句的是（ ）A ） Dim n,m AS Interger,s AS StringB ） Dim a%,b$,c AS StringC ） Dim a AS Integer,b,c AS StringD ） Dim x%,y AS Integer,z AS String
考题
单击命令按钮时，下列程序代码的执行结果为( )。 Private Function FirProc(x As Integer,y As Integer,z As Integer) FirProc=2*x+y+3*z End Funcfion Private Function SecProc(x As Integer,y As Integer,z As Integer) SecProc=FirProc(z，x，y)+x End Funcfion Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Integer a=2 b=3 c=4 Printf SecProc(c,b,a) End SubA．21B．19C．17D．34
考题
有如下函数过程： Function fun1(ByVal x As Integer,ByVal y As Integer) As Integer Do While y＜＞0 reminder=x Mod y x=y y=reminder Loop fun1=x End Function 在下列按钮单击事件中调用该函数，则该程序的运行结果是( )。 Private Sub Command1_Click() Dim a AS Integer Dim b As Integer a=100 b=25 x=fun1(a,B) Print x End SubA．0B．25C．50D．100
考题
单击命令按钮时，下列程序代码的执行结果为______。 Private Sub Proe1 (n As Integer，ByVa1 m As Integer) n=n Mod 10 m=m\ 10 End Sub Private Sub Command1_Click() Dim x As Integer Dim y As Integer x= 12 y = 34 Call Proe1 (x, y) Print x; y End SubA． 12 34B．2 34C．2 3D．12 3
考题
设有如下程序： Private Sub Form. Click（ ） Dim i As Integer，x As String，y As String x="ABCDEFG" For i=4 To 1Step-1 y=Mid(X，i，i)+y Next i Print y End Sub 程序运行后，单击窗体，输出结果为（ ）。A.ABCCDEDEFGB.AABBCDEFGC.ABCDEFGD.AABBCCDDEEFFGG
考题
以下定义数组或给数组元素赋值的语句中，正确的是A．Dim x%(2) x(1)="等级考试"B．Dim x(3)， y(3)As Integer x(0)=1：y=xC．Dim x x=Array(0，1，2)D．Dim x(3)As Integer x=Array(0，1，2)
考题
Command1_Click()事件代码如下： Private Sub Command1_Click() Dim x As Integer, Y As Integer x = 6 : Y : 8 Call ABC(X, Y) Print X; Y End Sub Private Sub ABC(ByVal X As Integer，Y As Integer) X = X + 4 Y = Y = 2 End Sub 事件发生后，X和Y的值分别为 ______。A．6, 8B．10, 10C．10, 8D．6, 10
考题
有如下程序： Private Sub Commandl_Click( ) Dim i As Integer For i=1 To 2 DS Next i End Sub Sub DS( ) Dim x As Integer，m As String Static y，n X=X + 1 y=y + 1 m=m "*”：n=n"#" Print x，y，m，n End Sub 程序运行后，输出的结果是A．1 1 * #B．1 1 * #C．1 1 * # 1 1 * # 1 2 * #D．1 1 * # 1 1 * ## 1 2 * ##
考题
有以下函数过程： Function Gys (ByVal x As Integer， ByVal y As Integer) As Integer Do While y＜＞0 Reminder = x Mod y x = y y= Reminder Loop Gys=x End Function 以下是调用该函数的事件过程，该程序的运行结果是 Private Sub Command1_Click() Dim a As Integer Dim b As Integer a = 50 b = 10 x=Gys (a，B)Print x End SubA．0B．10C．50D．100
考题
有如下函数过程： Function funl(ByVal x As Integer,ByVal y As Integer)As Integer Do While y＜＞0 reminder=x Mod y x=y y=reminder Loop fun1=x End Function 在下列按钮单击事件中调用该函数，则该程序的运行结果是( )。 Private Sub Command1_Click() Dim a As Integer Dim b As Integer a=100 b=25 x=funl(a，B)Print x End SubA．0B．25C．50D．100
考题
在窗体上有一个命令按钮Commandl，编写事件代码如下：Private Sub Commandl Click（ ） Dim X As Integer，Y As Integer x=12：y=32 Call Proc(x，Y) Debug．Print X；Y End Sub Public Sub proc(n As Integer，ByVal in As Integer) n=n Mod 10 m=m Mod 1O End Sub 打开窗体运行后，单击命令按钮，立即窗口上输出的结果是（ ）。A.232B.123C.22D.1232
考题
有如下事件过程： Private Sub Commaild1_Click( ) Dim i As Integer For i =1 To 2 DC Next i End Sub Sub DC( ) Dim x As Integer，m As String Static y，n x=x + 1 y=y + 1 m=m"*"：n=n "#" Print x，y，m，n End Sub 程序运行后，输出的结果是A．1 1 * # 1 1 * #B．1 1 * # 1 2 * #C．1 1 * # 1 1 * ##D．1 1 * # 1 2 * ##
考题
编写如下事件过程： Private sub sub1 (ByVal x1 As String, y1 As String) Dim xt As String Dim i As Integer i = Len(x1) Do While i＞= 1 xt = xt + Mid(x1, i, 1) i=i-1 Loop y1 = xt End Sub Private Sub Form. Click() Dim s1 As String, s2 As String s1= "teacher" sub1 s1, s2 Print s2 End Sub 程序运行后，单击窗体，则窗体上显示的内容是A．rehcaetB．tahreeeC．themeeD．eerthea
考题
以下程序运行后，单击命令按钮，窗体显示的结果是 ______。 Private Function p1(x As Integer，y As Integel，z As Integer) p1=2*x+y+3*z End Function Private Function p2(x As Integer，y As Integer，z As Integer) p2=p1(2，y，x)+x End Function Private SubCommandl_Click() Dim a As Integer Dim b As Integer Dim c As Integer a=2:b=3:c=4 Print p2(c，b，A)End SubA．19B．21C．22D．23
考题
有如下函数:Private Function firstfunc(x As Integer, y As Integer) As Integer Dim n As Integer Do While n ＜= 4 x=x +y n=-+1 Loop firstfunc = x End Function调用该函数的事件过程如下:Private Sub Command1_lick() Dim x As Integer Dim y As Integer Dim n As Integer Dim z As Integer x=1 y=1 For n = 1 To 3 z = firstfunc(x, y) Next n Print z End Sub该事件过程的执行结果是 ______。A．1B．3C．16D．9
考题
阅读下面的程序； Function Func(x As Integer，y As Integer)As Integer Dim n As Integer Do While n ＜ = 4 x=x + y n = n + 1 Loop Func=x End Function Private Sub Command1_Click() Dim x As Integet, y As Integer Dim n As Integer，z As Integer x=1 y=1 For n = 1 To 6 z=Func(x，y) Next n Print z End Sub 程序运行后，单击命令按钮，输出的结果为．A．16B．21C．26D．31
考题
下列数组说明语句正确的是A．Dim g(0，-5)As SingleB．Dim h(100 To 100，100)As StringC．Dim x(5)As Integer ReDim x(10)As IntegerD．Dim y() ReDim y
考题
单击命令按钮时，下列程序的执行结果为 Private Sub Command1_Click Dim x As Integer, y As Integer x=12:y=32 Call Proc(x,y． Print x; y End Sub Public Sub Proc(n As Integer, ByVal m As Integer． n=n Mod 10 m=m Mod 10 End SubA.1232B.232C.23D.123
考题
下列各语句中,正确的是A) Dim x As Variant=Array(1, 2,3, 4. 5)B)Dim xo As Integer: x=Array (1, 2:3: 4.5)C)Dim x As ariant: x=Array(1: abc: 2,3. 41)D) Dim x As Integer: x=Arra (1, 2, 3+25)
考题
以下是某个窗体的模块代码，请分析单击窗体后程序运行至"*"号位置时变量X、Y和Z的值分别是【 】。DIM X AS INTEGERDIM Y AS INTEGERPRIVATE SUB FORM_CLICK()DIM X AS INTEGERX=1Y=1CALL AA(Y+1)Z=BB(X)'* * * * * * *MSGBOX "X="X"/Y="Y"/Z="ZEND SUBPRIVATE SUB AA(BYVAL Z AS INTEGER)Y=Z+XZ=X+YEND SUBPRIVATE FUNCTION BB(BYREF Y AS INTEGERY=Y+1BB=X+YEND FUNCTION
考题
下述代码A和B正确的值是（） Dim X As String = "123" Dim Y As Integer = 123 Dim A As String = X + Y Dim B As String = X YA“246”，“123123”B246，“123123”C“123123”，“123123”D123123，“123123”
考题
在VB中，使用变量前一般应对变量进行定义。以下变量定义语句错误的是（）。A、Dim x As IntegerB、Dim x As Integer，y As SingleC、Var x，y：IntegerD、Dim x As Integer，y As Integer
考题
下述代码A和B正确的值是（） Dim X As String = "123" Dim Y As Integer = 123 Dim A As String = X + Y Dim B As String = X YA、“246”，“123123”B、246，“123123”C、“123123”，“123123”D、123123，“123123”
考题
以下声明语句中错误的是（）。A、Const var1=123B、Dim var2=’ABC’C、Dim x_y_z%D、Static var3 As Integer
热门标签
最新试卷