itgle.com

在窗体上添加一个文本框Textl，然后编写下列Load事件过程，则程序运行结果是 。 Private Sub Form_LoadO Textl.Text=〞〞 Textl.SetFocus Fork=1 To 5 T=t﹡k Next k Textl.Text=t End SubA.在文本框中显示120 B.文本框中仍为空 C．在文本框中显示1 D.出错

题目

在窗体上添加一个文本框Textl，然后编写下列Load事件过程，则程序运行结果是 。 Private Sub Form_LoadO Textl.Text=〞〞 Textl.SetFocus Fork=1 To 5 T=t﹡k Next k Textl.Text=t End SubA.在文本框中显示120 B.文本框中仍为空 C．在文本框中显示1 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.在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮，然后编写如下事件过程：程序运行后，单击命令按钮，在文本框中显示的值是__________。

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.在窗体上画一个文本框(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

更多“在窗体上添加一个文本框Textl,然后编写下列Load事件过程,则程序运行结果是 。 Private Sub Form_L ”相关问题

  • 第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题：

    在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为Textl)，然后编写如下事件过程：


    正确答案：
    15【解析】本题考查VBA程序中过程调用的知识。由于VBA中，默认情况下，参数是按地址传递(ByRef)，对形参的改变会影响到实参。本题中2的值等于a b，这个z值会返回给实参c，所以文本框中显示的内容为15。

  • 第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事件中加载的窗体的。

相关内容