( 28 ) 标准 模块中有如下程序代码:
Public x As Integer,y As Integer
Sub var_pub()
x=10:y=20
End Sub
在窗体上有 1 个命令按钮,并有如下事件过程:
Private Sub Command1_Click()
Dim x As Integer
Call var_pub
x=x+100
y=y+100
Print x;y
End Sub
运行程序后单击命令按钮,窗体上显示的是
A ) 100 100
B ) 100 120
C ) 110 100
D ) 110 120
第1题:
标准模块中有如下程序代码: Public x As Integer,y As Integer Sub var pub( ) x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如事件过程: Private Sub Command1 Click( ) Dim x As Integer Call var pub x=x+100 y=y+100 Print x;y End Sub 运行程序后单击命令按钮,窗体上显示的是( )。
A.100 100
B.100 120
C.110 100
D.110 120
第2题:
有如下类的定义。空格处的语句是class MyClass{ ______ int x, y;public: MyClass(int a=0, int b=0) { x=a; y=b; } static void change() { x-=10; y-=10; }};
A.static
B.const
C.private
D.不需要填入内容
第3题:
11、下面哪些定义是类型正确的?
A.f :: (Integer, Integer) -> Float f (x,y) = x / y
B.f :: (Integer, Integer) -> Float f (x,y) = (fromInteger x) / (fromInteger y)
C.f :: (Integer, Integer) -> Float f (x,y) = 3*x + y
D.f :: (Integer, Integer) -> Integer f (x, y) = 3*x + y
第4题:
有如下类的定义。那么空格处的语句是( )。 class MyClass { ____________int x,y; public: MyClass(int x1=0,int y1=0) { x=x1; y=y1; } static void change() { x+=10; y+=10; } };
A.static
B.const
C.private
D.不需要填入内容
第5题:
程序代码如下, 在消息框中显示的消息内容为()。 Dim m%, n%, x%, y%, k% m = 100 : n = 10 : x = 10 : y = 100 k = IIf (m <= n, x, y ) MsgBox(k)
A.100
B.10
C.20
D.90