itgle.com

设窗体上有一个名为Text1的文本框，并编写如下程序：Private Sub Form_Load（）ShowText1.Text = ""Text1.SetFocusEnd SubPrivate Sub Form_MouseUp（Button As Integer, _Shift As Integer, X As Single, Y As Single）Print "程序设计"End SubPrivate Sub Text1_KeyDown（KeyCode As Integer, Shift As Int

题目

设窗体上有一个名为Text1的文本框，并编写如下程序：

Private Sub Form_Load（）

Show

Text1.Text = ""

Text1.SetFocus

End Sub

Private Sub Form_MouseUp（Button As Integer, _

Shift As Integer, X As Single, Y As Single）

Print "程序设计"

End Sub

Private Sub Text1_KeyDown（KeyCode As Integer, Shift As Integer）

Print "Visual Basic";

End Sub

程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗体上显示的内容是（ ）。

A．Visual Basic

B．程序设计

C．Visual Basic程序设计

D．a程序设计

相似考题

1.在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text=" Text1.SetFocus End Sub Phvate Sub Form_MouseUp(Buuon As Integer,Shift As Integer,X As Single，Y As Single) Phnt“程序设计” End Sub Private Sub Textl_KeyDowA．Visual BasicB．程序设计C．A程序设计D．VisualBasic程序设计

2.设窗体上有一个名为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text=" " Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer， Shift As Integer，X As Single，Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer，Shift As Integer) Print "Visual Basic"； End Sub 程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗本上显示的内容是A．Visual BasicB．程序设计C．Visual Basic程序设计D．a程序设计

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

4.设窗体上有一个名为Text1的文本框，并编写如下程序：Private Sub Form_Load() Show Text1.Text="" Text1.SetFocusEnd SubPrivate Sub Form_MouseUp(Button As Integer，_Shift As Integer,X As Single,Y As Single） Print"程序设计"End SubPrinvate Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print "Visual Basic";End Sub 程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗体上显示的内容是。A．Visual BasicB．程序设计C．Visual Basic 程序设计D．a程序设计

更多“设窗体上有一个名为Text1的文本框,并编写如下程序:PrivateSubForm_Load() Show Text1.Tex ”相关问题

  • 第1题：

    在窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，并编写有如下事件过程：程序运行后，单击命令按钮，在文本框中显示的是（ ）。

    A. 2

    B. 3

    C. 4

    D. 5


    正确答案：B
    B)    【解析】本题考查循环程序的分析。题中循环变量为i，步长为1，循环体中i每次变化都增加3，因此执行一次循环后，i的值增加4，当i大于10时退出循环，所以每次循环后i的值为：3，7，11。当i为11时退出循环，所以循环共执行了3次。

  • 第2题：

    设窗体上有一个名为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1. Text="" Text1. SetFocus End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Sinqle) Print"程序设计" End Sub Private Sub Text1_Keynown(KeyCode As Integer, Shift As Integer) Print "Visual Basic"; End Sub 程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗体上最示的内容是

    A．Visual Basic

    B．程序设计

    C．Visual Basic程序设计

    D．a程序设计


    正确答案：C
    解析：Form_MouseUp是鼠标放开时触发的事件，而Text1_KeyDown是键盘按下时触发的事件。当在文本框中输入“a”时触发文本框的键盘事件，则窗体上输出Visual Basic，当单击窗体后触发的是窗体的MouseUp事件，则在窗体上又输出了“程序设计”，所以窗体上显示的是“Visual Basic程序设计”。

  • 第3题：

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


    正确答案：C
    解析：焦点只能移到可视的窗体或控件。因为在窗体的Load事件完成前窗体或窗体上的控件是不可视的，所以如果不是在Form_Load事件过程完成之前首先使用Show方法显示窗体的话，是不能使用SetFocus方法将焦点移至正在自己的Load事件中加载的控件上的。

  • 第4题：

    设窗体上有一个名为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Text1.Text="" Text1.SetFocus End Sub Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single) Print"程序设计" End Sub Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print"Visual Basic"; End Sub 程序运行后，如果在文本框中输入字母“a”，然后单击窗体，则在窗体上显示的内容是______。

    A． Visual Basic

    B．程序设计

    C．Visual Basic程序设计

    D．a程序设计


    正确答案：C
    解析：因为程序一运行，文本框Text1获得焦点，按下“a”键后，执行Text1 KeyDown事件，在窗体上显示“Visual Basic”；这时再单击窗体，则触发Form_MouseUp事件，在窗体上显示“程序设计”。

  • 第5题：

    在窗体上画一个名称为Text1的文本框，并编写如下程序： Private Sub Form_Load() Show Textl.Text="" Textl.Set Focus End Sub Private Sub Form_MouseUp(Button As Inateger,Shift As Integer,X As Single,Y As Single) Frint"程序设计" End Sub Private Sub Textl_KeyDown(KeyCode As InteSer,Shin As Integer) Print"VisualBasic"； End Sub 程序运行后，如果按A键，然后单击窗体，则在窗体上显示的内容是______。

    A．Visual Bask

    B．程序设计

    C．A程序设计

    D．ViualBasic程序设计


    正确答案：D
    解析：因为程序一运行，文本框Textl获得焦点，按下A键后，执行Textl_KeyDown事件，在窗体上显示“VisualBasic”；这时再单击窗体，则触发Form_MouseUp事件，在窗体上显示“程序设计”。

相关内容