首页
题目内容 (请给出正确答案)
[单选题]

在窗体上画两个名称分别为TextTexte2的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim x As Integer,n As Integerx=1n=0Do While x<20x=x*3n=n+1LoopTextText=Str(x)TextText=Str(n)E

A.15和1

B.27和3

C.195和3

D.600和4

答案
收藏

B、27和3

如果结果不匹配,请 联系老师 获取答案
您可能会需要:
您的账号:,可能还需要:
您的账号:
发送账号密码至手机
发送
安装优题宝APP,拍照搜题省时又省心!
更多“在窗体上画两个名称分别为TextTexte2的文本框和一个名…”相关的问题
第1题
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: Private Sub Command1_Click() a=Val(TextText)+TextText Print a End Sub Private Sub Form_Load() TextText="" TextText

A.444

B.321123

C.123321

D.132231

点击查看答案
第2题
在窗体上画两个名称分别为Text1、Text2的文本框和一个名称为Command1的命令按钮,然后编写如下事件
过程: Private Sub Command1 Click() Dim x As Integer, n As Integer x = 1 n = 0 Do While x < 20 x = x * 3 n = n + 1 Loop Text1.Text = Str(x) TextText = Str(n) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别是

A.15和1

B.27和3

C.195和3

D.600和4

点击查看答案
第3题
在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程: Private Sub Comma
nd1_Click() Text1.Text="计算机" TextText=Text1.Text Text1.Text="等级考试" End Sub 程序运行后,单击命令按钮,两个文本框(Text1和Text2)中的内容分别为【 】和【 】。

点击查看答案
第4题
在窗体上有两个文本框控件,名称分别为Text1和Text2,以下程序实现的功能是希望在文本框Text1中输
入字符时,输入的字符也将出现在Text2文本框中。运行时的程序界面如图20-1所示,下划线处应填()。

在窗体上有两个文本框控件,名称分别为Text1和Text2,以下程序实现的功能是希望在文本框Text

Private Sub Text1_ _________() TextText=Text1.Text End Sub

A.SetFocus

B.Change

C.GetFocus

D.Click

点击查看答案
第5题
在窗体上画两个标签和一个命令按钮,其名称分别为Labell、Label2和Command1,然后编写如下程序:Priv

在窗体上画两个标签和一个命令按钮,其名称分别为Labell、Label2和Command1,然后编写如下程序: Private Sub func(L As Label,ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Labell,A)Label2.Caption=a End Sub 程序运行后,单击命令按钮,在两个标签Label1和Label2中显示的内容分别是 ______。

A.ABCD和10

B.1234和100

C.ABCD和100

D.1234和10

点击查看答案
第6题
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下事件过程: Private Sub Form_Load
() Show Text1.Text="" Text2.Text="" Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCode-4) End Sub 程序运行后,如果在Text2文本框中输入“efghi”,则Text1文本框中的内容为【 】。

点击查看答案
第7题
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1) 在名称为Form1的窗体上画一个名称为H1

注意:下面出现的“考生文件夹”均为c:\wexam\25160001。

(1) 在名称为Form1的窗体上画一个名称为H1的水平滚动条,请在“属性”窗口中设置它的属性值,使之满足以下要求:它的最大刻度值为100,最小刻度值为1,在运行时鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签,并分别显示1和100,运行时的窗体如图19-1所示。

注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm

(2) 在名称为Form1的窗体上画两个文本框,名称分别为Text1和Text2,均无初始内容;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个子菜单项,名称分别为Cooy和Clear、标题分别为“复制”和“清除”。请编写适当的事件过程,使得程序运行时,单击“复制”菜单项,则把 Text1中的内容复制到Text2中,单击“清除”菜单项,则清除Text2中的内容(即在Text2中填入空字符串)。程序运行界面如图19-2所示。要求在程序中不得使用任何变量,每个事件过程中只能写一条语句。

注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。

注意:下面出现的“考生文件夹”均为c:wexam25160001。 (1) 在名称为Form1的

点击查看答案
第8题
在窗体上画一个名称为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,By

A.0

B.12

C.Str(z)

D.没有显示

点击查看答案
第9题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Forml的窗体上画

请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Forml的窗体上画出包含三个命令按钮的控件数组,名称为cmdl,下标分别为0、1、2,Caption分别为“开始”、“停止”和“退出”,如图3(a)所示。通过属性窗口设置各命令按钮的属性,使得程序开始运行时,“停止”按钮不可见,“退出”按钮不可用,如图3(b) 所示。 注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjt1.frm,工程文件名为sjt1.vbp。请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为For(2)在名称为Form1的窗体上画两个名称分别为Command1和Command2、标题分别为“打开”和“保存”的俞令按钮,和一个名称为CD1的通用对话框,如图4所示。请在属性窗口中设置CD1的属性,使得打开通用对话框时,其初始路径是“C:\”。再编写适当的事件过程,使得运行程序,分别单击“打开”或“保存”按钮时,相应地出现“打开”或“保存”对话框。要求程序中不得使用变量,每个事件过程中只能写一条语句。 注意:存盘时,将文件保存至考生文件夹下,且窗体文件名为sjt2.frm,工程文件名为sjt2.vbp。请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为For

点击查看答案
第10题
在窗体上画一个文本框,然后编写如下事件过程:Private Sub Form_Click()x = InputBox("请输入一个整数")Print x + TextTextEnd Sub程序运行时,在文本框中输入然后单击窗体,在输入对话框中输入单击“确定”按钮后,在窗体上显示的内容是:()

A.123

B.456

C.579

D.123456

点击查看答案
退出 登录/注册
发送账号至手机
密码将被重置
获取验证码
发送
温馨提示
该问题答案仅针对搜题卡用户开放,请点击购买搜题卡。
马上购买搜题卡
我已购买搜题卡, 登录账号 继续查看答案
重置密码
确认修改