将C#代码翻译成VB代码

[e103e104]

private void panelClear(string mess)
{
if (mainPanel.Controls.Count > 0)
{
mainPanel.Controls.Clear();
}
}


private void btnBout_Click(object sender, EventArgs e)
{
NewProtagonistForm newProtagonistForm = new NewProtagonistForm();
this.panelClear("字符串");
mainPanel.Controls.Add(newProtagonistForm);
}

[threenewbee]

Private Sub panelClear(ByVal mess As String) 
    If mainPanel.Controls.Count > 0 Then 
        mainPanel.Controls.Clear() 
    End If 
End Sub 
Private Sub btnBout_Click(ByVal sender As Object, ByVal e As EventArgs) 
    Dim newProtagonistForm As New NewProtagonistForm 
    Me.panelClear("字符串") 
    mainPanel.Controls.Add(newProtagonistForm) 
End Sub 

[dylike]

Private Sub panelClear(ByVal mess As String) 
    If mainPanel.Controls.Count > 0 Then 
        mainPanel.Controls.Clear() 
    End If 
End Sub 


Private Sub btnBout_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnBout.Click 
    Dim newProtagonistForm As New NewProtagonistForm 
    Me.panelClear("字符串") 
    mainPanel.Controls.Add(newProtagonistForm) 
End Sub