在窗体上添加—个文本框，名为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．出错

题目

在窗体上添加—个文本框，名为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 Sub

A．在文本框中显示120

B．文本框仍为空

C．在文本框中显示480

D．出错

相似考题

1.在窗体上添加一个文本框Text1，然后编写下列Load事件过程，则程序运行结果是( )。Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor k=1 To 5t=t*kNext kText1.Text=tEnd SubA．在文本框中显示120B．文本框中仍为空C．在文本框中显示1D．出错

2.在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1)，然后编写如下事件过程：打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。

3.在窗体上添加一个文本框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．出错

4.在窗体上添加一个文本框，其名称为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 SubA．在文本框中显示120B．文本框中仍为空C．在文本框中显示480D．出错

参考答案和解析
正确答案：D
解析：在触发窗体Form的Load事件时，使用SetFocus将发生冲突，在VisualBasic上调试本题的程序将显示“错误的过程调用或函数”提示。如果删除SetFocus方法的使用，文本框中将显示480。如果用控制按钮的Click事件触发该段事件过程，文本框也会得到480的答案，对此，考生不妨自己上机一试。
更多“在窗体上添加—个文本框,名为Text1,然后编写如下的Load事件过程,则程序的运行结果是Private Sub F ”相关问题

  • 第1题：

    在窗体上添加一个文本框，名为Textl，然后编写如下的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 Sub

    A．在文本框中显示120

    B．文本框仍为空

    C．在文本框中显示480

    D．出错


    正确答案：D
    解析：本题表面在考查For循环控制语句的使用，但解题的关键是理解Text文本框SetFocus方法的正确使用，在触发窗体Form的Load事件时，使用SetFocus将发生冲突，在VisualBasic上调试本题的程序将显示“错误的过程调用或函数”提示。本题选择D项。如果删除SetFocus方法的使用，文本框中将显示480。如果用控制按钮的Click事件触发该段事件过程，文本框也会得到480的答案，对此，考生不妨自己上机一试。

  • 第2题：

    在窗体上添加一个文本框，名为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．出错


    正确答案：D

  • 第3题：

    在窗体上添加一个文本框，名称为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．出错


    C

  • 第4题：

    在窗体上添加一个文本框，名为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．出错


    正确答案：D

  • 第5题：

    在窗体上添加一个文本框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．出错


    正确答案：D
    解析：本题中“Text1.SetFocus”语句运行时会出现错误。因为焦点只能移到可视的窗体或控件，而在窗体的Load事件完成前窗体或窗体上的控件是不可视的，所以编译出错。如果不是在Form.Load事件过程完成之前首先使用Show方法显示窗体的话，是不能使用SetFocus方法将焦点移至正在自己的Load事件中加载的窗体的。

相关内容