下列程序的功能是把文件C:\a1.txt复制成C:\a2.txt,请填空。Private Sub Form. C1ick()Dim ch As StringOpen "C:\a1.txt" For【 】Open "C:\a2.txt" For【 】Do While Not【 】ch=Input(1,10)Print 20,ch;LoopClose 10,20End Sub

下列程序的功能是把文件C:\a1.txt复制成C:\a2.txt,请填空。

Private Sub Form. C1ick()

Dim ch As String

Open "C:\a1.txt" For【 】

Open "C:\a2.txt" For【 】

Do While Not【 】

ch=Input(1,10)

Print 20,ch;

Loop

Close 10,20

End Sub


相关考题:

下面程序把从终端读入的文本(用@作为文本结束标志)输出到一个名为bi.dat的新文件中,请填空。#include "stdio.h"FILE *fp;{ char ch;if((fp=fopen(( )))==NULL)exit(0);while((ch=getchar( ))!='@')fputc (ch,fp);fclose(fp);}

下列程序实现的功能是:在窗体上单击时,将在窗体上输出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

下列程序从名为filea.dat的文本文件中逐个读入字符并显示在屏幕上。请填空。 include mai 下列程序从名为filea.dat的文本文件中逐个读入字符并显示在屏幕上。请填空。include <stdio.h>main(){ FILE *fp; char ch;fp = fopen(【 】);ch = fgetc(fp);while(!feof(fp)) { putchar(ch); ch=fgetc(fp); }putchar("\n"); fclose(fp);}

以下程序的功能是从名为filea.dat的文本文件中逐个读入字符并显示在屏幕上。请填空。majn(){ FILE *fp; char ch;fp=fopen(______);ch=fgetc(fp);whle(!feof(fp)) { putchar(ch); ch=f8etc(fp); }putchar('\n'); fclose(fp);}

在标准模块中用:Dim或Private关键字定义的变量是______变量,它们只能在程序的模块中使用。

下列程序的功能是:当x100时,没有意义。请填空。 Private 下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。Private Sub Command1_Click()Dim x AS Singlex=InputBox("请输入x的值!")________Case Is<50y=0.8*xCase 50 To 100y=0.7*K__________Print"输入的数据出界!"End SelectPrint x,yEnd Sub

要将当前盘当前目录下的A2.TXT文件连接到C盘根目录下的文件A1.TXT后面,正确的命令是()。ACOPYC:///A1.TXT+A2.TXTC:///BCOPYA2.TXTC:///A1.TXTCCOPYA2.TXT+C://A1.TXTC:///A1.TXTDTYPEA2.TXTC:///A1.TXT

下面这条命令实现的是什么功能? mv /home/sjh/a1.txt /home/sjh/a2.txtA.复制文件a1.txtB.删除文件a1.txtC.把文件a1.txt改名为a2.txtD.剪切文件a1.txt

【填空题】输入一个字符,如果它是大写字母,则把它变成小写字母,如果它是一个小写字母,则把它变成大写字母,其它字符不变。请分析程序填空。 main() {char ch; scanf("%c",ch); if(【1】) ch=ch+32; else if(ch>='a'ch<='z') 【2】; printf("%c",ch); }