[单选题]

在窗体上添加一个文本框,其名称为text1,然后编写如下的Load事件过程,则该程序的运行结果是______。Private Sub form_ load Text1. Text = " " t = 1 for k = 10 To 6 Step -2 t= t* k Next k Text1. Text = tEnd Sub

A.在文本框中显示120

B.文本框中仍为空

C.在文本框中显示480

D.出错

参考答案与解析:

相关试题

在窗体上一个文本框,其名称为Text1,然后编写如下事件过程:PrivateSu

[单选题]在窗体上一个文本框,其名称为Text1,然后编写如下事件过程:PrivateSubText2_KeyPress(KeyAsciiAsInteger)D.imstrAsString,nAsIntegerstr=Ucase(Chr(KeyAscii))n=Len(str)Text1=String(n,str)E.ndSub程序运行后,如果在TEXT2中通过键盘上输入单字母"k",则在文本框Text1中显示的内容为( )A.kB.KC.KKD.Kk

  • 查看答案
  • 在窗体上添加一个文本框,名为text1,然后编写如下的load事件过程,则程序的

    [单选题]在窗体上添加一个文本框,名为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,然后编写如下的load事件过程,则程序的

    [单选题]在窗体上添加一个文本框,名为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,然后编写如下的Load事件过程,则程序运行结果

    [单选题]在窗体上添加一个文本框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,然后编写如下事件过程: Private

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

  • 查看答案
  • 在窗体上面有一个文本框,其名称为Text1,然后编写如下事件过程:Private

    [单选题]在窗体上面有一个文本框,其名称为Text1,然后编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) TextText=String(2,KeyAscii) End Sub 程序运行后,如果在键盘上输入字母“a”,则在文本框Text1中显示的内容为( )。A.aaaB.AAAC.AAD.aa

  • 查看答案
  • 在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程:Private

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

  • 查看答案
  • 在窗体上添加一个文本框Text 1,然后编写如下的Load事件过程,则程序运行结

    [单选题]在窗体上添加一个文本框Text 1,然后编写如下的Load事件过程,则程序运行结果为( )。 Private Sub Form_Load0 Text1. Text="" Text1. SetFocus For k = 1 To 5 t=t*k Next k Text1.Text = tEnd SubA.在文本框中显示120B.文本框中仍为空C.在文本框中显示1D.出错

  • 查看答案
  • 在窗体上画1个文本框,其名称为Text1,然后编写如下过程: PrivateSu

    [单选题]在窗体上画1个文本框,其名称为Text1,然后编写如下过程:Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode)E.nd SubPrivate Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer)Print Chr(KeyCode+2)E.nd Sub程序运行后,把焦点移到文本框中,此时如果敲击“A”键,则输出结果为。A.AA.B.AB.

  • 查看答案
  • 在窗体上面有一个文本框,其名称为Text1,编写如下事件过程:Private S

    [单选题]在窗体上面有一个文本框,其名称为Text1,编写如下事件过程: Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2,KeyAscii) End Sub 程序运行后,如果在键盘上输入字母“a”,则在文本框Text3中显示的内容为( )。A.aaaB.AAAC.AAD.aa

  • 查看答案
  • 在窗体上添加一个文本框,其名称为text1,然后编写如下的Load事件过程,则该