网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
单选题
在窗体上画一个文本框（其Name属性为Text1），然后编写如下事件过程：Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor i= 1 To 9Sum=Sum+iNext iText1.Text=SumEnd Sub上述程序的运行结果是（ ）。
A
在文本框Text1中输出45
B
在文本框Text1中输出0
C
出错
D
在文本框Text1中输出不定值
参考答案
参考解析
解析：
由于Form_load事件是在窗体加载时发生，所以此时窗体还没有显示，不能用“Text1.SetFocus”语句获得焦点，故出错。如要改正，需要在此语句前加入“Me.Show”，显示窗体，则可以看到文本框已获得焦点，并执行循环语句，输出“45”。
由于Form_load事件是在窗体加载时发生，所以此时窗体还没有显示，不能用“Text1.SetFocus”语句获得焦点，故出错。如要改正，需要在此语句前加入“Me.Show”，显示窗体，则可以看到文本框已获得焦点，并执行循环语句，输出“45”。
更多 “单选题在窗体上画一个文本框（其Name属性为Text1），然后编写如下事件过程：Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor i= 1 To 9Sum=Sum+iNext iText1.Text=SumEnd Sub上述程序的运行结果是（ ）。A 在文本框Text1中输出45B 在文本框Text1中输出0C 出错D 在文本框Text1中输出不定值” 相关考题
考题
在窗体中有两个文本框分别为 text1 和 text2 ，一个命令按钮 command1, 编写如下两个事件过程：Private sub command1_click()A=text1.value+text2.valueMsgbox aEnd subPrivate sub form_load()Text1.value= ””Text2.value= ””End sub程序运行时，在文本框 text1 中 78 ，在文本框 text2 中输入 87 ，单击命令按钮，消息框中输出的结果为____ 11 ___
考题
（ 32 ）在窗体中有一个文本框 text1, 编写事件代码如下：Private sub form_click()X=val(inputbox( “ 输入 x 的值 ” ))Y=1If x then y=2Text1.value=yEnd sub打开窗体运行后。在输入框中输入整数 12 ，文本框 text1 中输出的结果是A ） 1B ） 2C ） 3D ） 4
考题
在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程：Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor i=1 To 9Sum=Sum=iNext iText1.Text=SumEnd Sub上述程序的运行结果是A．在文本框Text1中输出45B．在文本框Text1中输出0C． 出错D． 在文本框Text1中输出不定值
考题
在窗体上画一个文本框，一个命令按钮和一个标签，其名称分别为Text1、Command1和Labell，文本框的Text1属性设置为空白，然后编写如下事件过程： Private Sub Command1_Click() x=Int(Val(Text1.Text)+0.5) Labell.Caption=Str(x) End Sub 程序运行后，在文本框中输入28.653，单击命令按钮，标签中显示的内容是 ______。A．27B．28C．29D．30
考题
在窗体(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，然后单击命令按钮，则输出结果为______ 。A．444B．321123C．123321D．132231
考题
在窗体上画一个文本框(其中Name属性为Text1)，然后编写如下事件过程： Private Sub Form_ Load() Text1.Text=“” Text1.SetFocus For i=1 To 10 Sum=Sam+ i Next i Text1.Text=Sam End Sub上述程序的运行结果是______ 。A．在文本框Text1中输出55B．在文本框Text1中输出0C．出错D．在文本框Text1中输出不定值
考题
（13）在窗体上画一个文本框（其Name属性为Text1）,编写下列事件过程，运行结果是。 Private Sub Form_Load() Show Text1.Text="你好！" Text1.SetFocus For i=1 To 15 Sun=Sun+i Next i Text1.Text=Sun End Sub
考题
在窗体上添加一个文本框Text1，然后编写下列Load事件过程，则程序运行结果是( )。Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor k=1 To 5t=t*kNext kText1.Text=tEnd SubA．在文本框中显示120B．文本框中仍为空C．在文本框中显示1D．出错
考题
在窗体上画一个文本框(Textl)，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char)) Print String(4，KeyAscii) End Sub 程序运行后，在文本框Text1中输入A，则程序在窗体上的输出结果为A．aB．AC．aaaaD．AAAA
考题
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和 Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下两个事件过程： Private Sub Commandl Click() a=TextText+TextText Print a End Sub Private Sub Form. Load() TextText="" Text2．Text="" End Sub 程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和 321，然后单击命令按钮，则输出结果为 ( )A．444B．321123C．123321D．132231
考题
在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程： Private Sub Command1_Click() A=Text1.Text+TextText Print a End Sub Private SUb Form胃Load() Text1.Text= " " TextText=" " End Sub程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入33和44，然后单击命令按钮，则输出结果为A．77B．33+44C．3344D．4433
考题
在窗体上添加—个文本框，名为Text1，然后编写如下的Load事件过程，则程序的运行结果是 Private Sub Form_Load( ) Text1.Text=”” Text1.Setfocus t=1 For k=10 To 6 Step-2 t=t*k Next k Text1.Text=t End SubA．在文本框中显示120B．文本框仍为空C．在文本框中显示480D．出错
考题
在窗体上画一个文本框(其NAME属性为TExT1)，然后编写如下事件过程： PRIVATE SUB FORM_LOAD( ) DIM SUM TEXT1="" FOR I=1 TO 10 SUM=SUM+I NEXT I TEXT1=SUM END SUB上述程序的运行结果是( )。A．在文本框TEXT1中输出55B．在文本框TEXT1中输出0C．出错D．在文本框TEXT1中输出不定值
考题
窗体上有一个文本框，其Name属性为Text1，如图1所示，并有如下事件过程：上述程序的运行结果是（ ）。A. 在文本框Text1中输出55B. 在文本框Text1中输出0C. 语法错误D. 在文本框Text1中输出不定值
考题
在窗体上有一个文本框Text1，Text属性值为空，然后编写下列事件过程：Private Sub Text1 KeyPress(KeyAscii As Integer)Dim str As String,n As Integerstr=UCase(Chr(KeyAscii))n=Len(str)Text1.Text=String(n,str)End Sub程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。A．ppB．pPC．PPD．Pp
考题
在窗体上有一个文本框Text1，Text属性值为空，然后编写如下事件过程：Private Sub Text1_KeyPress(Key Ascii As Integer)Dim str As String, n As Integer str=UCase(Chr(Key Ascii)) n=Len(str) Text1.Text=String(n,str) End Sub 程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。A．ppB．pPC．PPD．Pp
考题
在窗体上添加一个文本框，名为text1，然后编写如下的load事件过程，则程序的运行结果是______ 。 private sub form_ load text1.text=“” text1.setfocus for k=1 to 5 t=t*k next k text1.text=t end subA． 在文本框中显示120B．文本框中仍为空C．在文本框中显示1D．出错
考题
在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程： Private Sub Form_Load() Text1.Text="" Text1.SetFocus For i=1 To 10 Sum=Sum+i Next i Text1.Text=Sum End Sub 上述程序的运行结果是 ______。A．在文本框Text1中输出55B．在文本框Text1中输出0C．出错D．在文本框Text1中输出不定值
考题
在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:Private Sub Form_load()Text1.Text=″″Text1.SetFocusFor i=1 To 9Sum=Sum+iNext iText1.Text=SumEnd Sub上述程序的运行结果是A．在文本框Text1中输出45B．在文本框Text1中输出0C．出错D．在文本框Text1中输出不定值
考题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是A． VisualB．BasicC．ProgramD．出错
考题
在窗体上添加一个文本框，名为text1，然后编写如下的load事件过程，则程序的运行结果是( )。 Private Sub Form_Load Text1.Text=" " Text1.SetFocus For k=1 to 5 t=t*k Next k Text1.Text=t End SubA．在文本框中显示120B．文本框中仍为空C．在文本框中显示1D．出错
考题
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form_Load0 Show Text1.Text="" Text2.Text="" Text1.SetFocus End Sub Private Sub Text1 Change() Text2.Text=Mid(Text1.Text,8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是( )。A．BeijingChinaB．ChinaC．BeijingD．BeijingC
考题
在窗体(Name属性为Forml)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl)，然后编写如下两个事件过程： Private Sub Commandl_Click() a=Text1.Text+Text2.Text Printa End Sub Private Sub Form_Load() Text1.Text="" Text2.Text="" End Sub 程序运行后，在第一个文本框(A．165B．8778C．7788D．7887
考题
在窗体上画一个文体框(其Name属性为Text1)，然后编写如下事件姓程； Private Sub Fom_Load() Text1.Text="" Text1.SetFocus For i=1 To 10 Stun=Stun +i Next i Text1.Text=Sum End Sub 上述程序的运行结果是______。A．在文本框Text1中输出55B．在文本框Tece1中输出0C．出错D．在文本框Text1中输出不定值
考题
在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程： Private Sub Form_Load() TextText= " " TextSetFocus For i=1 To 10 Sum=Sum+i Next i TextText=Sum End Sub 上述程序的运行结果是 ______。A．在文本框Text1中输出55B．在文本框Text1中输出0C．出错D．在文本框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 SubA．在文本框中显示120B．文本框中仍为空C．在文本框中显示1D．出错
考题
在窗体（Name属性为Form1）上画两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（Name属性为Command1），然后编写如下两个事件过程： 程序运行后，在第一个文本框（Text1）和第二个文本框（Text2）中分别输入“同学们，”和“你们好”，然后单击命令按钮，则输出结果为多少？
热门标签
最新试卷