命令？YEAR（{^2009-12-25}）的运行结果是（）。

[单选题]（ 12 ）命令？ VARTYPE （ TIME （））结果是A． ） CB． ） DC． ） TD． ）出错

[单选题]（25）下列程序的运行结果是 。 Private Function myfun(m,n) Do While m>n Do While m>n:m=m-n:Loop Do While n>m:n=n-m:Loop Loop myfun=m End Function Private Sub Command1_Click() Print myfun(9,8) End SubA.2 B.1 C.4 D.3

[单选题]试题25若有定义语句：int year=2009,*p=&year; , 以下不能使变量year 中的值增至2010的语句是（）A．*p+=1;B．(*p)++;C．++(*p);D．*p++;

[单选题]下面程序运行后,单击命令按钮,输出的结果是Private Sub Command1_Click()D．im a%(1 To 4) , b%(2 To 6) , i%, str1#, str2#F．or i=1 To 4a(i)=iNextF．or i=2 To 6b(i)=iNextstr1=YAG(a)str2=YAG(b)Print "str1="; str1; "str2="; str2E．nd SubF．unction YAG(a() As Integer)D．im t#, i%

[主观题]下面运行程序后，单击命令按钮，输出的结果是______。Private Sub Commandl_clck()D．im a%(1 To 4)，b%(3 To 6)，i%，s1，s2F．ori=1 To 4a(i)=iNextiF．or i=3 To 6b(i)=iNextis1=YAS(a)S2=YAS(b)Printt"s1="；S1"S2="；s2E．nd Sub

[单选题]下面程序运行后，单击命令按钮，输出的结果是 Pivate Sub Cornmand1_Click() Dim a%(1 To 4)，b%(2 To 6)，i%，str1#，str2# For i=1 To 4 a(i)=i Next For i=2 To 6 b(i)=i Next str1=YAG(a) str2=YAG(b) Print"str1=";str1;"str2=";str2 End Sub Function YAG(a()As Integer) Dim t#,i% t=1

[单选题]下面程序运行后，单击命令按钮，输出的结果是 Private Sub Command1_Click( ) Dim a%(1 To 4) , b%(2 To 6) , i%, str1#, str2# For i = 1 To 4 a(i) =i Next For i = 2 To 6 b(i) =i Next str 1 = YAG (A)str 2 = YAG (B)Print "str1 ="; str1; "str2 ="; str2 End Sub Function YAG(a()

[单选题]以下程序运行后，单击命令按钮，窗体显示的结果是 ______。 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

[单选题]命令?VARTYPE(TIME())的结果是A．CB．DC．TD．出错

[单选题]命令？VARTYPE（TIME（））的结果是（　　）。A.CB.DC.TD.出错