下列程序实现的功能是：在窗体上单击时，将在窗体上输出c:=a1.txt文件中的所有小写字母。Private Sub Form. Click()Dim Ch As String * 1Open "c:\a1.txt" For Input As 10Do While【 】Ch= Input(1, 10)If 【 】ThenPrint Ch;End IfLoop【 】End Sub
下列程序实现的功能是：在窗体上单击时，将在窗体上输出c:=a1.txt文件中的所有小写字母。
Private Sub Form. Click()
Dim Ch As String * 1
Open "c:\a1.txt" For Input As 10
Do While【 】
Ch= Input(1, 10)
If 【 】Then
Print Ch;
End If
Loop
【 】
End Sub
相关考题：
下面对程序段运行结果叙述正确的是( )PrivateSubForm_Click()Caption="鼠标单击鼠标单击Picture=LoadPicture(App.Path+\window.jpg)Print欢迎使用VBEndSubPrivateSubForm_DblClick()Caption=鼠标双击Picture=LoadPicture()Print结束使用VBEndSubA.单击窗体时窗体的标题为鼠标单击，窗体上显示结束使用VBB.双击窗体时窗体的标题为鼠标双击，窗体上显示结束使用VBC.双击窗体时窗体的图片还在D.单击窗体时窗体的图片删除
有一个ylc5.vbp，只有一个窗体Form1，需要创建Form2。在窗体Form1上建立Command1和Command2两个命令按钮，标题分别为“隐藏启动窗体”和“关闭窗体”。在窗体Form2上创建标题为“打开窗体1”的按钮。将Form2设为启动窗体，单击Form2上的按钮，则显示Form1窗体：若单击Form1上的“隐藏启动窗体”按钮，则Form2消失。若单击Form1上的“关闭窗体”按钮，则Form1和Form2都消失，退出程序。注意：存盘时必须存放在考生文件夹下，工程文件名为ylc5.vbp，窗体文件名为ylc5-1.frm， ylc5-2.frm。程序中不得使用任何变量。
在考生文件夹下有工程文件sj4．vbp及窗体文件sj4．frm，该程序是不完整的。本程序的功能为当用户单击窗体上的命令按钮“输入”时，可以输入6个数值，随后程序对这6 个数值进行斗序排序，单击按钮“输出”则把大于平均值的数显示出来，程序运行时的窗体如图7—4所示。注意：请在有“?”号的地方填入正确内容，然后删除“?”及代码前的所有注释符(即“¨’号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。
在考生文件夹中有一个工程文件execise63.vbp及窗体文件execise63.frm。在名为Form1上有一个名称为Cmd1，标题为Hide的命令按钮。在Form2上有一个名称为Cmd2，标题为Display的命令按钮。它的功能是在运行时只显示名为Form2的窗体，单击Form2上的 Display按钮，则显示名为Form1的窗体；单击Form1上的Hide按钮，则Foma1的窗体消失。这个程序不完整。要求：(1)把Form2设为启动窗体；把Form1上按钮的标题改为Hide，把Form2上按钮的标题改为Display。(2)去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序的其他部分。最后把修改后的文件存盘。(3)工程文件和窗体文件仍按原名保存。正确程序运行后的界面如图所示。
在考生文件夹中有一个工程文件execise45.vbp和窗体文件execise45.frm。它的功能是在运行时只显示名为Form2的窗体，单击Form2上的“上线”命令按钮，则显示名为Form1的窗体；单击Form1上的“隐身”命令按钮，则Form1的窗体消失。这个程序并不完整，要求：(1)把Form2设为启动窗体；把Form1上按钮的标题改为“隐身”，把Form2上按钮的标题改为“上线”。(2)去掉程序中的注释符“'”，把程序中的问号“?”改为正确的内容，使其实现上述功能，但不得修改程序的其他部分。最后把修改后的文件存盘。(3)工程文件和窗体文件仍按原名保存。正确程序运行后的界面如卜图所示。
在Form1的窗体上绘制一个命令按钮，名为Cmd1，标题为Display。编写适当的事件过程，使程序运行后，若单击命令按钮，则在窗体上显示ViSBa1 Basic；如果单击窗体，则命令按钮消失。程序运行情况如下图所示。注意：在程序中不能使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise16.vbp，窗体文件名为execise16.frm。
设计应用程序，要求通过InputBox（)函数输入关键值key，在一维数组中b=（1, 3, 5, 7, 9, 2, 4)中查找此关键值key，当单击窗体时，在窗体上输出数组b和查找结果。 要求：查找用子过程实现。 保存工程和窗体，窗体文件名为：昵称-8-2.frm;工程名为：昵称-8-2.vbp。将工程文件和窗体文件压缩成：昵称-8-2.rar，以附件形式提交。