网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
如下图所示的两个窗体:
要使其中第一个窗体中的第一个命令按钮来控制显示第二个窗体,第二个命令按钮用来结束程序的运行(两个按钮名称为Command1和Command2)。则以下选项中,对这两个命令按钮编写的事件过程正确的是
A.Private Sub Command1 Click() Form2.Show 1 End Sub Private Sub Command2_Click()End End Sub
B.Private Sub Command1_Click() Show 1 End Sub Private Sub Conunand2_Click() End End Sub
C.Private Sub Conmmand1_Click() Show 1 End Sub Private Sub Command2_Click() End End Sub
D.Private Sub Command1_Click()Show 1, Form2 End SubPrivate Sub Command2_Click() End End Sub
参考答案
更多 “ 如下图所示的两个窗体:要使其中第一个窗体中的第一个命令按钮来控制显示第二个窗体,第二个命令按钮用来结束程序的运行(两个按钮名称为Command1和Command2)。则以下选项中,对这两个命令按钮编写的事件过程正确的是A.Private Sub Command1 Click() Form2.Show 1 End Sub Private Sub Command2_Click()End End SubB.Private Sub Command1_Click() Show 1 End Sub Private Sub Conunand2_Click() End End SubC.Private Sub Conmmand1_Click() Show 1 End Sub Private Sub Command2_Click() End End SubD.Private Sub Command1_Click()Show 1, Form2 End SubPrivate Sub Command2_Click() End End Sub ” 相关考题
考题
工程中有2个窗体,名称分别为Form1.Form2,Form1为启动窗体,该窗体上有命令按钮Command1,要求程序运行后单击该命令按钮时显示Form2,则按钮的Click事件过程应该是( )。A.Private Sub Command1_Click( )Form2.ShowEnd SubB.Private Sub Command1_Click( )Form2.VisibleEnd SubC.Private Sub Command1_Click( )Load Form2End SubD.Private Sub Command1_Click( )Form2.LoadEnd Sub
考题
在窗体上画1一个名称为Command1的命令按钮,并编写以下程序Private Sub Command1_Click()Print fun(“ABCDEFG”)End SubFunction fun(st As String) As Stringstlen=Len(st)temp=””For kfun=tempEnd Function程序运行时,单击命令按钮,则窗体上显示的是( )。A.ABCDEFGB.AGBFCEC.GFEDCBAD.AGBFCED
考题
窗体上添加有3个命令按钮,分别命名为Command1、Command2和Command3。编写 Command1的单击事件过程,完成的功能为:当单击按钮Command1时,按钮Command2 可用,按钮Command3不可见d以下正确的是________。A.Private Sub Command1_Click() Command2.Visible=True Command3.Visible=False End SubB.Private Sub Command1_Click() Command2.Enabled=True Command3.Enabled=False End SubC.Private Sub Command1_Click() Command2.Enabled=True Command3.Visible=False End SubD.Private Sub Command1_Click() Command2.Visible=True Command3.Enabled=False End Sub
考题
工程中有两个窗体,名称分别为Form1、Form2,Fonn1为启动窗体,该窗体上有命令按钮 Command1。要求程序运行后单击该命令按钮时显示Form2,则按钮Click事件过程应该是 ______。A.Private Sub Command1_click() Foma2.Show End SubB.Private Sub Command1_Click() Form2.Visible End SubC.Private Sub Command1_Click() Load Form2 End SubD.Private Sub Command1_click() Form.Load EndSub
考题
在窗件上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a=12345 Print Format S(a, "000. 00") End Sub 程序运行后,单击命令按钮,窗体上显示的是______。A.123.45B.12345.00C.12345D.00123.45
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Sum=0 For x=1 To 5 Call subl(x, s) Sum=Sum+s Next x Print Sum End Sub Private Sub subl(y, w) w=1 For i=1 To y w=w*i Next i End Sub 程序运行后。单击命令按钮,则窗体上显示的内容是______。A.5B.120C.153D.160
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub subl(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x*x+y*y End Sub Private Sub Command1_Click() Dim a As Integer a=8 Call subl(1, 2,a) Print a End Sub 程序运行后,单击命令按钮,则窗体下显示的内容是______。A.8B.2C.5D.11
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是______。A.VVVB.VisC.sicD.11
考题
在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1,然后编写如下代码:Private sub Command1_Click() Text1.text="AB"End SubPrivate Sub Command2_Click() Text1.Text="CD"End Sub 首先单击Command1按钮,然后再单击Command2按钮,在文本框中显示 。A.AB B.CD C.ABCD D.CDAB
考题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:Private Sub f(ByVal x As Integer)x=x+4End SubPrivate Sub Command1_Click()i=3Call f(i)If i>4 Then i=i*2End Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
考题
窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击事件的事件过程是( )。A.Private Sub Form1 Click( )End Sub···B.Private Sub Form1. Click( )End Sub···C.Private Sub Command1 click( )End Sub···D.Private Sub Command Click( )End Sub···
考题
在窗体上画一今名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim a As Integer,s As Integer a=8 s=1 Do s=s+a a=a-1 Loop While a<=0 Print s;a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是 ______。A.79B.340C.97D.死循环
考题
在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1,然后编写如下代码: Private Sub Command1 Click() Text1.Text="AB" End Sub Private Sub Command2 Click() Text1.Text="CD" End Sub 首先单击Command1按钮,然后再单击Command2按钮,在文本框中显示A.ABB.CDC.ABCDD.CDAB
考题
窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是A.Private Sub Forml_Click() … End SubB.Private Sub Form_Click() … End SubC.Private Sub Commandl_Click() … End SubD.Private Sub Command_Click() … End Sub
考题
窗体上添加有3个命令按钮,分别命名为Command1、Command2和Command3,编写Command1的单击事件过程,完成的功能为:当单击按钮Command1时,按钮 Command2可用,按钮Command3不可见。以下事件过程中正确的是( )。A.Private Sub Command 1 Click() Command2.Visible=True Command3.Visible=False End SubB.Private Sub Command1 Click() Command2.Enabled=True Command3.Visible=False End SubC.Private Sub Command1_Click() Command2.Enabled=True Command3.Visible=False End SubD.Private Sub Command1 Click() Command2.Visible=True Command3.Enabled=False End Sub
考题
在窗体上绘制一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Function fun(ByVal m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_Click() Dim i As Integer,s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后,单击命令按钮,在窗体上显示的是A.6B.7C.8D.9
考题
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()Dim a()a=Array("机床","车床","钻床","轴承")Print a(2)End Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承
考题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是A. 123.45B.12345.00C.12345D.00123.45
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click() Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print s End Sub 程序运行后,单击命令按钮,在窗体上显示的是A. 11B.10C.9D.8
考题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Public x As Integer Private Sub Command1_Click() x=10 Call s1 Call s2 MsgBox x End Sub Private Sub sl() x=x+20 End Sub Private Sub s2() Dim x As Integer x=x+20 End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。A.10B.30C.40D.50
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub sub1(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) z=x * x+ y * y End Sub Private Sub Command1_Click() Dim a As Integer a = 8 Call sub1(1, 2,A)Print a End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是A.8B.2C.5D.11
考题
在窗体中添加了一个文本框和一个命令按钮(名称分别为Text1和Command1),并编写了相应的事件过程。运行此窗体后,在文本框中输入一个字符,则命令按钮上的标题变为“Access模拟”。以下能实现上述操作的事件过程是( )。A.Private Sub Command1_Click() Caption="Access模拟" End SubB.Private Sub Text1_Click() Command1.Caption="Access模拟" End SubC.Private Sub Command1_Change() Caption="Access模拟" End SubD.Private Sub Text1_Change() Command1.Caption="Access模拟" End Sub
考题
在窗体中添加名称为Command1和名称为Command2的命令按钮以及文本框Text1,然后编写如下代码: Private Sub Command1_Click( ) Text1.Text="AB" End Sub Private Sub Command2_Cliek( ) Text1.Text="CD" End Sub 首先单击Command1按钮,然后再单击Command2按钮,在文本框中显示A.ABB.CDC.ABEDD.CDAB
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程: Private Function fun(ByVal m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_Click( ) Dim i As Integer,s As Integer S=0 For i=1 To 5 s=s+fun(i) Next Print 3 End Sub 程序运行后,单击命令按钮,在窗体上显示的是A.6B.7C.8D.9
考题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Private Sub Command1_Click()a = 12345Print Format$(a, "000.00")End Sub程序运行后,单击命令按钮,窗体上显示的是( )。A.123.45B.12345.00C.12345D.00123.45
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()x = -5If Sgn(x) Then y = Sgn(x ^ 2)Else y = Sgn(x)End IfPrint yEnd Sub程序运行后,单击命令按钮,窗体上显示的是( )。A.-5B.25C.1D.-1
考题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n=1 To 20 If n Mod 3<>Then m=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是 ______。A.15B.18C.21D.24
热门标签
最新试卷