下面程序：Private Sub Form_Click()Dim x，y，z As Integerx＝5y＝7z＝0Call P1(x，y，z)Print Str(z)End SubSub P1(ByVal a As Integer, ByVal b As Integer, c As integer)c＝a＋bEnd Sub运行后的输出结果为A．0B．12C．Str(z)D．显示错误信息

下面程序：

Private Sub Form_Click()

Dim x，y，z As Integer

x＝5

y＝7

z＝0

Call P1(x，y，z)

Print Str(z)

End Sub

Sub P1(ByVal a As Integer, ByVal b As Integer, c As integer)

c＝a＋b

End Sub

运行后的输出结果为

A．0

B．12

C．Str(z)

D．显示错误信息

相关考题：

下面程序的运行结果为【 】。x+-2.3y=125z=Len (Str＄(x)+Str＄(y))Print 2
查看答案
下面程序： Private Sub Form. _Click () Dim x, y, z As Integer x=5 y=7 z=0 Call P1(x, y, z) Print Str (z) End Sub Sub P1 (ByVal a As Integer, ByVal b As Integer , c As Integer) c= a+b End Sub 运行后的输出结果为______。A．0B．12C．Str(z)D．显示错误信息
查看答案
下面程序的运行结果为【 】。x＝-2．3y=125z=Len(Str$(x)＋Str$(y))Print Z
查看答案
在窗体上画一个名称为Command1 的命令按钮和一个名称为Text1的文本框，然后编写如下程序： Private Sub Command1_Click( ) Dim x,y,z As Integer x=5 y=7 z=0 Texttext = " " Call P1 (x,y,z) TextText = Str(z) End Sub Sub P1(ByVal a As Integer,ByVal b As Integer,c As Integer) c=a+b End Sub 程序运行后，如果单击命令按钮，在文本框中显示的内容是 ______。A．0B．12C．Str(z)D．没有显示
查看答案
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下程序： Private Sub Command1 Click() Dim x， y， z As Integer x = 5 y = 7 z = 0 Text1.Text = " " Call P1(x， y， z) Text1.Text=Str(z) End Sub Sub Pl(ByVal a As Integer， ByVal b As Integer， c As Integer) c = a + b End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的内容是A．0B．12C．Str(z)D．没有显示
查看答案
下面程序： Private Sub Form_Click() Dim x,y,z As Integer x=5 y=7 z=0 CallPI(x,y,z) Print Str(z) End Sub SubP1(By Val a As Integer, By Val b As Integer, c As Integer) C=a+b End Sub 运行后的输出结果为______。A．0B．12C．Str(z)D．显示错误信息
查看答案
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:Private Sub Command1_Click()Dim x,y,z As Integerx=5y=7z=0Text1.Text=""Call Fun1(x,y,z)Text1.Text=Str(z)End SubSub Fun1(ByVal a As Integer, ByVal b As Integer, c As Integer)c=a+bEnd Sub程序运行后,如果单击命令按钮,则在文本框中显示的内容是A．0B．12C．Str(z)D．没有显示
查看答案
下面程序： Private Sub Form_Click() Dim x，y，z As Integer x=5 y=7 z=0 Call P1(x，y，z) Print Str(z) End Sub Sub P1(ByVal a As Integer，ByVal b As Integer,c As Integer) c=a+b End Sub 运行后的输出结果为 ______。A．0B．12C．Sb(z)D．显示错误信息
查看答案
下面程序：Private Sub Form_Click()Dim x,y,z As Integerx=5y=7z=0Call P1(x,y,z)Print Str(z)End SubSub P1(By Val a As Integer, By Val b As Integer, c As Integer)c=a+bEnd Sub运行后的输出结果为______。A．0B．12C．Str(2)D．显示错误信息
查看答案
热门标签