| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 558 人关注过本帖
标题:[求助]VB输出不正确,WHY
只看楼主 加入收藏
drysky
Rank: 1
等 级:新手上路
帖 子:16
专家分:0
注 册:2007-2-2
收藏
 问题点数:0 回复次数:2 
[求助]VB输出不正确,WHY

Open path3 For Output As #2
Workbooks.Open FileName:=path1
Set mysheet1 = ActiveWorkbook.Sheets(1)
For n = 2 To 200
a = Trim(mysheet1.Cells(n, "A").Value)
b = Trim(mysheet1.Cells(n, "B").Value)
c = Trim(mysheet1.Cells(n, "C").Value)
d = Trim(mysheet1.Cells(n, "D").Value)
e = Trim(mysheet1.Cells(n, "E").Value)
f = Trim(mysheet1.Cells(n, "F").Value)
linetext = "a&b&c&d&e&f"
Print #2, linetext
Next n

ActiveWindow.Close '关闭excel

Close 2 '关闭txt
这个程序是读一个EXCEL表格的二到200行的,A,B,C,D,E,F列
但是最终于输出是198行a&b&c&d&e&f
为什么会是结果呢?
怎样修改程序才能正常输出一列的A,B,C,D,E,F列的内容呢?谢谢

搜索更多相关主题的帖子: WHY 输出 
2007-03-31 12:00
Joforn
Rank: 6Rank: 6
等 级:贵宾
威 望:23
帖 子:1242
专家分:122
注 册:2007-1-2
收藏
得分:0 
linetext = "a&b&c&d&e&f"
linetext = a & b & c & d & e & f

VB QQ群:47715789
2007-03-31 17:02
huangwy
Rank: 1
等 级:新手上路
威 望:2
帖 子:297
专家分:0
注 册:2007-3-23
收藏
得分:0 
2楼说得没错
2007-03-31 21:34
快速回复:[求助]VB输出不正确,WHY
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.036170 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved