单选题

在窗体上添加一个文本框,名为text1,然后编写如下的load事件过程,则程序的运行结果是______ 。 private sub form_ load text1.text=“” text1.setfocus for k=1 to 5 t=t*k next k text1.text=t end sub

A. 在文本框中显示120
B. 文本框中仍为空
C. 在文本框中显示1
D. 出错

查看答案
该试题由用户551****43提供 查看答案人数:46321 如遇到问题请联系客服
正确答案
该试题由用户551****43提供 查看答案人数:46322 如遇到问题请联系客服
热门试题
在名称为Form1的窗体上画一个文本框,其名称为Text1,然后通过属性窗口设置窗体和文本框的属性,实现如下功能.完成设置后的窗体如下图所示。要求:不编写任何代码。 ( 19 )在窗体上画两个文本框(名称分别为 text1 和 text2 )和一个命令按钮(名称为 command1 ) , 然后编写如下事件过程: 在窗体上画一个名称为Text1,的文本框和一个名称为Command1的命令按钮,然后编写以下程序代码:运行程序,单击Command1,则在文本框Text1中显示的结果为() 在窗体上添加一个文本框,名称为text1,然后编写如下的load事件过程,则程序的运行结果是____。Private Sub Form_LoadText1.Text=""Text1.SetFocusFor k=1 to 5t=t*kNext kText1.Text=tEnd Sub() 在窗体上画一个名称为Text1的文本框,然后编写如下事件过程:PrivatSuForm_Load()。程序运行后,如果按Shift+F2键,则文本框中的内容是() 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:程序运行后,在文本框中输入456,然后单击命令按钮,在输入对话框中输入123,则文本框中显示的内容是() 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程Private Sub Command1_Click()Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program"End Sub运行后,如果单击命令按钮,则在文本框中显示的是 在窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:程序运行后,如果从键盘上输入16,则在文本框显示的内容是()。 窗体上画一个命令按钮和一个文本框,名称分别为Command1和Text1,然后编写如下程序:程序运行后,如果从键盘上输入16,则在文本框中显示的内容是() 在窗体上绘制一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串: Microsoft Sub Command1_Click() 然后编写如下事件过程: Private Sub Command1_Click() Open "d:empoutf.txt" For Output As 1 For i=1 To Len(Text1.Text)c=Mid(Text1 在窗体上添加一个文本框,名为text1,然后编写如下的load事件过程,则程序的运行结果是______ 。 private sub form_ load text1.text=“” text1.setfocus for k=1 to 5 t=t*k next k text1.text=t end sub 设窗体上有一个文本框Text1和一个命令按钮Command1,并有以下事件过程:程序执行时,在文本框中输入“Basic”,然后单击命令按钮,则Text1中显示的是() 窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过程如下:当向文本框Text1中输入小写字母a时,文本框Text2中显示的是() 设有如下通用过程:在窗体上画一个名称为Text1的文本框和一个名称为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,结果是______ 。 在窗体上有一个文本框Text1,Text属性值为空,然后编写下列事件过程: Private Sub Text1 KeyPress(KeyAscii As Integer) Dim str As String,n As Integer str=UCase(Chr(KeyAscii)) n=Len(str) Text1.Text=String(n,str) End Sub 程序运行后,若在文本框中输入单字母“p”,则在文本框Text1中显示的内容为( )。 在窗体中有一个文本框Text1,编写事件代码如下:Private Sub Form_Click()X = Val(Inputbox(“输入x的值”))Y = 1If X0 Then Y = 2Text1.Value = YEnd Sub打开窗体运行,在输入框中输入整数12,文本框Text1中的结果是() 在窗体中有一个文本框Text1,编写事件代码如下:PrivateSubForm_Click()X=val(InputBox("输入x的值"))Y=1IfX0ThenY=2Text1.Value=YEndSub打开窗体运行后,在输入框中输入整数12,文本框Text1中输出的结果是() 在窗体上画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
购买搜题卡会员须知|联系客服
会员须知|联系客服
关注公众号,回复验证码
享30次免费查看答案
微信扫码关注 立即领取
恭喜获得奖励,快去免费查看答案吧~
去查看答案
全站题库适用,可用于聚题库网站及系列App

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

    支付方式

     

     

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