一个写文件的很奇怪的问题，求教！
一段函数，作用是写一个log文件，语句如下：
logwrite = File.AppendText(logFile) '打开一个写文件流，追加写入文字
logwrite.Write(text) 'text是字符串变量，存放要写的log内容logwrite.close() '写完后关闭此文件流
现在发现一个问题，此函数在其他代码中都可以正常执行，但是如果放在：
dim r as DialogResult
r=OpenFileDialog1.ShowDialog()
之后，就会发生写不进东西的情况，语句单步跟踪确认是执行的，也没有出错信息，但就是不写东西进去。怎么回事？
又作了测试，如果将此函数放在上面那两句打开文件对话框语句之前，写文件一切正常。放在对话框语句之后的话，如果在打开文件对话框后，按了取消键，写文件也正常。就是选了文件，按确定后再执行写文件操作，就没有任何效果了。
百思不得其解，求高人相助。
[解决办法]
OpenFileDialog1.ShowDialog()会改变System.Environment.CurruntDirection
