还有就是TEXT2 TEXT3 TEXT4的长度都不固定
还是不行 运行后是这样的 MsgBox "这里是TEXT3 " End Sub
下面的 是TEXT4 两个“”老是连不上 "End Sub
TEXT2里面的内容最后多出来了一行空白的怎么去掉 应该是这里的问题
这样吧text1.text=left(text1.text,len(text1.text)-2)
看LZ发了好多东西,都不发源码别太小气啦!~~~~~~~