主观题

在窗体上建立名称为Text1、Text2和删的三个文本框,其中Text1和Text2文本框用来接受两个整数(假设为M和N),建立一个名称为command1的命令按钮,单击它将得到数M从右边起的N位数字,并把该数字显示在Text3文本框中,如下图所示。请填空。 private Fuction digit(ByVal m As Integer, ByVal n As Integer) As Integ

查看答案
该试题由用户253****75提供 查看答案人数:13215 如遇到问题请 联系客服
正确答案
该试题由用户253****75提供 查看答案人数:13216 如遇到问题请联系客服

相关试题

换一换
主观题
在窗体上建立名称为Text1、Text2和删的三个文本框,其中Text1和Text2文本框用来接受两个整数(假设为M和N),建立一个名称为command1的命令按钮,单击它将得到数M从右边起的N位数字,并把该数字显示在Text3文本框中,如下图所示。请填空。 private Fuction digit(ByVal m As Integer, ByVal n As Integer) As Integ
答案
主观题
在窗体上建立名称为了ext1、Text2和Text3的三个文本框,其中Text1和Text2文本框用来接受两个整数(假设为M和N),建立一个名称为Command1的命令按钮,单击它将得到数M从右边起的第N位数字,并把该数字显示在Text3文本框中,如图20-15如示。请填空。 Private Function digit(ByVal m As Integer,ByVal n As Integer)
答案
单选题
在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮(名称为Command1),外观如图所示。编写如下程序Private Sub Form_Load() Text1.Text="" Text2.Text="" Text3.Text=""End SubPrivate Sub Command1_Click() x=Val(Text1.Text) y=Val(Te
A.4 B.6 C.8 D.12
答案
单选题
在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮 (名称为Command1),外观如下图所示。 编写如下程序: Private Sub Form_Load() Text1.Text="" Text2.Text="" Text3.Text="" End Sub Private Sub Commandl_Click() x=Val(Text1.Text) y
A.4 B.6 C.8 D.12
答案
单选题
在窗体上建立三个文本框,名称分别为Text1、Text2和Text3,一个命令按纽,名称为command1,如果在TEXT1中输入数200,在TEXT2中输入数150,则执行下列程序后,TEXT3的值为______。 Private Sub Command1_Click() Dim m, n As Integer m = Val (Text1. Text) n = Val (Text2. Text) If n * m = 0 ThenExit Sub End If If m < n Then t =m: m= n: n = t End If Dor = m Mod nm= nn =r Loop While r <> 0 Text3. Text= m End Sub
A.200 B.50 C.100 D.150
答案
单选题
在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮(名称为Command1),外观如图所示。
A.4 B.6 C.8 D.12
答案
主观题
在窗体上画两个文本框(其名称分别为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
答案
单选题
在窗体上有两个命令按钮Command1和Commnd2,三个文本框Text1,Text2和Text3,有如下事件过程: Private Sub Comuand1_Click() Text3.Text= Text1.Text+Text2.Text End SubPrivate Sub Command2_Click() Text3.Text= Text3.Text+Str(Val(Text1.Text)+Val (Text2.Text)) End Sub程序运行后,在Text1和Text2中分别输入123、456,然后依次单击Command1和Command2,则在Text3中显示的内容依次是______ 。
A.123456 579 B.123456 123456 C.579 579 D.579 123456
答案
单选题
在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮 (名称为Command1),外观如下图所示。 编写如下程序: Private Sub Form_Load() Text1.Text="" Text2.Text="" Text3.Text="" End Sub Private Sub Commandl_Click() x=Val(Text1.Text) y=Val(Text2.Text) Text3.Text=f(x,y) End Sub Function f(ByVal x As Integer,ByValy As Integer) DoWhiley<>0tmp=x ModyX=yy=tmp Loop f=X End Function 运行程序,在Textl文本框中输入36,在Text2文本框中输入24,然后单击命令按钮,则在Text3文本框中显示的内容是( )。
A.4 B.6 C.8 D.12
答案
单选题
窗体上有一个由两个文本框组成的控件数组,名称为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
A.Index用于标识数组元素 B.本程序中Case Else分支的语句永远不会被执行 C.向任何一个文本框输入字符,都会在另一个文本框中显示该字符 D.下标为0的文本框中显示的字符尺寸将越来越小
答案
热门试题
在窗体上有若干控件,其中有一个名称为Text1文本框。影响Text1的Tab顺序的属性是 ______。 ( 19 )在窗体上画两个文本框(名称分别为 text1 和 text2 )和一个命令按钮(名称为 command1 ) , 然后编写如下事件过程: 在窗体中添加一个命令按钮,名称为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,结果是______ 。 新建一个工程。在窗体中画三个标签,名称分别为Label1、Label2和Label3,标题分别为“加数1”、“加数2”和“和”。在三个标签下分别有三个文本框(名称分别为Textl、Tex2和Text3)用来输入数字。要求编写一个事件过程,程序运行后在文本框Text1和Text2中输入数字,单击文本框Text3后其中输出两个数的和。如图14所示。程序中不得使用任何变量。 注意:存盘时必须存放在考生文 在窗体(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、Text2的文本框,名称为Command1的命令按钮。运行程序,在Text1中输入“FormList”,然后单击命令按钮,执行如下程序:Private Sub Command1_Click()Text2.Text=UCase(Mid(Text1.Text,5,4))End Sub在Text2中显示的是()。 在窗体上画两个名称分别为Text1、Text2的文本框。Text1的Text属性为“Database”, 如图所示。现有如下事件过程: Private Sub Text1_Change()Text2.Text=Mid(Text1,1,1)End Sub运行程序,在文本框Text1中原有字符之前输入a,Text2中显示的是:()。 在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程: 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,Text3,若使程序运行时Text3首先获得“焦点”,那么,应设置其()属性值为0 。 一个窗体上有三个文本框,按放置顺序分别是:Text1,Text2,Text3 ,若使程序运行时Text3首先获得“焦点”,那么应设置其()属性值为 0 。 在窗体上画两个名称分别为Text1、Text2的文本框,Text1的Text属性为“DatBase”,如下图所示。现有如下事件过程:运行程序,在文本框Text1中原有字符之前输入a,Text2中显示的是() 窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:当向文本框Text1中输入小写字母a时,文本框Text2中显示的是() 在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮,编写如下事件过程: Private Sub Command1_Click()Text1.Text=“计算机”Me.Text1=“等级”Text1=“考试” End Sub 程序运行后.如果单击命令按钮,则在文本框中显示的是 窗体上有两个名称分别为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 在窗体上画一个名称为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和Text2)和一个命令按钮(名称为Command1),然后编写如下事件过程: Private Sub Command1 Click() Text1.Text = InputBox("请输入数据1") Text2.Text = InputBox("请输入数据2) End Sub 程序运行后,如果单击命令按钮,将先后显示两个输入对话框,在两个输入对话框中分 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程: Private Sub Command1_Click() Dim inData As String Text1.Text="" Open"d:myfile.txt"Fo (8) As1 Do While (9) Input 1,inData Text1.Text=Text1.Text+inData 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程: Private Sub Command1_Click() Dim inData As String Text1.Text=" " Open "d:Myfile.txt" For (14) As1 Do While (15) Input1,inData Text1.Text=Text1.Text+i 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编定如下事件过程: Private Sub Command1_Click() Dim inData As String Text1.Text:“” Open "d:myfile.txt" For (10) As1 Do While (11) Input 1,inData Text1.Text=Text1.Text+i
购买搜题卡 会员须知 | 联系客服
会员须知 | 联系客服
关注公众号,回复验证码
享30次免费查看答案
微信扫码关注 立即领取
恭喜获得奖励,快去免费查看答案吧~
去查看答案
全站题库适用,可用于E考试网网站及系列App

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

    支付方式

     

     

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