A.
B.
C.
D.
[单选题]在窗体上画一个名称为Combo1的组合框,名称为Text1的文本框,以及名称为Command1的命令按钮,如图运行程序,单击命令按钮,将文本框中被选中
[单选题]在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程: Private Sub Command1_Click() n = Val(Text1.Text) If n/2 = n/2 Then f = f1(n) Else f = f2(n) End If Print f; n End Sub Public Function f1(ByRef x) x=x*x f1=x+x End Function Public Function f2(ByV
[单选题]在窗体上画一个名称为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 程序运行后
[单选题]在窗体上画一个名称为Text1的文本框,一个名称为Command1的命令按钮,然后编写如下事件过程和通用过程:Private Sub Command1_Click()n = Val(Text1.Text) If n/2 = n/2 Then f = f1(n)Else f = f2(n)End IfPrint f; nE.nd SubPublic Function f1(ByRef x)x=x*xf1=x+xE.nd FunctionPublic Function f2(
[单选题]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:程序运行后,如果单击命令按钮,则在文本框中显示的内容是
[单选题]在窗体上画1个命令按钮(名称为Command1)和1个文本框(名称为Text1),然后编写如下事件过程:Private Sub Command1_Click()x=Val(Text1.Text)Select Case xC.ase 1,3y=x*xC.ase Is>=10,Is<=-10y=xC.ase -10 To 10y=-xE.nd SelectE.nd Sub程序运行后,在文本框中输入3,然后单击命令按钮,则以下叙述中正确的是( )。A.执行y=x*xB.执行y=-xC.先执
[单选题]在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()D.im array1(10, 10) As IntegerD.im i As Integer, j As IntegerF.or i = 1 To 3F.or j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)E.nd Sub程
[单选题]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后输写如下程序:Private Sub Command1_Click()D.im x,y,z As Integerx=5y=7z=0Text1.Text=""C.all Fun1(x,y,z)Text1.Text=Str(z)E.nd SubSub Fun1(ByVal a As Integer, ByVal b As Integer, c As Integer)c=a+bE.nd Sub程序运行后,如果单击命令
[单选题]在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是A. VisualB.BasicC.ProgramD.出错
[单选题]在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,然后编写如下事件过程: Private Sub Command1_Click() n = Val(Text1.Text) For i = 2 To n For j = 2 To sqr(i) If i Mod j = 0 Then Exit For Next j If j > Sqr(i) Then Print i Next i End Sub 该事件过程的功能是A. 输出n以内的奇数B.输出n以内的偶数C.输出