题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2024-01-22 20:42:48

[填空题]把一个磁盘文件的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存人另一个磁盘文件,请填空完成程序。在窗体上建立一个文本框,在属性窗口中把该文本框的Muhiline属性设置为True,然后编写如下的事件过程: Private Sub Form_Click( ) Open"d:/test/smtext1.txt"For lnput As#1 Text1.Fontsize=14 Text1.FontName=“幼圆” Do While Not EOF(1) 【8】 whole$=whole $ aspect $+Chr$(13)+Chr $(10) Loop Text1.Text= 【9】 。 Close Open"d:/test/smtext2.txt"For Output As#1 Print #1 【10】 Close End Sub

更多"把一个磁盘文件的内容读到内存并在文本框中显示出来,然后把该文本框中的内"的相关试题:

[填空题]把一个磁盘文件的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存入另一个磁盘文件,请填空完成程序。 在窗体上建立一个文本框,在属性窗口中把该文本框的MultiLine属性设置为 True,然后编写如下的事件过程: Prlvate Sub Form_Click( ) Open"D:/test1.txt"For Input As # 1 Text1.FontSize=14 Text1.FontName=“幼圆” Do While Not EOF(1) 【13】 whole$=whole$+aspect$+Chr$(13)+Chr$(10) Loop Text1.Text= 【14】 Close Open"D:/test2.txt"For Output As # 1 Print # 1, 【15】 Close End Sub
[填空题]编写一个过程把C盘中的Config. sys文件内容读出,并在文本框中显示出来。在窗体Form1建立一个文本框Text1,将其MultiLine属性设置为True,将ScrollBars属性设置为3-Both。根据题意。请完善下列程序。
option Explicit
Private Sub Form C1ick( )
Dim chl As String, fn As Integer
Dim Str As String
fn= 【13】
Open "C:/Config. sys" For Input As fn
Do While Not EOF( 【14】 )
Line Input #fn, chl
Str=Str+chl+vbCrLf
Loop
Text1. Text= 【15】
End Sub
[填空题]以下程序的功能是:把程序文件smtextl.txt的内容全部读入内存,并在文本框Textl中显示出来。请填空。
Private Sub Command1_Click( )
Dim inData As String
Text1.Text=" "
Open"smtext1.txt"______As______
DO While______
Input # 2,inData
Text1.Text=Text1.Text&inData
Loop
Close # 2
End Sub
[填空题]

下列程序的功能是把顺序文件smtextl.txt的内容全部读入内存,并在文本框Textl中显示出来。请填空。
Private Sub Command1_Click( )
Dim inData As String
Text1.Text=""
Open "smtext1.txt" () As ()
Do While ()
Input #2,inData
Text1.Text=Text1.Text & inData
Loop
Close #2
End Sub


[填空题]编写一过程将C盘中的Config.sys文件内容读出,并在文本框中显示出来。在窗体Form1上建立一个文本框Text1,将其MultiLine属性设置为True,ScrollBars属性设置为3-Both。给定的程序不完整,请将程序补充完整。 Option Explicit Private Sub Form _Click( ) Dim ch1 As String,fn As Integer Dim Str As String fn= 【13】 Open "C:/Config.sys" For Input As fn Do While Not EOF( 【14】 ) Line Input #fn, ch1 Str = Str + chl+ vbCrLf Loop Text1.Text = 【15】 End Sub
[填空题]以下程序的功能是:把顺序文件smtext1.txt的内容全部读入内存,并在文本框Text1中显示出来。请填空。
Private Sub Command1_Click( )
Dim inData As String
Text1.Text=""
Open "smtext1.txt" (12) As (13)
Do While (14)
Input #2, inData
Text1.Text=Text1.Text & inData
Loop
Close #2
End Sub
[填空题]实现程序可将磁盘中的一个文件复制到另一个文件中,两个文件的文件名在可执行命令的命令行中(相当于copy命令),假定文件在当前目录下。请补全程序。
#include<stdio.h>
void main(int argc,char*argv[])
FILE *f1,*f2;
if(argc< 【18】 )
printf("parameter error!/n");exit(0);
f1=fopen(argv[1],"r");
f2=fopen(argv[2],"w");
while( 【19】 )fputc(fgetc(f1),f2);
fclose(f1);
fclose(f2);

[简答题]建立一个磁盘文件,文件名由键盘输入,文件内容也由键盘输入。文件内容的输入以"*"作为输入结束标志。

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码