新手求助，关于串口通讯

 Public Overloads Sub Write(ByVal Buffer As Byte())
        Dim iBytesWritten, iRc As Integer
        If mhRS = -1 Then
            Throw New ApplicationException("必须先打开通信端口，才能输出。")
        Else
            Try
                iRc = WriteFile(mhRS, Buffer, Buffer.Length, iBytesWritten, Nothing)
                If iRc = 0 Then
                    Throw New ApplicationException("传输失败—已传输" & iBytesWritten.ToString & "Byte/欲传输" & Buffer.Length.ToString & "Bytes")
                End If
            Catch ex As Exception
                Throw
            End Try
            End If
    End Sub
在用vb.net试验一个通讯程序，在逐语句调试时，当程序运行到iRc = WriteFile(mhRS, Buffer, Buffer.Length, iBytesWritten, Nothing)语句时，程序就没有响应了，为什么，（注：串口应成功打开 --------------------编程问答-------------------- 可能写入的文件不存在的问题吧！你先建立一个文件看看！ --------------------编程问答-------------------- LZ:参考我的资源VB.NET2008的串口工程 --------------------编程问答-------------------- 关于API串口通信的例子，不过是VB6.0的，你可以参考一下：http://download.csdn.net/source/1777027 --------------------编程问答-------------------- 谢谢了，问题已经解决了
同样的程序，我重启了一次vb.net就可以了

补充：.NET技术 ,  VB.NET