vb读写问题!帮忙看看!十分感谢?

Question

1. 你的WriteFile函数中根本没有写文件的代码。把WriteFile和ReadFile函数的代码交换一下。
2. 变量Mf在哪里申明的？Print #1, Mf中的Mf是不是你所预期的那个Mf呢？建议在代码的最前面加上这一句：Option Explicit，以防止代码中引用的变量是一个未被初始化的、并不是你所预期的Varient变量。

Answer 1

这是读取文件操作，哪里有写的语句？？？
就是读取也不对，不能用文本方式打开二进制文件。不然得到的是错误的数据。
Public Sub WriteFile()
     Open App.Path & "\aa.dll" For Input As #1         
     Line Input #1, Mf 
         Mf = Trim(Mf)
    Close #1 
End Sub