（25）在窗体上有一个命令按钮Commandl，编写下列程序： Private Sub Command1_Click() Print ppl(3,7) End Sub Public Funcion ppl(x As Single,n As Integer)As Single If n=0 Then ppl=1 Else If n Mod 2=1 Then ppl=x*x+n Else ppl=x*x-n End If End If End Funcion 程序运行后，单击该命令按钮，屏幕上显示的是 A.2
题目
（25）在窗体上有一个命令按钮Commandl，编写下列程序： Private Sub Command1_Click() Print ppl(3,7) End Sub Public Funcion ppl(x As Single,n As Integer)As Single If n=0 Then ppl=1 Else If n Mod 2=1 Then ppl=x*x+n Else ppl=x*x-n End If End If End Funcion 程序运行后，单击该命令按钮，屏幕上显示的是 A.2 B.1 C.0 D.16
相似考题
参考答案和解析
【解析】本题比较简单，只要根据程序的执行条件和顺序就可以运算出该程序的最后输出结果。程序运算过程是：If n＝0 Then→else if n Mod 2=1 Then pp1=x*x+n=16。
更多“(25)在窗体上有一个命令按钮Commandl,编写下列程序: Private Sub Command1_Click() Print ppl(3, ”相关问题
-
第1题：
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a$="VisualBasic" Print String(3，a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是
A．VVV
B．Vis
C．sic
D．11
正确答案：A
解析：本题考查字符串函数。 String返回n个字符。如果为字符串，则返回n个字符串的首字符。据此，本题的正确答案为A，即返回3个“Visual Basic”的首字母“V”。 -
第2题：
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： PrivateSubCommandl_CnCk() aS="VisualBasic"， Print String(3,a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是( )。
A．VVV
B．Vis
C．sic
D．11
正确答案：A
-
第3题：
在窗体中添加一个命令按钮，名称为Commandl，然后编写如下程序：
窗体打开运行后，单击命令按钮，则消息框的输出结果为__________。
正确答案：
2500【解析】本题考查循环的知识。这个问题比较简单，实际上就是求l到100之间的奇数和，最终结果为2500。 -
第4题：
在窗体上放置一个命令按钮Commandl，并编写其单击事件的程序，如下：
程序运行后，单击命令按钮，则在窗体上输出的内容为（ ）。
A．10
B．12
C．16
D．20
正确答案：B
【解析】程序首先使用Array函数为x数组变量赋值，然后利用For循环和If结构语句实现程序功能。程序执行过程如下：①当i--1时，x(i)=2；d=d-c＝-6；②当i--2时，x(i)=4：d＝d-c=-12；③当i＝3时，x(i)=6：d=d-c=18；④当i=4时，X(i)8;d=d+X(i)=-10；c=8；⑤当i=5时，x(i)=10；d=d十x(i)-O；c=10；⑥当i=6时，x(i)=12；d=d+x(i)=12；c=12。 -
第5题：
3在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： PrivateSubCommand1_Click() Static X As Integer Static Y As Integer Cls Y=1 Y=Y+5 X=5+X PrintX,Y EndSub 程序运行时，3次单击命令按钮Commandl后，窗体上显示的结果为( )。
A．15 16
B．156
C．15 15
D．56
正确答案：B