网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为Text1)，然后编写如下事件过程：
Private Sub Command1_Click()
x＝Val(Text1.Text)
Select Case x
Case 1,3
y＝x*x
Case IS＞＝10,IS＜＝-10
y＝x
Case-10 To 10
y＝-x
End Select
End Sub
程序运行后，在文本框中输入3，然后单击命令按钮，则y的值变为______。
参考答案
更多 “ 在窗体上画一个命令按钮(名称为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的值变为______。 ” 相关考题
考题
（ 19 ）在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim i As Integer, n As IntegerFor i = 0 To 50i = i + 3n = n + 1If i 10 Then Exit ForNextText1.Text = Str(n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是A ） 5B ） 4C ） 3D ） 2
考题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() Dimarrayl(10，10)As Integer Dimi As Integer,j As Integer Fori=1 To 3 Forj=2 To 4 arrayl(i，j)=i+j Nextj Nexti Text1.Text=axvayA．15B．14C．13D．12
考题
（27）在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮，然后编写如下事件过程：Private Sub Command1_Click( )Dim i As Integer, n As IntegerFor i=0 To 50i=i+3n=n+1If i10 Then Exit ForNextText1.Text=Str(n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是（ ）。A）2B）3C）4D）5
考题
设有如下通用过程： Public Sub Fun(a()， ByVal x As Integer) For i=1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程： Private Sub Commandl Click() Dim arr(5) As Variant For i=1 To 5 arr(i) =i Next n = 10 Call Fun(arr()， n) Text1.Text=n End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是A．10B．15C．25D．24
考题
设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。A. 30B. 25C. 20D. 15
考题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是A． VisualB．BasicC．ProgramD．出错
考题
在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl)，然后编写如下事件过程：程序运行后，在文本框中输入3，然后单击命令按钮，则Y的值变为__________。
热门标签
最新试卷