可以請人解釋這段代碼？

Question

我已經在VB 2010中建立了連接字符串，很容易理解，但我無法弄清楚裏面發生了什麼。

private: System::Void button1_Click(System::Object^ sender,System::EventArgs^ e) { 

MySqlConnection^ con =gcnew MySqlConnection("server=localhost;port=3306;userid=root;password=themohal123;database=myfirstdb"); 
     try 
     { 
      con->Open(); 
      MessageBox::Show("Connection Successful"); 
      con->Close(); 


     } 
     catch (Exception^ ex) 
     { 
     MessageBox::Show("Connection Not Successful"+ ex); 
     } 


     } 

Answer 1

它不是vb，它檢查mysql的連接狀態。您可以利用這個良好的工作，如果你想開始vb.net.You給查詢字符串返回的DataTable結果

Public Function mysql(ByVal str_query As String) As DataTable 
    Dim adptr As New MySqlDataAdapter 
    Dim filltab As New DataTable 
    Try 
     Using cnn As New MySqlConnection("server=" & mysql_server & ";user=" & mysql_user & ";password=" & mysql_password & ";database=" & mysql_database & ";Allow User Variables=True") 
      Using cmd As New MySqlCommand(str_query, cnn) 
       cnn.Open() 
           adptr = New MySqlDataAdapter(cmd) 
       adptr.Fill(filltab) 
       cnn.Close() 
      End Using 
     End Using 
    Catch ex As Exception 

「你可以登錄mysql的錯誤到一個文件在此登錄（ex.ToString） 結束Try 返回filltab End Function