dim str , s
open "filename" for input as #1
while not eof(1)
line input #1,str
s=s & str &crlf
loop
close #1
text1.text=s
open "filename" for input as #1
while not eof(1)
line input #1,str
s=s & str &crlf
loop
close #1
text1.text=s
解决方案 »
- VB 在类中关于数组的传递
- 在VB6里,如何用代码将dbf文件导到自己的数据库里?
- VBA关于打开文件的问题
- 做数据库时,是将textbox控件绑定到字段好,还是用程序处理好?
- 请问Active Server Pages ObjectContext Library和Active Server Pages Object Library有什么不同
- vb中过程的区别
- image 和 picture控件的问题
- 数据库-->怎么能: TXET里填什么,CMDRES就查询什么?
- 是高手吗?是就进来试试!!!这里有高分等你拿呀!但一定要解决问题呀!!!!!
- 急问一简单问题!!
- vb连接各类数据库的方法
- 怎么用程序控制datagird中的行选择?
Text1.Text = Input(LOF(1), 1)
Close 1
这个方法在VB5.0 6.0中都很实用的。