在窗体上绘制一个名称为Command1的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串： Microsoft Sub Command1_Click() 然后编写如下事件过程： Private Sub Command1_Click() 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，LCas
题目
在窗体上绘制一个名称为Command1的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串： Microsoft Sub Command1_Click() 然后编写如下事件过程： Private Sub Command1_Click() 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
相似考题
更多“在窗体上绘制一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串 ”相关问题
-
第1题：
窗体上有一个名称为Text1的文本框和一个名称为Command1、标题为“计算”的命令按钮，如图所示。函数fun及命令按钮的单击事件过程如下，请填空。
Private Sub Command1_Click()
Dim x As Integer
x=Val(InputBox(“输入数据”))
Text1=Str(fun(x)+fun(x)+fun(x))
End Sub
Private Function fun(ByRef n As Integer)
Ifn Mod 3=0 Then
n=n+n
Else
n=n*n
End If
________=n
End Function
当单击命令按钮，在输入对话框中输入2时，文本框中显示的是_______。
正确答案：fun 276
fun 276 解析：因为fun是个求值函数，故通过函数名返回值，所以第一空填fun。本题中fun函数的参数n是按地址传送的(即此值不会在函数结束后被销毁)，所以语句Str(fun(x)+fun(x)+fun(x))，据题意可知第一个fun(x)结果为4，第二个fun(x)结果为16，第三次fun(x)结果为256，所以第二空填276。 -
第2题：
（1）在名为Form1的窗体上绘制两个标签（名称分别为Label1和Label2，标题分别为“长”和“宽”）、两个文本框（名称分别为Text1和Text2，Text属性均为空白）和一个命令按钮（名称为Command1，标题为“输入”）。编写命令按钮的Click事件过程，使程序运行后，若单击命令按钮，则先后显示两个“输入”对话框，在两个“输入”对话框中分别输入长和宽，并分别在两个文本框中显示出来，运行后的窗体如图21-1所示。
注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为sj1．vbp，窗体文件名为sj1．frm。
（2）在名为Form1的窗体上绘制一个标签（名称为Label1，标题为“输入”）、一个文本框（名称为Text1，Text属性为空白）和一个命令按钮（名称为Command1，标题为“显示”）。请编写命令按钮的Click事件过程，使程序运行后，在文本框中输入内容，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框中的内容。运行后的窗体如图21-2和图21-3所示。
注意：要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为Sj2．vbp，窗体文件名为sj2．frm。
正确答案：(1)根据题意，新建“标准EXE”工程，在窗体上添加两个标签，名称分别为Label1和Label2、Caption属性分别为“长”和“宽”，两个文本框，名称分别为Text1和Text2、Text属性为空，一个命令按钮，名称为Command1，Caption属性为“输入”。设计完成后，双击Command1进入代码窗口，编写如下代码：
(2)根据题意，新建“标准EXE”工程，在窗体上添加一个标签，其名称为Label1，标题为“输入”，一个文本框，其名称为Text1、Text属性为空，一个命令按钮，其名称为Com-mand1、标题为“显示”。窗体设计完成后，双击Command1命令按钮，编写如下代码：
-
第3题：
在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在（ ）处填入适当的内容，将程序补充完整。
正确答案：
True【解析】当向文本框中输入任何字符时．文本框中的内容发生变化，从而触发Change事件，事件处理程序将命令按钮激活即可。这通过设置Command1.Enabled的属性值为真来实现。 -
第4题：
在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
程序运行后，单击命令按钮，在文本框中显示的值是
A．2
B．3
C．4
D．5
正确答案：B
题只能计算当i>1所循环的次数。注意i在循环体内被强行加3，到For循环时．还要再加步长1，这相当于因此，n=3。选择B。 -
第5题：
在名为Foma1的窗体上绘制一个标签(名称为Lab1，标题为Input)、一个文本框(名称为Text1，Text属性为空白)和一个命令按钮(名称为Cmd1，标题为Display)。请编写命令按钮的Click事件过程，使程序运行后，在文本框中输入Visual Basic，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框中的内容。运行后的窗体如下图所示。
注意：
要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise69.vbp，窗体文件名为exeCise69.frm。
正确答案：
