执行后将会删除编辑框组件Text1中的文本内容的语句是（） A、Text1.Text=”B、Text1. MaxLength=0C、Text1.Clear=D、Text1. SelText.Clear=

题目

执行后将会删除编辑框组件Text1中的文本内容的语句是（） 

  • A、Text1.Text=”
  • B、Text1. MaxLength=0
  • C、Text1.Clear=
  • D、Text1. SelText.Clear=
相似考题

1.设窗体上有一个文本框，名称为Text1，程序运行后，要求该文本框只能显示信息，不能接收输入信息，以下能实现该操作的语句是______。A．Text1. MaxLength=0B．Text1. Enabled=FalseC．Text1. Visible=FalseD．Text1. Width=0

2.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串： Microsoft Visual Basic Programming 然后编写如下事件过程： Private Sub Command1_CIick() Open"d:\temp\outf. txt" For Output As #1 For i=1 To Len(Text1. Text) c=Mid(Text1. Text, i, 1) If c＞="A" And c＜="Z" Then Print #1, LCase(c)End If Next i Close End Sub 程序运行后，单击命令按钮，文件outf. txt中的内容是______。A．MVBPB．mvbpC．M V B PD．m v b p

3.在窗体上画一个文本框(其中Name属性为Text1)，然后编写如下事件过程： Private Sub Form_ Load() Text1.Text=“” Text1.SetFocus For i=1 To 10 Sum=Sam+ i Next i Text1.Text=Sam End Sub上述程序的运行结果是______ 。A．在文本框Text1中输出55B．在文本框Text1中输出0C．出错D．在文本框Text1中输出不定值

4.在窗体上画一个名称为Commaudl的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程； Private Sub Command1_Click() n=Text1. Text Select Case n Case 1 To 20 x=10 Case 2, 4, 6 x=20 Case Is＜10 x=30 Case 10 x=40 End Select TextText=x End Sub 程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是______。A．10B．20C．30D．40

