主观题

在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command1 Click() Text1.Text = InputBox("请输入数据1") Text2.Text = InputBox("请输入数据2) End Sub 程序运行后,如果单击命令按钮,将先后显示两个输入对话框,在两个输入对话框中分

查看答案
该试题由用户630****93提供 查看答案人数:24461 如遇到问题请 联系客服
正确答案
该试题由用户630****93提供 查看答案人数:24462 如遇到问题请联系客服

相关试题

换一换
单选题
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:当向文本框Text1中输入小写字母a时,文本框Text2中显示的是()
A.A B.a C.C D.c
答案
单选题
在窗体上画两个名称分别为Text1、Text2的文本框,Text1的Text属性为“DatBase”,如下图所示。现有如下事件过程:运行程序,在文本框Text1中原有字符之前输入a,Text2中显示的是()
A.DataA B.DataB C.aData D.aBase
答案
单选题
( 19 )在窗体上画两个文本框(名称分别为 text1 和 text2 )和一个命令按钮(名称为 command1 ) , 然后编写如下事件过程:
A.Private B.Sub C.Command1_ D.Click()x = 0 E.Do F.While x x = (x + 2) * (x + 3)n = n + 1 G.Text = H.Text = I.Str(x) J.End K.Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为 L.A ) 1 和 0 M.B ) 2 和 72 N.C) 3 和 50 O.D ) 4 和 168
答案
单选题
在窗体上画两个名称分别为Text1、Text2的文本框。Text1的Text属性为“Database”, 如图所示。现有如下事件过程: Private Sub Text1_Change()Text2.Text=Mid(Text1,1,1)End Sub运行程序,在文本框Text1中原有字符之前输入a,Text2中显示的是:()。
A.DataA B.DataB C.aData D.aBase
答案
单选题
在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮(名称为Command1),外观如图所示。
A.4 B.6 C.8 D.12
答案
单选题
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:Private Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer)Dim c As Stringc=UCase(Chr(KeyCode))Text2.Text=Chr(Ase(c)+2)End Sub当向文本框Text1中输入小写字母a时,文本框Text2
A.A B.a C.C D.c
答案
单选题
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyDown事件过程如下: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Dim s As String s=Chr(KeyCode+35) Text2.Text=s End Sub 当向文本框Text1中输入小写字母a时,文本框Text2中显示的是
A.A B.a C.D D.d
答案
主观题
在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程: Private Sub Command1_Click() Text1.Text = "计算机" Text2.Text = Text1.Text Text1.Text = "等级考试" End Sub 程序运行后,单击命令按钮,两个文本框(Text1和Text2)内容分别为 (6) 和 (7) 。
答案
主观题
在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程: Private Sub Coraraand1_Click() Text1.Text="计算机" Text2.Text=Text1.Text Text1.Text="等级考试" End Sub 程序运行后,单击命令按钮,两个文本框(Text1和Text2)内容分别为 和 。
答案
主观题
在窗体上画两个文本框,名字分别为Text1和Text2,然后编写下列程序。程序运行后,如果在文本框 Text2中输入lmn,那么在文本框Text1中显示的内容将是 【8】 。 Private Sub Form_Load() Show Text1.Text=" " Text2.Text=" " Text2.SetFocus End Sub Private Sub Text2_KeyPress(Key
答案
热门试题
在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程: Private Sub Command1_Click()Text1.Text="计算机"Text2.Text=Text1.TextText1.Text="等级考试" End Sub 程序运行后,单击命令按钮,两个文本框(Text1和Text2)中的内容分别为 【6】 和 【7】 。 在窗体上画一个文本框,其名称为Text1。为了在程序运行后Text1中的文本不可编辑,应当使用的语句是______。 在窗体(Name 属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: Private Sub Commnd1_Click() a=Text1.Text+Text2.Text Print a End Sub Private Sub Form_ Load ()Text1 Text=“”Text2 Text=“” End sub程序运行后,在第一个文本框(Text1)和第二个文本框(text2)中分别输入123和321,然后单击命令按钮,则输出结果为______ 。 窗体上有一个由两个文本框组成的控件数组,名称为Text1,并有如下事件过程: Private Sub Text1_Change(Index As Integer) Select Case Index Case 0 Text1 (1). FontSize = Text1 (0). FontSize * 2 Text1 (1). Text = Text1 (0). Text Case 1 Text1 在窗体上画一个名称为Text1,的文本框和一个名称为Command1的命令按钮,然后编写以下程序代码:运行程序,单击Command1,则在文本框Text1中显示的结果为() 在窗体中添加一个命令按钮,名称为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,结果是______ 。 在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程 Private Sub Command1_Click() n=Text1,Text Select Case n Case 1 To 20 x=10 Case 2,4,6 x=20 Case Is 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程Private Sub Command1_Click()Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program"End Sub运行后,如果单击命令按钮,则在文本框中显示的是 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然,如果单击命令按钮,则在文本框中显示的是 在窗体上画1个文本框,名称为Text1,然后编写如下程序:Private Sub Form_Load()Open "d:empdat.txt" For Output As 1Text1.Text=" "End SubPrivate Sub Text1 KeyPress(KeyAscii As Integer)If ()=13 ThenIf UCase(Tex 在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command1 Click() Text1.Text = InputBox("请输入数据1") Text2.Text = InputBox("请输入数据2) End Sub 程序运行后,如果单击命令按钮,将先后显示两个输入对话框,在两个输入对话框中分 在窗体上画两个文本框(其名称分别为Textl和Text2)和一个命令按钮(其名称为 Command1),然后编写如下两个事件过程: Private Sub Command1_Click()Text1.Text="Microsoft Visual Basic" End Sub Private Sub Text1_Change()Text2.Text=UCase(Text1.Text) End Sub 在窗体上画一个文本框,名称为Text1,然后编写如下程序:程序运行后,在文本框中输入一个字符串,然后单击窗体,则文本框中的内容() 在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程: Private Sub Command1_Click() Text1.Text="VB Programming" Text2.Text=Text1.Text Text1.Text="ABCD" End Sub 程序运行后,单击命令按钮,两个文本框中显示的内容分别为 (8) 和 (9) 。 在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程: Private Sub Command1_Click() Text1. Text="VB Programming" Text2. Text=Text1. Text Text1. Text="ABCD" End Sub 程序运行后,单击命令按钮,两个文本框中显示的内容分别为 【7】 和 【8】 。 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程: Private Sub Command1_Click() Dim inData As String Text1. Text="" Open "d: myfile. txt "For______As 1 Do While ______ Input 1,inData Text1. Text=Text1 在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: Private Sub Command1_Click()A=Text1.Text+Text2.TextPrint A End Sub Private Sub Form Load()Text1.Text=" "Text2.Text 在窗体上有若干控件,其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是()。 在窗体上有两个文本框控件,名称分别为Text1和Text2,以下程序实现的功能是希望在文本框Text1中输入字符时,输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示,下划线处应填( )。 在窗体中有一个文本框Text1,编写事件代码如下:打开窗体运行后,在输入框中输入整数12,文本框Text1中输出的结果是()
购买搜题卡 会员须知 | 联系客服
会员须知 | 联系客服
关注公众号,回复验证码
享30次免费查看答案
微信扫码关注 立即领取
恭喜获得奖励,快去免费查看答案吧~
去查看答案
全站题库适用,可用于E考试网网站及系列App

    只用于搜题看答案,不支持试卷、题库练习 ,下载APP还可体验拍照搜题和语音搜索

    支付方式

     

     

     
    首次登录享
    免费查看答案20
    微信扫码登录 账号登录 短信登录
    使用微信扫一扫登录
    登录成功
    首次登录已为您完成账号注册,
    可在【个人中心】修改密码或在登录时选择忘记密码
    账号登录默认密码:手机号后六位