VB前辈们，帮我吧下面这两段vb代码翻译成C#的，小弟不胜感激，谢谢！！

Question

ps：调用了两个DLL
[DllImport("MySerial.dll" )]Private Declare Function OpenScalePort Lib "MySerial.dll" (ByVal ComPort As String, ByVal seting As String, ByVal fangshi As String) As LongPrivate Declare Function ReadInstruments Lib "MySerial.dll" (ByVal yibiao As String) As String Private Declare Function CloseScalePort Lib "MySerial.dll" () As Long Private Declare Function YHa9ReadCode Lib "MySerial.dll" () Private Declare Function LoadCellReadData Lib "MySerial.dll" (ByVal LoadCellType As String, ByVal LoadCellNumber As Long, ByVal ntime As Long) As StringPrivate Sub Command1_Click()  If OpenScalePort(Combo2.Text, Text1.Text, Combo3.Text) = 1 Then      If Combo1.Text = "boast" Then         Timer2.Enabled = True        Else         Timer1.Enabled = True      End If     Command1.Enabled = False  Else     MsgBox "失败!", vbInformation + vbOKOnly, "提示"  End IfEnd Sub Private Sub Command2_Click()  Timer1.Enabled = False  Timer2.Enabled = False  e = CloseScalePort   Command1.Enabled = TrueEnd Sub Private Sub Form_Unload(Cancel As Integer)  e = CloseScalePort End Sub
Private Sub Timer1_Timer()   Text2.Text = ReadInstruments(Combo1.Text) End Sub Private Sub Timer2_Timer()   DoEvents  Dim b As String    Dim LoadCellNumber As Integer    LoadCellNumber = 8    b = LoadCellReadData("boast", LoadCellNumber, 25)    Text2.Text = b   If Left(b, 1) = "S" Then          For i = 0 To LoadCellNumber - 1             Label1(i).Caption = Mid(b, 2 + i * 6, 6)         Next i   End If End Sub
 [DllImport("MyComm.dll")]
Private Declare Function OpenCom Lib "MyComm.dll" (ByVal ComPort As String, ByVal seting As String, ByVal fangshi As String) As LongPrivate Declare Function YHScreen Lib "MyComm.dll" (ByVal bigscreenType as String ,ByVal b As Double) As LongPrivate Declare Function CloseCom Lib "MyComm.dll" () As LongPrivate Sub Command1_Click()  If OpenCom("com1", "600,n,8,1", "start") = 1 Then     Timer1.Enabled = True  End IfEnd Sub Private Sub Form_Unload(Cancel As Integer)  e = CloseComEnd Sub Private Sub Timer1_Timer()  DoEvents  e = YHScreen("abc",123456)End Sub最好是帮我解释下，谢谢了。。

Answer 1

http://www.developerfusion.com/tools/convert/csharp-to-vb/

Answer 2

       [DllImport("MyComm.dll")]
        public static extern int OpenCom(StringBuilder ComPort, StringBuilder seting, StringBuilder fangshi);
        [DllImport("MyComm.dll")]
        public static extern int YHScreen(StringBuilder bigscreenType, double b);
        [DllImport("MyComm.dll")]
        public static extern int CloseCom();        [DllImport("MySerial.dll")]
        private static extern int OpenScalePort(StringBuilder ComPort, StringBuilder seting, StringBuilder fangshi);
        [DllImport("MySerial.dll")]
        private static extern StringBuilder ReadInstruments(StringBuilder yibiao);
        [DllImport("MySerial.dll")]
        private static extern int CloseScalePort();
        [DllImport("MySerial.dll")]
        private static extern void YHa9ReadCode();
        [DllImport("MySerial.dll")]
        private static extern string LoadCellReadData(StringBuilder LoadCellType, int LoadCellNumber, int ntime);其他的自己翻印把.都是控件的使用了

Answer 3

http://www.developerfusion.com/tools/convert/vb-to-csharp/http://www.codechanger.com/

Answer 4

这个转换过来的是
CONVERSION ERROR: Code could not be converted. Details:-- line 30 col 13: invalid EmbeddedStatementPlease check for any errors in the original code and try again.