网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
下面程序的功能是把文件file11.txt中重复字符去掉后（即若有多个字符相同，则只保留1个）写入文件file2.txt。请填空。
Private Sub Command1__Click（）
Dim inchar AS String,temp AS String,outchar AS String
utchar=” ”
pen=”file1.txt” For Input AS #1
pen=”file2.txt” For Output AS ______
n=LOF（ ______ ）
inchar=Input$（n,1）
For k=1 To n
temp=Mid（inchar,k,1）
If InStr（outchar,temp）= ______ Then
outchar=outchar & temp
End If
Next k
print #2, ______
close #2
close #1
End Sub
参考答案
更多 “ 下面程序的功能是把文件file11.txt中重复字符去掉后（即若有多个字符相同，则只保留1个）写入文件file2.txt。请填空。Private Sub Command1__Click（）Dim inchar AS String,temp AS String,outchar AS Stringutchar=” ”pen=”file1.txt” For Input AS #1pen=”file2.txt” For Output AS ______n=LOF（ ______ ）inchar=Input$（n,1）For k=1 To ntemp=Mid（inchar,k,1）If InStr（outchar,temp）= ______ Thenoutchar=outchar tempEnd IfNext kprint #2, ______close #2close #1End Sub ” 相关考题
考题
（ 7 ）下面程序的功能是把文件 file11.txt 中重复字符去掉后（即若有多个字符相同，则只保留 1 个 ） 写入文件 file2.txt 。请填空。Private Sub Command1__Click （）Dim inchar AS String,temp AS String,outchar AS StringOutchar= ” ”Open= ” file1.txt ” For Input AS #1Open= ” file2.txt ” For Output AS——n=LOF （——）inchar=Input$ （ n,1 ）For k=1 To ntemp=Mid （ inchar,k,1 ）If InStr （ outchar,temp ） = ——Thenoutchar=outchar tempEnd IfNext kprint #2,——close #2close #1End Sub
考题
下列给定程序中，函数fun的功能是：在形参SS所指字符串数组中查找与形参t所指字符串相同的串，找到后返回该串在字符串数组中的位置（即下标值），若未找到则返回一1。SS所指字符串数组中共有N个内容不同的字符串，且串长小于M。请在程序的下划线处填入正确的内容并将下划线删除，使程序得出正确的结果。注意：部分源程序在文件BLANKl．C中。不得增行或删行，也不得更改程序的结构!
考题
在考生目录下有一个工程文件sjt3．vbp，包含了所有控件和部分程序。程序运行时，在文本框中每输入一个字符，则立即判断：若是小写字母，则把它的大写形式显示在标签Labell中；若是大写字母，则把它的小写形式显示在Label1中；若是其他字符，则把该字符直接显示在LabelI 中。输入的字母总数则显示在标签Label2中，如图4所示。 要求：去掉程序中的注释符，把程序中的?改为正确的内容。 注意：不得修改已经存在的程序，最后把修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件sjt4．vbp。窗体中有～个图片框，图片框中有一个名称为Shapel的蓝色圆，如图5所示。程序运行时，单击“开始”按钮，圆逐渐变大(圆心位置不变)，当圆充满图片框时则变为红色，并开始逐渐缩小，当缩小到初始大小时又变为蓝色，并再次逐渐变大，如此往复。单击“停止”按钮，则停止变化。文件中已经给出了所有控件和程序，但程序不完整，请去掉程序中的注释符，把程序中的?改为正确的内容。 提示：程序中的符号常量bule color表示蓝色的值，red color表示红色的值。 注意：不能修改程序的其他部分和各控件的属性。最后把修改后的文件按原文件名存盘。
考题
函数readDat是从文件in．dat中读取20行数据存放到字符串数组xx中(每行字符串长度均小于80)。请编制函数jsSort，其函数的功能是：以行为单位对字符串按下面给定的条件进行排序，排序后的结果仍按行重新存入字符串数组xx中，最后调用函数writeDat把结果xx输出到文件out．dat中。 条件：字符串从中间一分为二，左边部分按字符的ASCII值降序排序，右边部分按字符的ASCII值升序排序。如果原字符串长度为奇数，则最中间的字符不参加排序，字符仍放在原位置上。注意：部分源程序存在test．c文件中。 请勿改动数据文件in．dat中的任何数据、主函数main、读函数readDat和写函数writeDat的内容。
考题
给定程序中，函数fun的功能是：在形参ss所指字符串数组中，将所有串长超过k的字符串中右边的字符删除，只保留左边的k个字符。ss所指字符串数组中共有N个字符串，且串长小于M。请在程序的下划线处填入正确的内容并把下划线删除，使程序得出正确的结果。注意：源程序存放在考生文件夹下的BLANKl．C中。不得增行或删行，也不得更改程序的结构！
考题
请编写函数fun，函数的功能是：移动字符串中的内容，移动的规则如下：把第1到第m个字符，平移到字符串的最后，把第m+l到最后的字符移到字符串的前部。例如，字符串中原有的内容为：ABCDEFGHIJK，m的值为3，则移动后，字符串中的内容应该是：DEFGHIJKABC。注意：部分源程序在文件PROGl．C中。请勿改动主函数main和其他函数中的任何内容，，仅在函数fun的花括号中填入你编写的若干语句。
考题
函数Rdata实现从文件in．dat中读取一篇英文文章存入到字符串数组string中，请编写函数CharLeft，其功能是：以行为单位把字符串中的所有字符的ASCII值左移4位，如果左移后，其字符的ASCII值小于等于32或大于100，则原字符保持不变，否则就把左移后的字符ASCII值再加上原字符ASCII值，得到新的字符仍存入原字符串对应的位置上。最后把已处理的字符串仍按行重新存入字符串数组string中，最后调用函数Wdata，把结果string输出到文件out．dat中。 原始数据文件存放的格式是：每行的宽度均小于80个字符(含标点符号和空格)。注意：部分源程序已经给出。 请勿改动主函数main、读数据函数Rdata和输出数据函数Wdata的内容。
考题
下面程序段的功能是将字符串str逆序存放，两处横线中应填 ; （两处需要填的内容相同，只写一次） int i,j,m; for（i=0,j=strlen（str);i＜j;i++,j--) { m = str[i]; str[i] =_____________; ____________= m; }
热门标签
最新试卷
