將vb6代碼轉換爲vb.net

-3

我想將此VB6代碼轉換爲VB.NET代碼，但我是VB.NET中的新手。將vb6代碼轉換爲vb.net

On Error Resume Next 
rsTemp.AddNew 
rsTemp!ID_temp = rsKnowledge!ID 
rsTemp!fact = rsKnowledge!YESfact 
rsTemp.Update 
jwb = rsKnowledge!Yes 
If Left(answer, 1) = "G" Then 
    rsKnowledge.MoveFirst 
    rsKnowledge.Find " ID= '" & answer & "' " 
    Label1.Caption = rsKnowledge!question 
Else 
    rsSolution.MoveFirst 
    rsSolution.Find " ID_solution= '" & answer & "' " 
    frmDiagnose.Label1.Caption = rsSolution!solution 
    frmDiagnose.Show vbModal 
End If

順便說一句，這是一個專家系統代碼，

來源

2014-04-01 user3485191

對我來說似乎是一個相當簡單的轉換任務。你到目前爲止做了什麼，爲什麼它不起作用？ – David

即時通訊不開玩笑，我在我的帖子中說，在vb.net新手。請幫助 – user3485191

作爲一個新手的東西是沒有任何藉口，甚至不嘗試，而是來這裏，並期望別人爲你做你的工作。對它進行破解，發佈你得到的和你有什麼問題。 –