| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1091 人关注过本帖, 1 人收藏
标题:求一个简单的例子!
只看楼主 加入收藏
yanligangylg
Rank: 1
等 级:新手上路
帖 子:84
专家分:0
注 册:2007-10-28
收藏(1)
 问题点数:0 回复次数:8 
求一个简单的例子!
我想知道怎么再VB中单击一个按钮时吧TEXT中的文本内容显示再我建立的1.txt中?
谢谢,只想学习
搜索更多相关主题的帖子: 例子 单击 TEXT 文本 按钮 
2007-12-02 23:19
XieLi
Rank: 1
等 级:新手上路
威 望:1
帖 子:762
专家分:0
注 册:2007-7-24
收藏
得分:0 
filename = 路径
        Open filename For Output As #1
        Print #1, Text1.Text
        Close #1

拥有蓝天的白云,拥有你的我.
2007-12-03 08:32
yanligangylg
Rank: 1
等 级:新手上路
帖 子:84
专家分:0
注 册:2007-10-28
收藏
得分:0 
非常感谢这位朋友

就是死也要拉着VB去死
2007-12-03 13:46
yanligangylg
Rank: 1
等 级:新手上路
帖 子:84
专家分:0
注 册:2007-10-28
收藏
得分:0 
回复 2# 的帖子
那当我单击一个写入按钮(按钮附带2楼代码)N此的时候 可以再每次写入的记录换行写入同一个文件呢?

就是死也要拉着VB去死
2007-12-03 17:03
yanligangylg
Rank: 1
等 级:新手上路
帖 子:84
专家分:0
注 册:2007-10-28
收藏
得分:0 
顶上来!

就是死也要拉着VB去死
2007-12-03 21:59
hnzz_wgf
Rank: 1
等 级:新手上路
帖 子:81
专家分:0
注 册:2007-11-21
收藏
得分:0 
FileName = 路径
   Open FileName For Append As #1
   Write #1, Text1
   Close #1
2007-12-04 10:05
XieLi
Rank: 1
等 级:新手上路
威 望:1
帖 子:762
专家分:0
注 册:2007-7-24
收藏
得分:0 
同意楼上

拥有蓝天的白云,拥有你的我.
2007-12-04 10:19
yanligangylg
Rank: 1
等 级:新手上路
帖 子:84
专家分:0
注 册:2007-10-28
收藏
得分:0 
回复2楼:问什么我再自己的机器上运行的时候可以,但是我再别的机器上运行的时候提示说文本已经打开...
“Open filename For Output As #1”为提示错误的地方
 我吧filename改为SS就不错了为什么?

就是死也要拉着VB去死
2007-12-04 12:37
心中有剑
Rank: 2
等 级:新手上路
威 望:5
帖 子:611
专家分:0
注 册:2007-5-18
收藏
得分:0 
别一直 #1了!  最好用 FreeFile  

Dim MyIndex, FileNumber
For MyIndex = 1 To 5   ' 循环五次。
   FileNumber = FreeFile   ' 取得未使用的文件号。
   Open "TEST" & MyIndex For Output As #FileNumber   ' 创建文件名。
   Write #FileNumber, "This is a sample."   ' 输出文本至文件中。
   Close #FileNumber   ' 关闭文件。
Next MyIndex

2007-12-04 13:18
快速回复:求一个简单的例子!
数据加载中...
 
   



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

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