网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，在文本框中输入以下字符串：Microsoft Visual Basic Programming
然后编写如下事件过程：
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（ ）
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的文本框，在文本框中输入以下字符串：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 IfNext iCloseEnd Sub程序运行后，单击命令按钮，文件outf.txt中的内容是（ ）。A．MVBPB．mvbpC．MVBPD．mvbp ” 相关考题
考题
在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。程序运行后， Command1 为禁用（灰色），此时如果在文本框中输入字符，则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load（）Command1 Enabled=FalseEnd SubPrivate Sub Text1_ ________ （）Command1 Enabled=TrueEnd Sub
考题
（ 7 ） 在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框 。 程序运行后 ， Command 1为禁用（灰色），此时如果在文本框中输入字符，则命令按钮 Command1 变为可用。请填空。Private Sub Form_Load()Command1.Enabled = FalseEnd SubPrivate Sub Text1_ 【 7 】 ()Command1.Enabled = TrueEnd Sub
考题
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后，Colnmand1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮command1变为可用。请将程序补充完整。Private Sub Form_Load()Command 1.Enabled=FalseEnd SubPrivate SubText1【 】()Command1.Enabled=TrueEnd Sub
考题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编如下事件过程：Private Sub Command1_Click()Dim i As Integer, n As Integern=0For i=0 To 50i=i+3n=n+1If i＞10 Then Exit ForNext iText1.Text=Str(n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是______。
考题
窗体上有一个名称为Text1的文本框和一个名称为Command1、标题为“计算”的命令按钮，如图所示。函数fun及命令按钮的单击事件过程如下，请填空。Private Sub Command1_Click()Dim x As Integerx=Val(InputBox(“输入数据”))Text1=Str(fun(x)+fun(x)+fun(x))End SubPrivate Function fun(ByRef n As Integer)Ifn Mod 3=0 Thenn=n+nElsen=n*nEnd If________=nEnd Function当单击命令按钮，在输入对话框中输入2时，文本框中显示的是_______。
考题
在窗体上画一个命令按钮(名称为Command1)和一个文本框(名称为Text1)，然后编写如下事件过程：Private Sub Command1_Click()x＝Val(Text1.Text)Select Case xCase 1,3y＝x*xCase IS＞＝10,IS＜＝-10y＝xCase-10 To 10y＝-xEnd SelectEnd Sub程序运行后，在文本框中输入3，然后单击命令按钮，则y的值变为______。
考题
设有如下通用过程：在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如 下事件过程：End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。A. 30B. 25C. 20D. 15
考题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Text1.Text = "Visual" Me.Text1 = "Basic" Text1 = "Program" End Sub 程序运行后，如果单击命令按钮，则在文本框中显示的是A． VisualB．BasicC．ProgramD．出错
考题
在窗体上画一个名称为Commandl的命令按钮和一个名称为Text1的文本框。程序运行后，Command1为禁用(灰色)。当向文本框中输入任何字符时，命令按钮Command1变为可用。请在（ ）处填入适当的内容，将程序补充完整。
热门标签
最新试卷
