下面程序运行后,单击命令按钮,输出的结果是( )。
Private Sub Command1_Click( )
Dim a%(1 To 4),b%(2 To 6),i%,str1#, str2#
For i=1 To 4
a(i)=1
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
For i=LBound(A) To UBound(A)
t=t*a(i)
Next
YAG=t
End Function

A:str1=24 str2=720 B:str1=12 str2=360 C:str1=24 D:str2=180 E:str1=36 str2=720

定义变量如下:
Dim Str_x
Str_x="祝你成功!"
若在立即窗口中显示Str_x的值,下面正确的是______。

A:Debug. Print Str_x B:PictureBox. Print Str_x C:Printer. Print Str_x D:Print Str_x

下面程序运行后,单击命令按钮,输出的结果是
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
Fu

下列程序的运行结果为
#include<stdio.h>
void abc(char * str)
int a,b;
for(a=b=0;str[a]!=’/0’;a++)
if(str[a]!=’c’)
str[b++]=str[a];
str[b]=’/0’;
void main( )
char str[]="abcdef";
abc(str);
printf("str[]=%s",str);

A:str[]=abdef B:str[]=abcdef C:str[]=a D:str[]=ab

下面程序运行后,单击命令按钮,输出的结果是
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
F

下列程序的运行结果为
#include<stdio.h>
void abc(char*str)
int a,b;
for(a=b=0;str[a]!=’/0’;a++)
if(str[a]!=’c’)
str[b++]=str[a];
str[b]=’/0’;
void main( )
char str[]="abcdef";
abc(str);
printf("str[])=%s",str);

A:str[]=abdef B:str[]=abcdef C:str[]=a D:str[]=ab

下面程序运行后,单击命令按钮,输出的结果是 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( )As Integer) Dim t#,i% t=1 For i=LBound(a)TO UBound(a) t=t * a(i) Next YAG=t End Function

A:str1=24 str2=720 B:str1=12 str2=360 C:str1=24 str2=180 D:str1=36 str2=720

下面程序运行后,单击命令按钮,输出的结果是 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   For i=LBound(a)To UBound(a)   t=t*a(i)   Next   YAG=t End Function

A:str1=24 str2=720 B:str1=12 str2=360 C:str1=24 str2=180 D:str1=36 str2=720

定义变量如下: Dim Str_x Str_x="祝你成功!" 若在立即窗口中显示Str_x的值,下面正确的是______。

A:Debu Print Str_x B:PictureBo Print Str_x C:Printe Print Str_x D:Print Str_x

微信扫码获取答案解析
下载APP查看答案解析