珉玉mín yù

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() m=1:n=1 Print"m="; m; ", n="; n Call subl((m), n) Print "m="; "; ", n="; n End Sub Private Sub subl(x, y) x=x+5 y=y+x Print "x="; x;", y="; y End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。

A．m=1, b=1 x=6, y=7 m=1, b=1

B．m=1, b=1 x=6, y=7 m=6, b=7

C．m=1, b=1 x=6, y=7 m=1, b=7

D．m=1, b=1 x=6, y=7 m=6, b=1

此题为判断题(对，错)。

有如下事件过程：

Private Sub Command1_Click（）

Dim m As Integer, n As Integer

m=2: n=1

Print "m="; m; "n="; n

Call TOD（m, n）

Print "m="; m; "n="; n

End Sub

Sub TOD（x, y）

x=x ^ 2

y=y ^ 3

End Sub

程序运行后，输出的结果为（ ）。

A．m＝2，n＝1

m＝1，n＝2

B．m＝2，n＝1

m＝4，n＝1

C．m＝1，n＝2

m＝1，n＝4

D．m＝1，n＝2

m＝2，n＝4

A.T,L,Y,N,C

B.D,L,Y,N,C

C.D,L,M,N,C

D.T,L,M,N,C

【程序】

SET TALK OFF

CLEAR

INPUT“N=”TO N

INPUT“M=”TO M

X=MIN(N，M)

FOR I＝X TO 1 STEP -1

IF M/I＝INT(M/I)AND N/I=INT(N/I)

Y1=I

EXIT

ENDIF

ENDFOR

?“Y1=”+ALLTRIM(STR(Y1，19))+“，Y2＝”+ALLTRIM(STR(M，N)/Y1，19))

SET TALK ON

若输入N、M的值分别为6，8，则Y1的输出结果为 ______。

A．0

B．1

C．2

D．3

有如下事件过程： Private Sub Command1_Click( ) Dim m AS Integer，n AS Integer m=2：n=1 Print "m="；m；"n="；n Call TOD(m，n) Print "m="；m；"n="；n End Sub Sub TOD(x，y) x=x^2 y=y^3 End Sub 程序运行后，输出的结果为

A．m=2，n=1 m=1，n=2

B．m=2，n=1 m=4，n=1

C．m=1，n=2 m=1，n=4

D．m=1，n=2 m=2，n=4

在Visual FoxPro中，有如下几个内存变量赋值语句： X＝{^2001-07—28 10:15:20 PM} Y＝.T. M＝$123.45 N＝123.45 Z＝"123.45" 执行上述赋值语句之后，内存变量X、Y、M、N、Z的数据类型分别是______。

A．D、L、Y、N、C

B．D、L、M、N、C

C．T、L、M、N、C

D．T、L、Y、N、C

在Visual FoxPro中，有下列内存变量赋值语句： X={＾2001-07-28 10:15:20 PM} Y=.F. M=＄123.45 N=123.45 Z="123.24" 执行上述赋值语句之后， 内存变量X、Y、M、N和Z的数据类型分别是( )。

A．D、L、Y、N、C

B．T、L、Y、N、C

C．T、L、M、N、C

D．T、L、Y、N、S

以下程序的执行结果是 ______。

include＜iostream.h＞

int &max(int &x，int &y)

{

return(x＞y? x：y)；

}

void main()

{

int n=2,m=10；

max(n，m)--；

cout＜＜"n="＜＜n＜＜"，m="＜＜m＜＜endl；

}