[单选题]

窗体中有一个名称为txtNoteEdit的文本框和一个名称为cmdCut的命令按钮,编写如下

程序段:

PrivateSubcmdCut_Click()

st=txtNoteEdit.SelText

txtNoteEdit.SelText=""

E.ndSub

当单击命令按钮后,程序执行的效果是( )

A.将txtNoteEdit中的所有内容存放到st变量中,并将txtNoteEdit选中的内容清除,实现了剪

B.将txtNoteEdit选中的内容存放到st变量中,并将txtNoteEdit中所有的内容清除,实现了剪

C.将txtNoteEdit选中的内容存放到st变量中,并将txtNoteEdit选中的内容清除,实现了剪切

D.以上说法都不正确

参考答案与解析:

相关试题

窗体中有一个名称为txtNoteEdit的文本框和两个名称分别为cmdCut和c

[单选题]窗体中有一个名称为txtNoteEdit的文本框和两个名称分别为cmdCut和cmdPaste的命令按钮,编写如下程序段:dimstasstringPrivateSubcmdCut_Click()st=txtNoteEdit.SelTexttxtNoteEdit.SelText=""E.ndSubPrivateSubcmdPaste_Click()txtNoteEdit.Text=Left(txtNoteEdit,txtNoteEdit.SelStart)+st+Mid(tx

  • 查看答案
  • 设在窗体上有一个名称为Commandl的命令按扭和一个名称为Textl的文本框。

    [单选题]设在窗体上有一个名称为Commandl的命令按扭和一个名称为Textl的文本框。要求单击Commandl按钮时可把光标移到文本框中。下面正确的事件过程是。 A.Private Sub Commandl_Click B.Private Sub Commandl_Click Textl.GotFocus Commandl.GotFocus End Sub End Sub C.Private Sub Commandl_Click D.Private Sub Commandl_Click Textl.S

  • 查看答案
  • 在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然

    [单选题]在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:Private Sub Commandl_Click()D.im i As Integer,n As IntegerF.or i=0 T0 50i=i+3n=n+1If i>10 Then Exit ForNextTextl.Text=Str(n)E.nd Sub程序运行后,单击命令按钮,在文本框中显示的值是A.2B.3C.4D.5

  • 查看答案
  • 在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令

    [单选题]在窗体上画一个名称为 Text1 的文本框和一个名称为 Commandl 的命令按钮,然后编写如下事件过程:Private Commandl_Click()D.im i As Integer, n As IntegerF.or i=0 To 50i = i+3n = n+1If i>10Then Exit ForNextTextl.Text=Str(n)E.nd Sub程序运行后,单击命命令按钮,在文本框中显示的值是( )。 A.5B.4C.3D.2

  • 查看答案
  • 窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体

    [单选题]窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序 如下: Private Type x a As Integer b As Integer End Type Private Sub Command1_Click() Dim y As x y.a=InputBox("") If y.a/2=y.a/2 Then y.b=y.a * y.a Else y.b=Fix(y.a/2) End If Text1.Text=y.b End Sub 对以上程序,下

  • 查看答案
  • 设窗体上有一个名称为CDl的通用对话框、一个名称为Textl的文本框和一个名称为

    [试题]设窗体上有一个名称为CDl的通用对话框、一个名称为Textl的文本框和一个名称为Commandl的命令按钮。程序执行时,单击Commandl按钮,则显示打开文件对话框,操作者从中选择一个文本文件,并单击对话框上的“打开”按钮后,则可打开该文字文件,并读人一行文本,显示在Textl中。下面是实现此功能的事件过程,请填空。 Private Sub Command1_Click CD1.Filter=“文本文件|*.txt|Word文档|*.doc” CDl.FilterIndex=1:CD1.Show

  • 查看答案
  • 在窗体中添加一个命令按钮,名称为Command1;添加一个文本框,名称为Text

    [单选题]在窗体中添加一个命令按钮,名称为Command1;添加一个文本框,名称为Text1,然后编写如下程序: Private Sub Commandl Click() Dim a(5), b(5) For j = 1 To 4 a(j) = 3 ( j b(j) = a(j) ( 3 Next j Text1.Text = b(j/2) End Sub 程序运行后,单击命令按钮,在文本框中显示A.25B.18C.36D.35

  • 查看答案
  • 在窗体(名称为Forml)上绘制一个名称为Text1的文本框和一个名称为Comm

    [单选题]在窗体(名称为Forml)上绘制一个名称为Text1的文本框和一个名称为Commandl的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是( )。A.Private Sub Texl_Change() Commandl.Caption="计算机等级考试” End SubB.PrivateSubCommandl_Click() Caption="计算机等级考试"C.Private Sub Com

  • 查看答案
  • 在窗体(名称为Forml)上画一个名称为Text1的文本框和一个名称为Comma

    [单选题]在窗体(名称为Forml)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是______。A. Private Sub Text1_Change() Commandl.Caption="计算机等级考试" End SubB.Private Sub Commandl_Click() Caption=”计算机等级考试” End SubC.Pr

  • 查看答案
  • 在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框,在

    [单选题]在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串:Microsoft Visual Basic Programming 然后编写如下事件过程: Private Sub Commandl_Click() Open"d:/temp/outf,txt"For Ouput As #1 For i=1 To Len(Text1.Text) c=Mid(Text1.Text,i,1) If c>="A"And C<="Z"Then Print

  • 查看答案
  • 窗体中有一个名称为txtNoteEdit的文本框和一个名称为cmdCut的命令按