标题:vb如何把窗体中的文本框内容写入文本文件中
只看楼主
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
dim strFileName as string
strFileName = inputbox( "请输入你喜欢的文件名")
open "c:\" & strFileName for output as #1
print #1 , Text1.text,text2.text
close #1

我的msn: myfend@
2006-05-07 15:45
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
以下是引用风沙雪雨在2006-5-7 14:39:00的发言:
purana?自己上传的东西怎么给别人下啊.

点击浏览..选中你要上传的文件..再按上传按扭...最后再按发表..


我的msn: myfend@
2006-05-07 15:46
cxf6672
Rank: 1
等 级:新手上路
帖 子:35
专家分:0
注 册:2006-4-18
得分:0 
用print #1 , Text1.text,text2.text
这样在文本中生成的文件内容为什么不是每个文本框中的内容之间用逗号隔开,且中间还有很大的空格
2006-05-07 22:20
googlers
Rank: 1
等 级:新手上路
帖 子:92
专家分:0
注 册:2006-5-8
得分:0 
楼主的问题 就是我想问的 呵呵

来对地方了 thx!
2006-05-08 13:20
cxf6672
Rank: 1
等 级:新手上路
帖 子:35
专家分:0
注 册:2006-4-18
得分:0 

我把例子一起上传,高手给个指定看看为什么保存后的文件内容中间会有空格。

2006-05-08 17:42
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
以下是引用cxf6672在2006-5-7 22:20:00的发言:
用print #1 , Text1.text,text2.text
这样在文本中生成的文件内容为什么不是每个文本框中的内容之间用逗号隔开,且中间还有很大的空格

Option Explicit

Private Sub Command1_Click()
Open "d:\test1.txt" For Output As #1
Print #1, Text1.Text; ","; Text2.Text; ","; Text3.Text
Close #1
End Sub


我的msn: myfend@
2006-05-08 17:58
freeforever
Rank: 4
等 级:业余侠客
威 望:3
帖 子:368
专家分:201
注 册:2005-11-2
得分:0 
以下是引用cxf6672在2006-5-7 9:45:00的发言:

且每个文本框中的内容之间用逗号隔开



Print #1, Trim(Text2.Text) & "," & Trim(Text3.Text)

红色的就是逗号了,VB中逗号占一个发TAB长度,你把红色的换成Space(空格数)就行了


其实我也很无聊!
2006-05-09 11:58
bengyapa
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2013-7-25
得分:0 
小白在此路过,学习了
2013-07-25 18:00
nejicc
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2016-10-4
得分:0 
发现这个帖子好老,还是留个脚印,纪念学习VB的道路!估计回消息也没人回了
2016-10-05 00:00
dasdaa
Rank: 1
等 级:新手上路
威 望:2
帖 子:40
专家分:0
注 册:2019-12-24
得分:0 
学习了!!
2021-02-11 14:19



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-62299-1-1.html




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

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