网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
在窗体上有一个命令按钮Command1,编写如下程序: Private Sub Command1_Click() Print pp1(3, 7) End Sub Public Function pp1(x As Single, n As Integer) As Single If n = 0 Then pp1= 1 Else If n Mod 2 = 1 Then pp1 =x*x+n Else pp1 =x*x-n End If End If End Function 程序运行后,单击该命令按钮,屏幕上显示的是( )。
A.2
B.1
C.0
D.16
参考答案
更多 “ 在窗体上有一个命令按钮Command1,编写如下程序: Private Sub Command1_Click() Print pp1(3, 7) End Sub Public Function pp1(x As Single, n As Integer) As Single If n = 0 Then pp1= 1 Else If n Mod 2 = 1 Then pp1 =x*x+n Else pp1 =x*x-n End If End If End Function 程序运行后,单击该命令按钮,屏幕上显示的是( )。A.2B.1C.0D.16 ” 相关考题
考题
在窗体上画一个命令按钮Command1,然后编写如下程序:Private Sub Command1_Cliek()Dim arr()As IntegerRe Dim arr(3)For i=0 To 3arr(i)=iNext ix=InputBox("请输入一个数字:")IfVal(x)>4 ThenRc Dim arr(4)arr(4)=xEnd IfMe.Print(arr(4)-arr(3))End Sub程序运行后,单击命令按钮,在输入对话框中输入12,输出结果为【 】。
考题
新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击该按钮,Form1窗体消失,显示Form2窗体,程序如下:Private Sub Command1_Click()【6】Form2. 【7】End Sub试补充完整。
考题
在窗体上有一个命令按钮Command1,编写事件代码如下:Private Sub Command1_Click()Dim a(10),P(3) As Integerk=5For i=1 To 10For i=1 To 3For i=1 To 3End Sub打开窗体运行后,单击命令按钮,消息框中输出的结果是( )。
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:Private Sub Commandl_Click( )Static X As IntegerStatic Y As IntegerClsY=1Y=Y+5X=5+XPrint X, YEnd Sub程序运行时,3次单击命令按钮Command1后,窗体上显示的结果为【 】。
考题
在窗体上有一个名称为Command1的命令按钮,并有如下程序:程序执行时,单击命令按钮Command1三次后,窗体上显示的结果为( )。A. 5 16B. 5 6C. 15 15D. 15 6
考题
在窗体上画一个名为Command1的命令按钮,编写如下程序:程序运行后,单击命令按钮,输出的结果是_________。
热门标签
最新试卷