网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
在窗体中添加一个名称为Command1命令按钮和一个名称为text1的文本框,然后编写如下程序:
PrivateSubCommand1_Click()
Dimx,y,zAsInteger
x=5:y=7:z=0
Text1.Text=""
Callp1(x,y,z)
Text1.Text=Str(z)
EndSub
Subp1(ByValaAsInteger,ByValbAsInteger,cAsInteger)
c=a+b
EndSub
程序运行后,如果单击命令按钮,文本框中显示的是( )
A、0
B.12
C.Str(z)
D.没有显示
参考答案
更多 “ 在窗体中添加一个名称为Command1命令按钮和一个名称为text1的文本框,然后编写如下程序:PrivateSubCommand1_Click()Dimx,y,zAsIntegerx=5:y=7:z=0Text1.Text=""Callp1(x,y,z)Text1.Text=Str(z)EndSubSubp1(ByValaAsInteger,ByValbAsInteger,cAsInteger)c=a+bEndSub程序运行后,如果单击命令按钮,文本框中显示的是( )A、0B.12C.Str(z)D.没有显示 ” 相关考题
考题
在窗体中添加一个命令按钮,名称为Command1,两个文本框名称分别为Text1、Text2,然后编写如下程序: Private Sub Command1_Click() a=Text1.Text b=Text2.Text c=LCase (A)d=UCase (B)Print c;d End Sub程序运行后,在文本框Text1、Text2中分别输入AbC和Efg,结果是______ 。A.abcEFGB.abcefgC.ABCefgD.ABCEFG
考题
在窗体中添加一个命令按钮(名称为Command1)和一个文本框(名为text1),然后编写如下事件过程: Private Sub Command_Click() Dim x As Integer, y As Integer,z As Integer x=5: y=7: z=0 Me!Text1="" Call p1(x, y, z) Me!Textl=z End Sub Sub p1 (a As Integer, b As Integer, Byval c As Integer) c=a+b End Sub 打开窗体运行后,单击命令按钮,文本框中显示的内容是( )。A.12B.0C.5D.7
考题
在窗体中添加名称为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
考题
在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a(10,10)As IntegerDim i,j As IntegerFor i=2 To 4For j=3 To 6Next iText1.Text=a(2,3)+a(4,6)End Sub程序运行后,单击命令按钮,在文本框中显示的值是( )。
考题
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码: Private Sub Command1_Click() m=2.17 n=Len(Str$(m)+Space(5)) Me!Text1=n End Sub 打开窗体运行后,单击命令按钮,在文本框中显示______。A.5B.8C.9D.10
考题
在窗体中添加名称为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
考题
在窗体上画一个命令按钮(名称为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的值变为______。
考题
在窗体上面显示一个名称为Text1的文本框和一个名称为Command1的命令按钮,编写如下事件过程: Private Sub Command1_Click() Text1.Text="Visual" ME.Text1="Basic" Text1="Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是______。A.VisualB.BasicC.ProgramD.出错
考题
在窗体中添加一个命令按钮,名称为Command1;添加一个文本框,名称为Text1,然后编写如下程序: Private Sub Commandl Click() Dim a(5), b(5) For j = 1 To 4 a(j) = 3 ( j b(j) = a(j) ( 3 Next j Text1.Text = b(j\2) End Sub 程序运行后,单击命令按钮,在文本框中显示A.25B.18C.36D.35
考题
设有如下通用过程:在窗体上画一个名称为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.出错
考题
在窗体中添加名称为Command1和名称为Command2的命令按钮测验文本框Text1,然后编写如下代码:PrivateSubCommand1_Click()Text1.Text="AB"EndSubPrivateSubCommand2_Click()Text1.Text="CD"EndSub首先单击Command2按钮,然后再单击Command1按钮,在文本框中显示( )A、ABB.CDC.ABCDD.CDAB
考题
在窗体中添加名称为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;添加一个文本框,名称为Textl,然后编写如下程序: Private Sub Command1_Click( ) Dima(5),b(5) Forj:1 T04 s(j)=3*j b(j)=a(j)*3 Next j Textl.Text=b(j\2) End Sub 程序运行后,单击命令按钮,在文本框中显示A.25B.18C.36D.35
考题
在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮,编写如下事件过程: Private Sub Command1_Click() Text1.Text=“计算机” Me.Text1=“等级” Text1=“考试” End Sub 程序运行后.如果单击命令按钮,则在文本框中显示的是A.计算机B.等级C.考试D.出错
考题
在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色)。当向文本框中输入任何字符时,命令按钮Command1变为可用。请在( )处填入适当的内容,将程序补充完整。
考题
在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl),然后编写如下事件过程:程序运行后,在文本框中输入3,然后单击命令按钮,则Y的值变为__________。
考题
( 32 ) 在窗体上添加一个命令按钮 ( 名为 Command1 ) 和一个文本框 ( 名为 Text1 ) , 并在命令按钮中编写如下事件代码:Private Sub Command1_Click( )m=2.17n=Len(Str$(m)+Space(5))Me!Text1 =nEnd Sub打开窗体运行后,单击命令按钮,在文本框中显示A ) 5B ) 8C ) 9D ) 10
热门标签
最新试卷