c 文件读写有个文件，一行一行写入的，如下a=1b=2c=3现在想从下往上一行一行的给打印出来，可以怎么处理啊？
回答2：可以循环读取到最后一行 记录行数n 输出
rewind 再读取到n-1
输出 重复& 这样可能很麻烦 不知道
有没有好方法
回答3：如果数据块的大小是确定的，可以使用使用feek函数，跟踪跳转文件位置指针例如fseek( fp, -10, SEEK_END)read...fseek( fp, -20, SEEK_END)read...fseek( fp, -30, SEEK_END)read...
xiaoguangguang
回答4：我照我的思路简单写了一个程序　　C/C++ code　　#include &stdio.h&
#include &stdlib.h&
int main(int argc, char** argv)
int i, dataNum = 5, dataSize = 4, nowLoc = 0;
buf = (char *)malloc(dataSize * sizeof(char));
fp = fopen(&a.txt&, &rb&);
for(i = 0; i & dataN i++)
fseek(fp, - (nowLoc += dataSize) * sizeof(char), SEEK_END);
fread(buf, sizeof(char), dataSize, fp);
printf(&%s&, buf);
xiaoguangde
回答5：正常fgets所有的行,用数组或者什么管理起来.然后想怎么打印都行
xiaoguang0109
回答6：简单的思路, 统计所有的 '\n' 的位置并记录到数组中然后 使用fseek函数进行文件指针偏移读取
xiaoguang_07极限下载 - 所有软件均来自网络如有版权问题请联系我们 - 蜀ICP备 号
Copyright &
online services. All rights reserved.怎么把文本文档中的内容按行提取并将每一行存入数组中 - LabVIEW论坛 -
中国电子技术论坛 -
最好最受欢迎电子论坛!
后使用快捷导航没有帐号？
Hot [直播]
怎么把文本文档中的内容按行提取并将每一行存入数组中
15:41:15　　
本帖最后由 ssd12345 于
16:02 编辑
我想把文本文档中的内容按行提取，并且将提取出的每行放入字符串数组中，不知道如何实现，请大家多多帮忙，非常着急，课题需要。
我本来是想提取数控机床G代码的坐标重建加工件三维图形，比如文档里的的内容为：O0001
N01 G0 X0 Y0
N02 G1 X0 Y40
N03 X14.96 Y70.0；
N04 X43.54；
其中的坐标是（0，0）（0 ，40）（14.96 ，70.0）（43.54，70.0）最终我是要通过坐标画出三维图形。
怎么能找到这些坐标呢，或许不用先按行提取，直接就能找到，请高手赐教
16:14:50　　
PCB在线计价下单
板子大小：
板子数量：
PCB 在线计价
1.不用一行一行读。要全读进来。
2.再对读进来的字符串进行分离即可。
3.请看附件例子，希望对你有帮助。
(15.64 KB, 下载次数: 62)
16:14 上传
16:14 上传
点击文件名下载附件
下载积分: 积分 -1 分
7.11 KB, 下载次数: 275, 下载积分: 积分 -1 分
热心好青年
16:28:48　　
(20.9 KB, 下载次数: 25)
16:28 上传
学习了，谢啦！&
17:32:20　　
深圳健身骑行 发表于
1.不用一行一行读。要全读进来。
2.再对读进来的字符串进行分离即可。
3.请看附件例子，希望对你有帮助。
非常感谢，谢谢！忒感动了
19:38:45　　
/tt_谷哥 发表于
你好，可否把你的程序发给我一下，因为我编出的程序数组第一项都是空的，借鉴一下谢谢
19:56:43　　
ssd12345 发表于
你好，可否把你的程序发给我一下，因为我编出的程序数组第一项都是空的，借鉴一下谢谢 ...
19:56 上传
点击文件名下载附件
下载积分: 积分 -1 分
7.5 KB, 下载次数: 156, 下载积分: 积分 -1 分
帮大忙 谢谢！&
谢谢，，，
06:46:51　　
19:56:43　　
读进来之后，是使用的scan from string函数 来分离坐标的吧
20:00:12　　
用哪个函数来 读取文本里面的数据的？
助理工程师
09:58:17　　
18:16:04　　
labview果然很强大
20:42:46　　
09:56:43　　
14:39:37　　
12:10:32　　
刚好需要，谢谢了
10:11:47　　
不难理解，很基础
助理工程师
20:07:53　　
谢谢分享。。。。。。。。。。。。。。。。。
17:11:48　　
谢谢分享,学习学习数组!
13:19:02　　
非常好用！！！！！！！
13:58:05　　
看看,学习了!!!!!
18个问题&&&&&&&&12204个浏览
24个问题&&&&&&&&6242个浏览
CellWise周军
21个问题&&&&&&&&7406个浏览
通过本次直播，你将学会：
1.如何快速实现传统硬件产品智能化
2.结合机智云智能硬件APP和MCU实操经验
3.在实际应用中需要注意规避哪些常见关键问题
4.掌握如何实现传统硬件连接互联网，快速实现产品智能化
即日起至6月15日，参与英蓓特NXP产品知识小测验,即有机会赢取最新系列开发板。特别奖SBC-EC9100开发板1套，幸运奖FRDM系列最新开发板（型号随机，共10套）。快来参加吧！ >> 立即参加
Powered by查看: 8111|回复: 11
如何把excel中的数据每一行打印一份文档
阅读权限20
在线时间 小时
如题，现在excel中有很多行数据，现在要就每行数据打印一份通知单，有什么便捷方法没有？请高手指点。
附件如下：
(21.94 KB, 下载次数: 135)
09:28 上传
点击文件名下载附件
阅读权限50
在线时间 小时
Private Function CChinese(StrEng As String) As String
If Not IsNumeric(StrEng) Or StrEng Like &*.*& Or StrEng Like &*-*& Then
If Trim(StrEng) && && Then Exit Function
CChinese = &&: Exit Function
Dim intLen As Integer, intCounter As Integer
Dim strCh As String, strTempCh As String
Dim strSeqCh1 As String, strSeqCh2 As String
Dim strEng2Ch As String
strEng2Ch = &○一二三四五六七八九&
strSeqCh1 = & 十百千 十百千 十百千 十百千&
strSeqCh2 = & 万亿兆&
StrEng = CStr(CDec(StrEng))
intLen = Len(StrEng)
For intCounter = 1 To intLen
strTempCh = Mid(strEng2Ch, Val(Mid(StrEng, intCounter, 1)) + 1, 1)
If strTempCh = &○& And intLen && 1 Then
If Mid(StrEng, intCounter + 1, 1) = &0& Or (intLen - intCounter + 1) Mod 4 = 1 Then
strTempCh = &&
strTempCh = strTempCh & Trim(Mid(strSeqCh1, intLen - intCounter + 1, 1))
If (intLen - intCounter + 1) Mod 4 = 1 Then
strTempCh = strTempCh & Mid(strSeqCh2, (intLen - intCounter + 1) \ 4 + 1, 1)
If intCounter & 3 Then
If Mid(StrEng, intCounter - 3, 4) = &0000& Then strTempCh = Left(strTempCh, Len(strTempCh) - 1)
strCh = strCh & Trim(strTempCh)
CChinese = strCh
End Function
Sub 开始倒腾()
Dim ss As Integer, s As Integer, g As Section, f As Paragraph
Dim myApplication As Excel.Application
Dim myWorkBook As Excel.WorkBook
Set myApplication = GetObject(, &excel.application&)
Set myWorkBook = myApplication.ActiveWorkBook
ActiveDocument.Range.Text = && & Chr(13)
Selection.WholeStory
Selection.ClearFormatting
Selection.Font.Name = &仿宋_gb2312&
Selection.Font.Size = 16
ss = myWorkBook.Application.ActiveSheet.[a65536].End(xlUp).Row
For s = 4 To ss
With myWorkBook.Application.ActiveSheet
Selection.TypeText &2011年绩效考核通知单& & Chr(13) & Chr(13)
Selection.TypeText Chr(13) & .Range(&a& & s) & &:& & Chr(13) _
& && & 在2011年度绩效考核中，你单位中心工作得分：& & .Range(&b& & s) & &分、本职工作得分：& & .Range(&c& & s) & &分、自评分为：& & .Range(&d& & s) & &分，综合得分& & .Range(&f& & s) & &分，在全县学校中排名第& & CChinese(CStr(.Range(&i& & s))) & &，在初中学段中排名第& & CChinese(CStr(.Range(&h& & s))) & &。& _
& Chr(13) & Chr(13) & Chr(13) & Chr(13) & && && && && && && && && & 江陵县教育局& & Chr(13) & && && && && && && && &二○一二年二月二十日& & Chr(13)
Selection.InsertBreak Type:=wdPageBreak
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = &2011年绩效考核通知单&
.Replacement.Text = &&
.Forward = True
.Wrap = wdFindContinue
.Format = True
With .Replacement
.Font.Name = &黑体&
.Font.Size = 22
.ParagraphFormat.Alignment = wdAlignParagraphCenter
Selection.HomeKey unit:=wdStory
Selection.Find.Execute Replace:=wdReplaceAll
阅读权限50
在线时间 小时
注：1、将代码放word中执行。2、同时打开两个文件（关闭其他word和excel）。3、在word中引用excel。
阅读权限20
在线时间 小时
用WORD邮件合并功能，就能轻松实现。。。
WORD ——信函与邮件——邮件合并，然后根据右边的提示一路一路做就可以输出若干个DOC文档了
阅读权限70
在线时间 小时
SQH 老弟 洋洋洒洒写了很多代码，厉害啊！
阅读权限20
在线时间 小时
谢谢各位了，我来试试看，有问题再请教。
阅读权限20
在线时间 小时
sqhsqhli 发表于
注：1、将代码放word中执行。2、同时打开两个文件（关闭其他word和excel）。3、在word中引用excel。
还是不会，这段代码是给什么对象写的？如何让它运行？本人水平太差，不会弄啊，能不能说详细点？
阅读权限20
在线时间 小时
本帖最后由 暴牙齿 于
14:50 编辑
快照6.jpg (135.54 KB, 下载次数: 10)
14:49 上传
我把这段代码作为宏来运行，提示编译错误，我的Office是2010的版本。
阅读权限50
在线时间 小时
没有引用excel吧，就是你上面这张图片，点“工具”——“引用”，找到macrosoft excel 11.0 object library，我的是2003，所以是11，2010要更大一些
阅读权限20
在线时间 小时
搞定，谢谢了。sqhsqhli兄的代码我一定会好好收藏，等有空的时候再来慢慢研究。{:soso_e179:}
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师> 问题详情
在Word文档中有一段落的最后一行只有一个字符，想把该字符合并到上一行，下述方法中哪一个无法达到
悬赏：0&答案豆
提问人：匿名网友
发布时间：
在Word文档中有一段落的最后一行只有一个字符，想把该字符合并到上一行，下述方法中哪一个无法达到该目的？()A.减少页的左右边距B.减小该段落的字体的字号C.减小该段落的字间距D.减小该段落的行间距请帮忙给出正确答案和分析，谢谢！
为您推荐的考试题库
我有更好的答案
请先输入下方的验证码查看最佳答案
图形验证：
验证码提交中……
享三项特权
享三项特权
享三项特权
选择支付方式：
支付宝付款
郑重提醒：支付后，系统自动为您完成注册
请使用微信扫码支付(元)
支付后，系统自动为您完成注册
遇到问题请联系在线客服QQ：
请您不要关闭此页面,支付完成后点击支付完成按钮
遇到问题请联系在线客服QQ：
恭喜您！升级VIP会员成功
常用邮箱：
用于找回密码
确认密码：}