| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 888 人关注过本帖
标题:本人初学vb请教textbox问题
只看楼主 加入收藏
andy288
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2008-2-19
收藏
 问题点数:0 回复次数:4 
本人初学vb请教textbox问题
各位vb高手:
 本人初学vb请教textbox问题,以下为源程序
即读取c:/1.txt内容显示在textbox内,
Private Sub Text1_Change()
  Open "c:/1.txt" For Binary As #1
  Text1.Text = Input(LOF(1), 1)
  Close 1
End Sub

1.jpg (21.04 KB)
图片附件: 游客没有浏览图片的权限,请 登录注册


2.JPG (14.7 KB)
图片附件: 游客没有浏览图片的权限,请 登录注册
搜索更多相关主题的帖子: textbox问题 初学 Sub LOF 
2008-02-19 19:55
andy288
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2008-2-19
收藏
得分:0 
请高手帮忙解决!
2008-02-20 23:17
随风逐流
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:passerby
等 级:版主
威 望:8
帖 子:4054
专家分:271
注 册:2007-6-13
收藏
得分:0 
没测试
但估计是你在输入的时候速度很快
导致上次一TEXT1_CHANGE事件还没执行完(没执行完的话,文件被打开但并没有被关闭)
而又继续下一次事件的执行,这样又执行打开文件这行代码,所以出现你图中的错误信息.

[url=http://www./html/6/6694/]极道金丹[/url][url=http://www./html/2/2849/]九阴九阳[/url][url=http://www./html/2/2596/]凡人修仙传[/url]
2008-02-21 11:17
wyfandy
Rank: 1
来 自:深圳
等 级:新手上路
帖 子:376
专家分:0
注 册:2006-12-11
收藏
得分:0 
因为当他获取的c:/1.txt文件后就改变了Text1里的值,当运行完Text1.Text = Input(LOF(1), 1)语句后又调用了此过过程。close 1跟本没有执行,所以文件还没有关闭又打开了,你可以改为以下代码来解决这个问题。
Private Sub Text1_Change()
  Dim str1 As String
  Open "c:/1.txt" For Binary As #1
  str1 = Input(LOF(1), 1)
  Close 1
  Text1.Text = str1
End Sub

不论什么事,只要认准了一个目标,然后朝之不懈地努力,就一定实现。编程爱好者QQ群:21318556
2008-02-22 10:05
尐妖
Rank: 2
来 自:广东省
等 级:新手上路
威 望:3
帖 子:120
专家分:0
注 册:2008-2-16
收藏
得分:0 
是吧.还没有关闭打开状态.

倣棄?.﹎徻sんì嬄種繲脫嗎╃┈
2008-02-27 15:18
快速回复:本人初学vb请教textbox问题
数据加载中...
 
   



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

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