易截截图软件、单文件、免安装、纯绿色、仅160KB

VB读取TXT文件到TEXT1里面,TEXT1后面出现空格

Private Sub Command1_Click()
Open App.Path & "\版本说明.txt" For append As #1
Print #1, Text1.Text
Close #1 '关闭打开的文件
End Sub

Private Sub Form_Load()
Dim x As String
Open App.Path & "\1.txt" For Input As #1
Input #1, x
text1.Text = Input(LOF(1), 1)
Close #1
End Sub

COMMAND1保存后打开程序读取1.TXT到TEXT1 后面出现了空格比如123456后面空了几格,请问怎么不让后面这几格空格显示到TEXT1里面啊?


消除从文本文件中读取后的回车符
  strLine = Replace(strLine, vbTab, "")    将tab符替换成""
    strLine = Replace(strLine, Chr(0), "")    将行结束符替换成""
    strLine = Replace(strlINE, vbCrLf, vbNullString)


text1.Text = RTrim(Input(LOF(1), 1))

最后的字符不是空格,是回车换行符,1楼的方法就行

谢谢````


相关问答:

VB修改注册表

用VB怎么只针对windows自带的文件的右键添加菜单 如(.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......

vb的成功之路 - 扩充话题 / 共享软件(走向海外)

在vb这编程里似乎有很多的东西是相联系的,为什么有些人对vb的编程摸不到头脑啊!并且有些事很容易的,但是却把它们的代码变成复杂,也去想一些不能实现的东西啊!




没分了,楼主多来点分!

来接点分

......

VB调用水晶报表Design 平凡提示MemoryFull问题

  各位大虾:
        我有一个VB调用水晶报表的系统,报表是作为一个Design嵌在VB里的,今天发现打印第一张报表正常,同样的数据,在点打印再调用一次就会报 Memory Full的错误,但是 ......

vb插入数据库重复值问题

在vb中怎么判断,插入到数据库中的值是重复的,本人才刚接触VB语言,甚是有好多地方还不懂,还请各位大侠们给出代码,谢谢了呀!!!
插入之前select一下阿。
或者写一个组合SQL插入语句,例如
IF not Exist(
& ......

熟悉VB的进来,有项目


有没有杭州的朋友,熟悉VB的,有兴趣做的话留下联系方式
VB6 OR VB.NET?
可惜不在杭州,遠程可否?

兄台联系方式呢

我也联系一下,不过在宁波

可惜我也不在杭州

北京的行不?

我在苏州, ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号