参考答案和解析
正确答案:A
更多“执行后将会删除编辑框组件Text1中的文本内容的语句是（） A、Text1.Text=”B、Text1. MaxLength=0C、Text1.Clear=D、Text1. SelText.Clear=”相关问题

  • 第1题：

    以下能够触发编辑框(Edit)组件OnChange事件的操作是( )。

    A. 鼠标单击编辑框

    B. 鼠标双击编辑框

    C. 在编辑框中选择文本

    D. 在编辑框中输入文本


    参考答案D

  • 第2题：

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

    A．在文本框中显示120

    B．文本框中仍为空

    C．在文本框中显示480

    D．出错


    正确答案：C
    解析：计算过程为10×8×6=480。text1. SetFocus是设置文本框为焦点，通过本方法可使光标指向指定的文本框。

  • 第3题：

    如下图所示，只执行下列程序后，有Text1.Text=Text1，文本框不能出现“*****”的程序是______。

    A．Private Sub form_ Load() Text1. Text="*****"End Sub

    B．Private Sub form_ Load() Text1. PasswordChar=“*”End Sub

    C．Private Sub form_ Load() Text1. Visible="*****" End Sub

    D．Private Sub form. Load() Text1. Text= String(5，"*")End Sub


    正确答案：C
    解析：本题中，“Text1. PasswordChar=“*””是设置文本框的命令属性，将“Text1”转换成“*****”。 “Text1. Visible“*****””是错的。

  • 第4题：

    在窗体上画一个名称为Text1的文本框．然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图16-6所示。 以下能实现上述操作的程序段是______。

    A．Private Sub HScroll1_Change() Text1.Text=HScroll1. Value End Sub

    B．Private Sub HScroll1_Click() Text1. Text=HScroll1. Value End Sub

    C．Private Sub HScroll1_Change() Text1. Text=HScroll1. Caption End Sub

    D．Private Sub HScroll1_Click() Text1. Text=HScroll1. Caption End Sub


    正确答案：A
    解析：移动HScrollBar(水平滚动条)和VScrollBar(垂直滚动条)滚动框部分或通过代码改变Value属性的设置时，将激括Chang事件。其Value属性(默认值为0)是一个整数，它对应于滚动框在滚动条中的位置。当滚动框位置在最小值时，它将移动到滚动条的最左端位置(水平滚动条)或顶端位置(垂直滚动条)。当滚动框在最大值时，它将移动到滚动条的最右端或底端位置。

  • 第5题：

    在窗体上添加一个文本框Text 1，然后编写如下的Load事件过程，则程序运行结果为( )。 Private Sub Form_Load0 Text1. Text="" Text1. SetFocus For k = 1 To 5 t=t*k Next k Text1.Text = tEnd Sub

    A．在文本框中显示120

    B．文本框中仍为空

    C．在文本框中显示1

    D．出错


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

  • 第6题：

    在窗体上有一个文本框Text1，Text属性值为空，然后编写下列事件过程：

    Private Sub Text1 KeyPress(KeyAscii As Integer)

    Dim str As String,n As Integer

    str=UCase(Chr(KeyAscii))

    n=Len(str)

    Text1.Text=String(n,str)

    End Sub

    程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。

    A．pp

    B．pP

    C．PP

    D．Pp


    正确答案：B
    解析：解答本题的前提是了解下列几个函数的作用：UCase函数的作用是将某字符串中的字符全部转成大写；String(n,str)函数的作用是返回n个重复字符的字符串；Len函数的作用是返回字符串的长度。因为KeyPress事件中接收KeyAscii参数为输入键的ASCII码，输入小写字母“p”后，str为大写字母“P”，n=1，String(n,str)为“P”，所以Text1中在按下键盘上的键时又添加了一个“P”。

  • 第7题：

    在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序： Private Sub Form_Load0 Show Text1.Text="" Text2.Text="" Text1.SetFocus End Sub Private Sub Text1 Change() Text2.Text=Mid(Text1.Text,8) End Sub 程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是( )。

    A．BeijingChina

    B．China

    C．Beijing

    D．BeijingC


    正确答案：B

  • 第8题：

    在窗体上画一个名称为Text1的文本框，要求文本框只能接收大写字母的输入。以下能够正确实现该操作的事件过程是______。

    A．Private Sub Text1_ KeyPress (KeyAscii As Integer) IfKeyAscii ＜ 65 Or KeyAscii ＞ 9t Then MsgBox “请输入大写字母” End If End sub

    B．Private Sub Text1_ KeyDown (KeyCode As Integer, Shift As Integer) IfKeyCode ＜ 65 Or KeyCode ＞ 91 Then MsgBox “请输入大写字母” End If End sub

    C．Private Sub Text1_ MouseDown (Button As Integer, _ Shift As Integer, X As Single, YAs SinglE)IfAsc (Text1.Text) ＜ 65 Or Asc (Text1. Text) ＞ 91 Then MsgBox “请输入大写字母” End If End sub

    D．Private Sub Text1_ Change() IfAsc(Text 1.Text) ＜ 65 Or Asc(Text1. Text) ＞ 91 Then MsgBox “请输入大写字母” End If End sub


    正确答案：A

  • 第9题：

    以下能够触发编辑框（Edit）组件OnChange事件的操作是（）

    • A、鼠标单击编辑框
    • B、鼠标双击编辑框
    • C、在编辑框中选择文本
    • D、在编辑框中输入文本

    正确答案:D

  • 第10题：

    要在文本框Text1中显示“欢迎使用VB”，以下（）语句是正确的。

    • A、Text1.text=欢迎使用VB
    • B、Text1=”欢迎使用VB”
    • C、Text1.text=’欢迎使用VB’
    • D、Text1.caption=”欢迎使用VB”

    正确答案:B

  • 第11题：

    单选题
    执行后将会清空文本框Text1中文本的语句是（）
    A

    Text1.Clear

    B

    Text1.SelText=

    C

    Text1.text=

    D

    Text1.SelText.Clear


    正确答案： B
    解析： 暂无解析

  • 第12题：

    单选题
    在窗体上画一个文本框（其Name属性为Text1），然后编写如下事件过程：Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor i= 1 To 9Sum=Sum+iNext iText1.Text=SumEnd Sub上述程序的运行结果是（　　）。
    A

    在文本框Text1中输出45

    B

    在文本框Text1中输出0

    C

    出错

    D

    在文本框Text1中输出不定值


    正确答案： C
    解析：
    由于Form_load事件是在窗体加载时发生，所以此时窗体还没有显示，不能用“Text1.SetFocus”语句获得焦点，故出错。如要改正，需要在此语句前加入“Me.Show”，显示窗体，则可以看到文本框已获得焦点，并执行循环语句，输出“45”。

  • 第13题：

    要使文本框Text1不可用且文字居中，可以用以下语句 ______。

    A．Text1. Enabled = False Text1.Alignmem = 2

    B．Text1. Enabled = False Text1. Alignment = 0

    C．Text1. Enabled = True Text1. Alignment = 0

    D．Text1. Enabled = True Text1. Alignment = 1


    正确答案：A
    解析：文本框的Enable属性为True时，文本框可用：为False时，文本框不可用。文本框的Alignmem属性有3个值，0、1、2，分别对应文本框中内容的左、右、居中对齐。

  • 第14题：

    要使文本框Text1不可用且文字居中，可通过 ______来实现。

    A．Tex1. Enabled=False Text1. Alignment=0

    B．Tex1. Enabled=True Tex1. Alignment=0

    C．Tex1. Enabled=False Text1. Alignment=1

    D．Tex1．Enabled=False Text1.Alignment=2


    正确答案：D
    解析：文本框有一个Enabled属性，当它的值为True时，文本框可用，当其值为假时，文本框不可用：文本框还有一个属性Alignment，它用来决定文本框中显示文本的对齐方式，当给它赋值0时，文本框中的内容左对齐，当给它赋值1时，文本框中的内容右对齐，当给它赋值2时，文本框中的内容居中显示。

  • 第15题：

    在窗体上画一个命令按钮和一个文本框(名称分别为Command1和Text1)，并把窗体的KeyPreview属性设置为True，然后编写如下代码：Dim SaveAll As StringPrivate Sub Form_ Load () Show Text1.Text=" " Text1.SetFocusEnd SubPrivate Sub Command1_ Click() Text1. Text=LCase(SaveAll)+SaveAllEnd SubPrivate Sub Form_ KeyPress (KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAscii)End Sub程序运行后，直接用键盘输入：VB，再单击命令按钮，则文本框中显示的内容为 ______。

    A．vbVB

    B．不显示任何信息

    C．VB

    D．出错


    正确答案：A
    解析：KeyPreview属性，返回或设置一个值，以决定是否在控件的键盘事件之前激活窗体的键盘事件。键盘事件为：KeyDown、KeyUp和KeyPress。当KeyPreview的值为True时窗体先接收键盘事件，然后是活动控件接收事件；为False时(缺省值)活动控件接收键盘事件，而窗体不接收。
      KeyPress将每个字符的大、小写形式作为不同的键代码解释，即作为两种不同的字符。
      本题中，由于Form的KeyPreview属性为True，窗体先接收键盘事件。当键入V时，窗体的KeyPress事件产生，此时KeyAscii=119，Chr(KeyAscii)=V，SaveAll=V，当键入B时，KeyAscii=98，Chr(KcyAscii)=B，SaveAll=VB，Text1中的内容为vbVB。

  • 第16题：

    设窗体上有一个名为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程序设计”。

  • 第17题：

    在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下事件过程：

    Private Sub Form_ Lead()

    Show

    Text1.Text = " "

    Text2.Text = " "

    Text2.SetFocus

    End Sub

    Private Sub Text2_ KeyDown (KeyCode As Integer, Shift As Integer)

    Text1.Text = Text1.Text + Chr (KeyCode - 4)

    End Sub

    程序运行后，如果在Text2文本框中输入efghi，则Text1文本框中的内容是______。


    正确答案：ABCDE
    ABCDE

  • 第18题：

    在窗体上画一个文本框(名称为Text1)和一个标签(名称为Labe11)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。下列可以实现上述操作的事件过程是（ ）。

    A.Private Sub Text1 Change（ ） Labe11．Caption=Str(Len(Text1．Text)) End Sub

    B.Private Sub Text1 Click（ ） Labe11．Caption=str(Len(Text1．Text)) End Sub

    C.Private Sub Text1 Change（ ） Labe11．Caption=Text1．Text End Sub

    D.Private Sub Labe1 1_Change（ ） Labe11．Caption=Str(Len(Text1．Text)) End Sub


    正确答案：A
    A。【解析】为使文本框中每输入一个-$-符时标签即能显示其字符个数，可编写文本框的change事件过程。Len函数可用于取得字符串的长度。

  • 第19题：

    在窗体上画一个名称为Text1的文本框，要求文本框只能接收大写字母的输入，以下能实现该操作的事件过程是______。

    A．Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii＜65 Or KeyAscii＞90 Then MsgBox"请输入大写字母" KeyAscii=0 End If End Sub

    B．Private Sub Text1_KeyDown(Keycode As Integer, Shift As Integer) If KeyCode＜65 Or Keycode＞90 Then MsgBox"请输入大写字母" KcyCode=0 End If End Sub

    C．Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Asc(Text1. Text)＜65 Or Asc(Text1. Text)＞90 Then MsgBox"请输入大写字母" End If End Sub

    D．Private Sub Text1_Change() If Asc(Text1. Text)＞64 Or Asc(Text1. Text)＜91 Then MsgBox"请输入大写字母" End If End Sub


    正确答案：A
    解析：当在文本框Text1中输入字符时，会激活Text1_KeyPress、Text1_KeyDown和Text1_Change过程，选项C是错误的；KcyDown事件中所得到的KeyCode码(KeyDown事件的参数)65与按字母键“a”是相同的，不能符合题意，选项B是错误的；条件“Asc(Text1.Text)＞64OrAsc(Text1.Text)91”满足字母大写的要求，不符合题意，选项D是错误的；选项A是正确的。

  • 第20题：

    执行后将会清空文本框Text1中文本的语句是（）

    • A、Text1.Clear
    • B、Text1.SelText=""
    • C、Text1.text=""
    • D、Text1.SelText.Clear

    正确答案:C

  • 第21题：

    下列哪个操作可以清除文本框对象Text1的内容（）。

    • A、Text1.Text=""
    • B、Text1.cls
    • C、Text＝""
    • D、cls

    正确答案:A

  • 第22题：

    单选题
    执行后将会删除编辑框组件Text1中的文本内容的语句是（）
    A

    Text1.Text=”

    B

    Text1. MaxLength=0

    C

    Text1.Clear=

    D

    Text1. SelText.Clear=


    正确答案： D
    解析： 暂无解析

  • 第23题：

    单选题
    变量S为字符型，若在文本框Text1、Text2中分别输入数字23和35，再执行以下语句，S的值为“58”的是（）
    A

    S=Text1.Text&Text2.Text

    B

    S=Text1.Text+Text2.Text

    C

    S=Val（Text1.Text）+Text2.Text

    D

    S=Val（Text1.Text）&Text2.Text


    正确答案： C
    解析： 暂无解析

相关内容