网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:

Private Sub Command1_Click()

Dim x,y,z As Integer

x=5

y=7

z=0

Text1.Text=""

Call Fun1(x,y,z)

Text1.Text=Str(z)

End Sub

Sub Fun1(ByVal a As Integer, ByVal b As Integer, c As Integer)

c=a+b

End Sub

程序运行后,如果单击命令按钮,则在文本框中显示的内容是

A.0

B.12

C.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.没有显示 ” 相关考题
考题 在窗体上画一个名称为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.没有显示

考题 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编如下事件过程:Private Sub Command1_Click()Dim i As Integer, n As Integern=0For i=0 To 50i=i+3n=n+1If i>10 Then Exit ForNext iText1.Text=Str(n)End Sub程序运行后,单击命令按钮,在文本框中显示的值是______。

考题 在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为Text1),然后编写如下事件过程:Private Sub Command1_Click()x=Val(Text1.Text)Select Case xCase 1,3y=x*xCase IS>=10,IS<=-10y=xCase-10 To 10y=-xEnd SelectEnd Sub程序运行后,在文本框中输入3,然后单击命令按钮,则y的值变为______。

考题 在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在面体上显示的内容是( )。

考题 设有如下通用过程:在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如 下事件过程:End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是( )。A. 30B. 25C. 20D. 15

考题 在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:程序运行后,单击命令按钮,在文本框中显示的值是A.2B.3C.4D.5

考题 在窗体上画一个命令按钮,名称为Command1,然后编写如下程序:程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.B.HC.D.

考题 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是A. VisualB.BasicC.ProgramD.出错

考题 在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色)。当向文本框中输入任何字符时,命令按钮Command1变为可用。请在( )处填入适当的内容,将程序补充完整。