假定窗体上有一个Text文本框，为使它的文本内容位于中间并且没有边框，则正确的属性设置为（）。A、Textl.Alignment=1Textl.BorDerStyle=1B、Textl.Alignment=2Textl.BorDerstyLe=1C、Textl.Alignment=1Textl，BorDerstyle=0D、Textl.Alignment=2Textl.BorDerStyle=0

题目

假定窗体上有一个Text文本框，为使它的文本内容位于中间并且没有边框，则正确的属性设置为（）。

  • A、Textl.Alignment=1Textl.BorDerStyle=1
  • B、Textl.Alignment=2Textl.BorDerstyLe=1
  • C、Textl.Alignment=1Textl，BorDerstyle=0
  • D、Textl.Alignment=2Textl.BorDerStyle=0
相似考题

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

2.（ 12 ）在窗体上有一个名为 Text1 的文本框。当光标在文本框中时，如果按下字母键 “ A ” ，则被调用的事件过程是A ） Form_KeyPress()B ） Text1_LostFocus()C ） Text1_Click()D ） Test1_Change()

3.在窗体上有若干控件，其中有一个名称为Text1的文本框。影响Text1的Tab顺序的属性是( )。A．TabStopB．EnabledC．VisibleD．Tablndex

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

更多“假定窗体上有一个Text文本框，为使它的文本内容位于中间并且没有”相关问题

  • 第1题：

    （18）在窗体上有一个文本框Text1、Text属性值为空，然后编写下列事件过程： Privte 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”。

  • 第2题：

    假设窗体上有一个命令按钮Cmd1，一个文本框Text1。要求单击命令按钮后，在文本框中显示的内容为"ABC"，则该单击事件中相应的过程代码是______。

    A．Text1.Name="ABC"

    B．Text1.Text="ABC"

    C．Text1.Caption=ABC

    D．Text1.Text=ABC


    正确答案：B

  • 第3题：

    在窗体上画两个文本框和一个命令按钮，然后在命令按钮的代码窗口中编写如下事件过程：

    Private Sub Command1_Click()

    Text 1="VB programming"

    Text 2=Text 1

    Text 1="ABCD"

    End Sub

    程序运行后，单击命令按钮，文本框Text 2中显示的内容为【 】。


    正确答案：VB programming
    VB programming 解析：本段程序是先把“VB programming”赋给Text 1，然后在把Text 1的内容赋给Text 2，最后把“ABCD”赋给Text 1。所以最后Text 1中的内容是“ABCD”，而Text 2中的内容是“VB programming”。

  • 第4题：

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

    打开窗体运行后，单击命令按钮，文本框中显示的内容是( )。


    正确答案：12
    12 解析： 本题考查的是VBA编程基础、参数传递。由于VBA中，默认情况下，参数是按地址传递(ByRef)，结果会返回。本题中z的值等于x+y，所以文本框中显示的内容为12。

  • 第5题：

    窗体上有一个文本框，其Name属性为Text1，如图1所示，并有如下事件过程：上述程序的运行结果是（ ）。

    A. 在文本框Text1中输出55

    B. 在文本框Text1中输出0

    C. 语法错误

    D. 在文本框Text1中输出不定值


    正确答案：C
    C)    【解析】本题考查窗体Load事件的运行。当装
    入窗体事件触发时，通常用于对属性和变量的初始化，不能调用setFOCUS方法，因此程序编译出错。

  • 第6题：

    在窗体上有一个文本框，其名称为Text1，编写下列事件过程：

    Private Sub Text1_KeyPress(KeyAscii As Integer)

    Dim str As String

    str=Chr(KeyAscii)

    KeyAscii=Asc(UCase(str))

    Text1.Text=Stririg(2,KeyAscii)

    End Sub

    程序运行后，如果在键盘上输入字母“a”，则在文本框Text3中显示的内容为( )。

    A．aaa

    B．AAA

    C．AA

    D．aa


    正确答案：B
    解析：UCase(str)将str转成大写的字符串；String(n,character)返回n个重复的字符，如果character是ASCII码，则返回其对应的字符。程序运行过程为：首先输入字母“a”，并通过“str=Chr(KeyAscii)”语句将a的ASCII值转换成字符串；然后通过“KeyAscii=Asc(UCase(str))”求得大写A的ASCII值，并显示在文本框中；最后通过“Text1.Text=String(2,KeyAscii)”语句为文本框输入了两个字母“A”，所以最后在文本框中显示出3个大写字母“A”。

  • 第7题：

    在窗体上有一个文本框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”。

  • 第8题：

    假定窗体上有一个文本框，名为txt1，为了使该文本框的内容能够换行，并且具有垂直滚动条，没有水平滚动条正确的属性设置为

    A．Txt1.MultiLine=True Txt1.ScrollBars=0

    B．Txt1.MuhiLine=True Txt1.ScrollBars=2

    C．Txt1.MuhiLine=False Txt1.ScrollBars=0

    D．Txt1.MuhiLine=False Txt1.ScrollBars=3


    正确答案：B
    解析：Multine如果设置为True，可以使用多行文本，即在文本框中输入或输出文本时可换行，并在下一行接着输入或输出。Scmllbars用来确定文本框中没有滚动条，可以取0、1、2、3四个值，其含义分别为：0表示没有滚动条；1表示只有水平滚动条；2表示只有垂直滚动条；3表示同时具有水平滚动条和垂直滚动条。

  • 第9题：

    假定窗体上有一个文本框，名为Text1，为了使该文本框的内容能够换行，并且具有水平和垂直滚动条．正确的属性设置为（ ）。

    A．Txt1.Multiline＝True

    Txt1.ScrollBars＝0

    B．Txt1.Multine＝True

    Txt.ScrollBars＝3

    C．Txt1.Multiline＝＝False

    Txt1.ScrollBars＝0

    D．Txt1.MultiLine＝False

    Txt1.ScrollBars＝3


    正确答案：B
    只能在A和B中选择，ScrollBars取值0～3，显然0的含义没有滚动条，1和2是分别有水平和垂直滚动条，所以选择B。

  • 第10题：

    在VB中，若要使一个文本框（Text）中的内容在超过文本框的宽度时能够自动换行显示，应当将这个文本框的multiline属性的值设置为*36、在VB中，若要改变一个窗体的标题，应在属性窗口中改变这个窗体的（）属性的值。


    正确答案:true

  • 第11题：

    学生信息窗体”上有一个文本框控件，文本框的名称是：Text0，在宏的表达式中要引用这个文本框的值，下面正确的是（）

    • A、[Forms]![学生信息窗体]![text0]
    • B、[Forms]![text0]
    • C、[学生信息窗体]![text0]
    • D、都不对

    正确答案:A

  • 第12题：

    单选题
    假定窗体上有一个Text文本框，为使它的文本内容位于中间并且没有边框，则正确的属性设置为（）。
    A

    Textl.Alignment=1Textl.BorDerStyle=1

    B

    Textl.Alignment=2Textl.BorDerstyLe=1

    C

    Textl.Alignment=1Textl，BorDerstyle=0

    D

    Textl.Alignment=2Textl.BorDerStyle=0


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

  • 第13题：

    在窗体上有一个命令按钮和一个文本框，其名称分别为Command1和text1，把文本框的Text属性设置为空白，然后编写如下事件过程：PrivatesubCommand1_click()A=inputbox(“Enteraninteger”)B=inputbox(“Enteraninteger”)Text1.text=b+aEndsub程序运行后，单击命令按钮，如果在输入对话框里输入8和10，则文本框中显示的内容是()。

    A.108

    B.18

    C.810

    D.出错


    正确答案:A

  • 第14题：

    窗体上有三个文本框Text1、Text2和Text3以及一个命令按钮Command1，设文本框Text1中内容为 12，文本框Text2中内容为34。下面程序的执行结果为______。Private Sub Command1_ Cilick() Text3.Text = Str＄(Val(Text1.Text)) + Val(Text2.Text) Print val(Text3,Text)End Sub

    A．12

    B．34

    C．46

    D．1234


    正确答案：C
    解析：Val()返回包含于字符申的数字；Str＄0是将数字转成字符串。数字字符串加数字的结果是：字符串自动转成数字后，再加上数字。计算过程为“12+34=46”。

  • 第15题：

    假定窗体上有一个文本框，名为txtl，为了使该文本框的内容能够换行，并且具有垂直滚动条，没有水平滚动条正确的属性设置为

    A．Txtl.MultiLine=True Txtl.ScrollBars=0

    B．Txtl.MultiLine=True Txtl.ScrollBars=2

    C．Txtl.MulfiLine=False Txtl.ScrollBars=0

    D．Txtl.MultiLine=False Txtl.ScrollBars=3


    正确答案：B
    解析：本题考查文本框的属性。MultiLine如果设置为True，可以使用多行文本，即在文本框中输入或输出文本时可以换行，并在下一行接着输入或输出。ScrollBars用来确定文本框中有没有滚动条，可以取0、1、2、3四个值，其含义分别为：0表示没有滚动条；1表示只有水平滚动条； 2表示只有垂直滚动条；3表示同时具有水平滚动条与垂直滚动条，故本题应选择B项。

  • 第16题：

    假定窗体上有一个标签，名为Label1，为了使该标签透明并且没有边框，则正确的属性设置为（ ）。


    正确答案：A
    A)    【解析】本题考查标签的属性。标签的BackStyle. 属性表示标签的背景是否透明(1表示不透明，0表示透明)。标签的BorderStyle属性表示是否含有边框(1表示有边框，0表示没有边框)。

  • 第17题：

    假定窗体上有一个标签，名为Label。为了使该标签透明并且没有边框，则正确的属性设置为（ ）。


    正确答案：A
    A)    【解析】标签控件的BackStyle属性是设置背景，当BackStyle属性值设置为0时，则标签为“透明”的，当BackStyle属性值设置为1时，则标签为将覆盖背景；标签控件的BorderStyle
    属性是设置标签的边框，当BorderStyle属性值设置为0时，则标签无边框，当BorderStyle属性值设置为1时，则标签有边框。因此选项A正确。

  • 第18题：

    在窗体上有一个文本框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.A.pp B.pP C.ｐｐ D.Pp

    B.


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

  • 第19题：

    假定窗体上有一个文本框，名为Txt1，为了使文本框的内容能够操作，并且具有水平和垂直滚动条，正确的属性设置为 ( )

    A．Txt1. MultiLine=True Txt1. SerollBars=0

    B．Txt1. MultiLine=True Txtl. SerollBars=3

    C．Txt1. MultiLine=False Txt1.ScrollBars=0

    D．Txtl. MultiLine=False Txt1.ScrollBars=3


    正确答案：B
    解析：本题主要考查文本框的两个属性。MultiLine属性设置是否可以输入多行文本，当为True时，具有自动换行功能。 ScrollBars属性是用来设置滚动条模式的。 0——无，1——水平，2——垂直，3——水平和垂直，只有MultiLine为True时，该属性才有效，且此时不能自动换行。根据以上知识点，结合题意可知选项B正确。

  • 第20题：

    窗体上有一个命令按钮和一个文本框，程序执行后，在文本框中输入12345，单击命令按钮后的输出结果为( )。 Private Sub Command1_Click() Dim A As Integer,B As Integer Text1.SelStart=2 Text1.SelLength=2 A=Val(Text1.SelText) B=Len(Text1.Text) Print A*B End Sub

    A．68

    B．115

    C．170

    D．1170


    正确答案：C

  • 第21题：

    窗体上有文本框Text1和若干复选框，以下程序的功能是：当复选框Check1选中时，设置文本框Text1上显示的文本字号20。
    1；FontSize
    略

  • 第22题：

    假定窗体上有一个Text文本框，应用的属性设置为Textl．Alignment=2Textl．BorDerStyle=0，则表示（）。

    • A、文本内容左齐无边框
    • B、文本内容右齐有边框
    • C、文本内容居中有边框
    • D、文本内容居中且无边框

    正确答案:D

  • 第23题：

    单选题
    假定窗体上有一个Text文本框，应用的属性设置为Textl．Alignment=2Textl．BorDerStyle=0，则表示（）。
    A

    文本内容左齐无边框

    B

    文本内容右齐有边框

    C

    文本内容居中有边框

    D

    文本内容居中且无边框


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

相关内容