网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程: Private Sub Form_Load() TextText= " " TextSetFocus For i=1 To 10 Sum=Sum+i Next i TextText=Sum End Sub 上述程序的运行结果是 ______。

A.在文本框Text1中输出55

B.在文本框Text1中输出0

C.出错

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中输出不定值 ” 相关考题
考题 在窗体上画一个文本框(其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中输出不定值

考题 在窗体上画两个文本框,其名称分别为Name1和PassWord1,然后编写如下事件过程Private Sub Form_Load()ShowName1.Text=""Password1.Text=""Password1.SetFocusEnd SubPrivate Sub Password1_KeyDown(KeyCode As Integer, Shift As Integer)Name1.Text=Name1.Text + Chr(KeyCode - 3)End Sub程序运行后,如果在Password1中输入"hit",则在Name1文本框中显示的内容是 【8】 。

考题 在窗体上画一个文本框,一个命令按钮和一个标签,其名称分别为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

考题 在窗体上画一个命令按钮和一个文本框,并将窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Form_Load() Show Text1.Text=" " Text1.SetFocus End Sub Private Sub Command1_Click() Text1.Text = Ucase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii) End Sub 程序运行后,在键盘上输入abcdefg,单击命令按钮,则文本框中显示的内容为A.abcdefgB.不显示任何信息C.ABCDEFGD.出错

考题 在窗体上画一个文本框(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、Command1和Labe11,文本框的Text1属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() x=Int(Val(TextText)+0.5) LabeCaption=Str(x) End Sub 程序运行后,在文本框中输入653,单击命令按钮,标签中显示的内容是______。A.27B.28C.29D.30

考题 在窗体上画一个文本框(其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中输出不定值

考题 窗体上画一个名称为Text1的文本框,然后编写如下事件过程: Private Sub Form. Load() Show TextSetFocus End Sub Private Sub Text1_ KeyPress (KeyAscii As Integer) Dim ch As String ch = Chr (KeyAscii) KeyAscii = Asc(UCase(ch)) Pint Chr(KeyAscii + 4) End Sub程序运行后,在文本框中输入abcde,则在窗体上显示的内容是______。A.abcdeB.efghiC.EFGHID.ABCDE

考题 在窗体上画一个列表框、一个文本框及一个按钮,然后编写如下两个事件过程: Private Sub Form_Load() For i=1 To 10 List1.AddItem i * 10 Next i Text1.Text=" " End Sub Private Sub List1_Click() Print List1.Text + Text1.Text End Sub 程序运行后,在文本框中输入“123”,然后双击列表框中的第四行,则在窗体上输出的结果为A.40123B.163C.123D.30123

考题 在窗体上画一个名称为Text1的文本框,然后编写如下的事件过程: Private Sub Text1_KeyPress(Keyascii As Integer) ... End Sub 若焦点位于文本框中,则能够触发此事件的操作是( )。A.左键单击文本框B.左键双击文本框C.右键单击文本框D.按下键盘上的某个键

考题 在窗体(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 程序运行后,在第1个文本A.444B.321123C.123321D.132231

考题 在窗体(Name属性为form1)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮 (Name属性为Command1),然后编写如下两个事件过程,该过程的运行结果为______。Private Sub Command1_Click() a = Text1, Taxt + Text2, Text Print aEnd SubPrivate Sub form_ Load() Text1.Text = "123" Text2.Text = "321"End SubA.444B.321123C.123321D.132231

考题 在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程:Private Sub Text1_KeyPress(KeyAscii As Integer)Dim str As StringStr=Chr(KeyAscii)KeyAscii=Asc(UCase (str))Textl.Text=String(2, KeyAscii)End Sub程序运行后,如果在键盘上输入字母"b",则在文本框Text1中显示的内容是A.bbbB.BBBC.BBD.bb

考题 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后,如果单击命令按钮,则在文本框中显示的是A. VisualB.BasicC.ProgramD.出错

考题 在窗体(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中输出不定值

考题 在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序: Private Sub Form_Load() 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.ChimaC.BeijingD.BeijingC

考题 在窗体上画两个文本框(其NAME属性分别为TEXT1和TEXT2)和一个命令按钮(其NAME属性为COMMAND1),然后编写如下事件过程: PRIVATE SUB COMMAND1_CLICK( ) X=0 N=0 DO WHILE X<50 x=(x+2) * (x+3) N=N+1 LOOP TEXT1=STR(N) TEXT2=STR(X) END SUB程序运行后,单击命令按钮,在两个文本框中显示的值分别为( )。A.1和0B.2和72C.3和50D.4和168

考题 在窗体(NAME属性为FORM1)上画三个文本框(其NAME属性分别为TEXT1、TEXT2和TEXT3)和一个命令按钮(NAME属性为COMMAND1),然后编写如下两个事件过程: PRIVATE SUB COMMAND1_CLICK( ) TEXT3=TEXT1+TEXT2 END SUB PRIVATE SUB FORM1_LOAD( ) TEXT1="" TEXT2="" TEXT3="" END SUB 程序运行后,在第一个文本框(TEXT1)和第二个文本框(TEXT2)中分别输入5和7,然后单击命令按钮,则文本框(TEXT3)中显示的内容为( )。A.12B.57C.75D.空值

考题 在窗体上画两个文本框(其Name属性分别为Text1和Tex12)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程: 程序运行后,单击命令按钮,在两个文本框中显示的值分别为()。A10和0B2和100C3和50D4和168

考题 在窗体上画两个文本框,(其Name 属性分别为Text1和Text2)和一个命令按纽(其Name属性为Command1),然后编写如下事件过程() A1和0B2和72C3和50D4和168

考题 在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程: 程序运行后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入“同学们,”和“你们好”,然后单击命令按钮,则输出结果为多少?

考题 单选题在窗体上画一个文本框(其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中输出不定值