登录注册

把文件置入到Text或RichText中

资讯 2008-03-17 驱动中国 2,076 次阅读 0 条评论

dim sFile as string

'Set sFile equal to your filename

dim i as long

i = freefile()

open sFile for input as #i

txtMain.text = input$(i,LOF(i))

close #1

文件 sFile as input dim for #i L

版权声明:本文由驱动中国整理发布,转载需注明出处与原文链接。如有疑问请联系 editor@qudong.com。

本文价值 ★★★★★ — 成为第一个评分的人

登录后为本文打分

网友评论0 条评论

正在回复的评论取消

评论加载中…

🔐

登录后参与互动

评论、点赞均可赚积分
连续签到、邀请好友也有奖励 🎁

电脑端: 微信扫码登录微信内: 一键登录

微信扫一扫

打开微信「扫一扫」,分享本文到朋友圈或好友