网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
执行后将会删除编辑框组件Text1中的文本内容的语句是（）
- A、Text1.Text=”
- B、Text1. MaxLength=0
- C、Text1.Clear=
- D、Text1. SelText.Clear=
参考答案
更多 “执行后将会删除编辑框组件Text1中的文本内容的语句是（） A、Text1.Text=”B、Text1. MaxLength=0C、Text1.Clear=D、Text1. SelText.Clear=” 相关考题
考题
设窗体上有一个文本框，名称为Text1，程序运行后，要求该文本框只能显示信息，不能接收输入信息，以下能实现该操作的语句是______。A．Text1. MaxLength=0B．Text1. Enabled=FalseC．Text1. Visible=FalseD．Text1. Width=0
考题
在窗体上画一个名称为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
考题
在窗体上画一个名称为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
考题
在窗体上画一个文本框(其中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中输出不定值
考题
要使文本框Text1不可用且文字居中，可以用以下语句 ______。A．Text1. Enabled = False Text1.Alignmem = 2B．Text1. Enabled = False Text1. Alignment = 0C．Text1. Enabled = True Text1. Alignment = 0D．Text1. Enabled = True Text1. Alignment = 1
考题
在窗体上添加一个文本框，其名称为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 SubA．在文本框中显示120B．文本框中仍为空C．在文本框中显示480D．出错
考题
要使文本框Text1不可用且文字居中，可通过 ______来实现。A．Tex1. Enabled=False Text1. Alignment=0B．Tex1. Enabled=True Tex1. Alignment=0C．Tex1. Enabled=False Text1. Alignment=1D．Tex1．Enabled=False Text1.Alignment=2
考题
如下图所示，只执行下列程序后，有Text1.Text=Text1，文本框不能出现“*****”的程序是______。A．Private Sub form_ Load() Text1. Text="*****"End SubB．Private Sub form_ Load() Text1. PasswordChar=“*”End SubC．Private Sub form_ Load() Text1. Visible="*****" End SubD．Private Sub form. Load() Text1. Text= String(5，"*")End Sub
考题
在窗体上画一个命令按钮和一个文本框(名称分别为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．vbVBB．不显示任何信息C．VBD．出错
考题
在窗体上画一个名称为Text1的文本框．然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100。程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值，如图16-6所示。 以下能实现上述操作的程序段是______。A．Private Sub HScroll1_Change() Text1.Text=HScroll1. Value End SubB．Private Sub HScroll1_Click() Text1. Text=HScroll1. Value End SubC．Private Sub HScroll1_Change() Text1. Text=HScroll1. Caption End SubD．Private Sub HScroll1_Click() Text1. Text=HScroll1. Caption End Sub
考题
设窗体上有一个名为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 BasicB．程序设计C．Visual Basic程序设计D．a程序设计
考题
在窗体上添加一个文本框Text 1，然后编写如下的Load事件过程，则程序运行结果为( )。 Private Sub Form_Load0 Text1. Text="" Text1. SetFocus For k = 1 To 5 t=t*k Next k Text1.Text = tEnd SubA．在文本框中显示120B．文本框中仍为空C．在文本框中显示1D．出错
考题
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下事件过程：Private Sub Form_ Lead()ShowText1.Text = " "Text2.Text = " "Text2.SetFocusEnd SubPrivate Sub Text2_ KeyDown (KeyCode As Integer, Shift As Integer)Text1.Text = Text1.Text + Chr (KeyCode - 4)End Sub程序运行后，如果在Text2文本框中输入efghi，则Text1文本框中的内容是______。
考题
在窗体上有一个文本框Text1，Text属性值为空，然后编写下列事件过程：Private Sub Text1 KeyPress(KeyAscii As Integer)Dim str As String,n As Integerstr=UCase(Chr(KeyAscii))n=Len(str)Text1.Text=String(n,str)End Sub程序运行后，若在文本框中输入单字母“p”，则在文本框Text1中显示的内容为( )。A．ppB．pPC．PPD．Pp
考题
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Labe11)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。下列可以实现上述操作的事件过程是（ ）。A.Private Sub Text1 Change（ ） Labe11．Caption=Str(Len(Text1．Text)) End SubB.Private Sub Text1 Click（ ） Labe11．Caption=str(Len(Text1．Text)) End SubC.Private Sub Text1 Change（ ） Labe11．Caption=Text1．Text End SubD.Private Sub Labe1 1_Change（ ） Labe11．Caption=Str(Len(Text1．Text)) End Sub
考题
在窗体上画两个文本框，其名称分别为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．BeijingChinaB．ChinaC．BeijingD．BeijingC
考题
在窗体上画一个名称为Text1的文本框，要求文本框只能接收大写字母的输入，以下能实现该操作的事件过程是______。A．Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii＜65 Or KeyAscii＞90 Then MsgBox"请输入大写字母" KeyAscii=0 End If End SubB．Private Sub Text1_KeyDown(Keycode As Integer, Shift As Integer) If KeyCode＜65 Or Keycode＞90 Then MsgBox"请输入大写字母" KcyCode=0 End If End SubC．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 SubD．Private Sub Text1_Change() If Asc(Text1. Text)＞64 Or Asc(Text1. Text)＜91 Then MsgBox"请输入大写字母" End If End Sub
考题
在窗体上画一个名称为Text1的文本框，要求文本框只能接收大写字母的输入。以下能够正确实现该操作的事件过程是______。A．Private Sub Text1_ KeyPress (KeyAscii As Integer) IfKeyAscii ＜ 65 Or KeyAscii ＞ 9t Then MsgBox “请输入大写字母” End If End subB．Private Sub Text1_ KeyDown (KeyCode As Integer, Shift As Integer) IfKeyCode ＜ 65 Or KeyCode ＞ 91 Then MsgBox “请输入大写字母” End If End subC．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 subD．Private Sub Text1_ Change() IfAsc(Text 1.Text) ＜ 65 Or Asc(Text1. Text) ＞ 91 Then MsgBox “请输入大写字母” End If End sub
考题
要在文本框Text1中显示“欢迎使用VB”，以下（）语句是正确的。A、Text1.text=欢迎使用VBB、Text1=”欢迎使用VB”C、Text1.text=’欢迎使用VB’D、Text1.caption=”欢迎使用VB”
考题
单选题执行后将会删除编辑框组件Text1中的文本内容的语句是（）A
Text1.Text=”B
Text1. MaxLength=0C
Text1.Clear=D
Text1. SelText.Clear=
考题
单选题变量S为字符型，若在文本框Text1、Text2中分别输入数字23和35，再执行以下语句，S的值为“58”的是（）A
S=Text1.TextText2.TextB
S=Text1.Text+Text2.TextC
S=Val（Text1.Text）+Text2.TextD
S=Val（Text1.Text）Text2.Text
考题
单选题在窗体上画一个文本框（其Name属性为Text1），然后编写如下事件过程：Private Sub Form_Load()Text1.Text=""Text1.SetFocusFor i= 1 To 9Sum=Sum+iNext iText1.Text=SumEnd Sub上述程序的运行结果是（ ）。A
在文本框Text1中输出45B
在文本框Text1中输出0C
出错D
在文本框Text1中输出不定值
热门标签
最新试卷
