摘要: '需要引用 Microsoft Scripting Runtime Dim fso As New FileSystemObject Dim oText As TextStream Dim fileName$ Private Sub Form_Load() Dim s$ fileName = App. 阅读全文
posted @ 2013-05-06 17:40 忘忧般若汤 阅读(2403) 评论(0) 推荐(0) 编辑