[单选题]

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

Private Sub Form_Load()

Show

Text1.Text = ""

Text1.SetFocus

E.nd Sub

Private Sub Form_MouseUp(Button As Integer, _

Shift As Integer, X As Single, Y As Single)

Print "程序设计"

E.nd Sub

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)

Print "Visual Basic";

E.nd Sub

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

A.Visual Basic

B.程序设计

C.Visual Basic程序设计

D.a程序设计

参考答案与解析:

相关试题

设窗体上有一个名为Text1的文本框,并编写如下程序:Private Sub F

[单选题]设窗体上有一个名为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

  • 查看答案
  • 设窗体上有一个名为Text1的文本框,并编写如下程序:Private Sub F

    [单选题]设窗体上有一个名为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,Sh

  • 查看答案
  • 设窗体上有一个名为Text1的文本框,并编写如下程序:Private Sub F

    [单选题]设窗体上有一个名为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,Sh

  • 查看答案
  • 设窗体上有一个名为Text1的文本框,并编写如下程序:Private Sub F

    [单选题]设窗体上有一个名为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 Integ

  • 查看答案
  • 在窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮,并编写

    [单选题]在窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮,并编写有如下事件过程:程序运行后,单击命令按钮,在文本框中显示的是( )。A. 2B. 3C. 4D. 5

  • 查看答案
  • 窗体上添加一个文本框Text1,编写如下代码:Private Sub Text1

    [单选题]窗体上添加一个文本框Text1,编写如下代码: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode+5) & KeyCode End Sub 程序运行时,在文本框中输入“ab”,则在窗体上输出为( )。A.F65 G66B.F65 F66C.G66 F65D.G65 G66

  • 查看答案
  • 窗体上添加一个文本框Text1,编写如下代码:Private Sub Text1

    [单选题]窗体上添加一个文本框Text1,编写如下代码: Private Sub Text1_KeyDown(KeyCode As Integer,Shift As Integer) Print Chr(KeyCode+5)&KeyCode End sub 程序运行时,在文本框中输入“ab”,则在窗体上输出为( )。A.F65 G66B.F65 F66C.G66 F65D.G65 G66

  • 查看答案
  • 在窗体上画一个名称为Text1的文本框,并编写如下程序:Private Sub

    [单选题]在窗体上画一个名称为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.

  • 查看答案
  • 在窗体上画一个名称为Text1的文本框,并编写如下程序: Private Sub

    [单选题]在窗体上画一个名称为Text1的文本框,并编写如下程序: Private Sub Form Load( ) Show Text1.Text="" Text1.SetFocus End Sub Pfivate Sub Form_MouseUp(BuHon As Integer,Shift As Integer,X As Single,Y As Single) Print“程序设计” End Sub Private Sub Text1_KeyDown(KeyCode As Integer,shi

  • 查看答案
  • 在窗体上画一个名称为Text1的文本框,并编写如下程序: Private Sub

    [单选题]在窗体上画一个名称为Text1的文本框,并编写如下程序: Private Sub Form_Load( ) Show TextText = " " TextSetFocus End Sub Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y _ As Single) Print "程序设计" End Sub Private Sub Text1_Ke!tDown(KeyCode As In

  • 查看答案
  • 设窗体上有一个名为Text1的文本框,并编写如下程序:PrivateSubFor