niusouti.com

在窗体上画一个名称为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

题目

在窗体上画一个名称为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．MVBP

B．mvbp

C．M V B P

D．m v b p

相似考题

1.在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。程序运行后， Command1 为禁用（灰色），此时如果在文本框中输入字符，则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load（）Command1  Enabled=FalseEnd SubPrivate Sub Text1_ ________ （）Command1  Enabled=TrueEnd Sub

2.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串：Microsoft Visual Basic Programming然后编写如下事件过程：Private Sub Command1_Click（）Open "d:\temp\outf.txt" For Output As #1For i = 1 To Len（Text1.Text） c = Mid（Text1.Text, i, 1） If c >= "A" And c <= "Z" Then Print #1, LCase（ ） End IfNext iCloseEnd Sub程序运行后，单击命令按钮，文件outf.txt中的内容是（ ）。A．MVBPB．mvbpC．MVBPD．mvbp

3.在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后，Colnmand1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮command1变为可用。请将程序补充完整。Private Sub Form_Load()Command 1.Enabled=FalseEnd SubPrivate SubText1【 】()Command1.Enabled=TrueEnd Sub

4.（ 7 ） 在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框 。 程序运行后 ， Command 1为禁用（灰色），此时如果在文本框中输入字符，则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load()Command1.Enabled = FalseEnd SubPrivate Sub Text1_ 【 7 】 ()Command1.Enabled = TrueEnd Sub

更多“在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串:M ”相关问题

  • 第1题：

    在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为Text1)，然后编写如下事件过程：

    Private Sub Command1_Click()

    x＝Val(Text1.Text)

    Select Case x

    Case 1,3

    y＝x*x

    Case IS＞＝10,IS＜＝-10

    y＝x

    Case-10 To 10

    y＝-x

    End Select

    End Sub

    程序运行后，在文本框中输入3，然后单击命令按钮，则y的值变为______。


    正确答案：9
    9 解析：本题考查多分支语句Select Case的知识。 Select Case用于实现多分支结构，其使用格式为： Select Case 测试表达式＞
    [Case表达式列表1＞]
    [语句块1]
    [Case 表达式列表2＞]
    [语句块2]
    [CaseElse]
    [语句块n]
    End Select
    其功能是根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行。如果测试表达式的值等于某一个表达式的值，则选择该语句块的语句执行，执行完毕后退出Case结构。本题中由于x的值为3，符合第一个Case语句的条件，所以执行严y＝x*x后退出Case结构，最后y的值为9。

  • 第2题：

    在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：

    程序运行后，单击命令按钮，在文本框中显示的值是

    A．2

    B．3

    C．4

    D．5


    正确答案：B
    题只能计算当i>1所循环的次数。注意i在循环体内被强行加3，到For循环时．还要再加步长1，这相当于因此，n=3。选择B。

  • 第3题：

    在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在（ ）处填入适当的内容，将程序补充完整。


    正确答案：
    True【解析】当向文本框中输入任何字符时．文本框中的内容发生变化，从而触发Change事件，事件处理程序将命令按钮激活即可。这通过设置Command1.Enabled的属性值为真来实现。

  • 第4题：

    设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。

    A. 30

    B. 25

    C. 20

    D. 15


    正确答案：A
    A)    【解析】本题考查函数的参数。数组作为参数进行传递时，VB中默认的参数传递方式为地址传递。过程Fun的功能是计算数组中所有元素的积。数组的元素为2 4 6 8 10，因此最后文本框中显示的内容为30。

  • 第5题：

    在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是

    A． Visual

    B．Basic

    C．Program

    D．出错


    正确答案：C
    解析：Text是文本框的默认属性。

相关内容