Извлечь DataRow после получения sql

Question

Я новый в VB.net, и мне нужно создать общую функцию для извлечения строки данных. Я пробовал этот путь. Но это не удается.

Function GetRecord(ByVal sql As String) As DataRow 
     Dim conn As MySqlConnection = connect() 
     Dim objDataSet As New DataSet 
     Dim dt As DataTable 
     Dim dr As DataRow 
     Try 
      Dim cmd As New MySqlCommand() 
      conn.Open() 
      cmd.Connection = conn 
      cmd.CommandText = sql 
      Dim da As New MySqlDataAdapter 
      da.SelectCommand = cmd 
      Dim ds As New DataSet 
      da.Fill(ds, "T") 
      dt = ds.Tables("T") 
      dr = dt.Rows.Item(0) 
     Catch e As Exception 
      Throw e 
     Finally 
      conn.Close() 
     End Try 
     GetRecord = dr 
    End Function 

замечание: Connect() возвращает объект подключения MySQL

Answer 1

Не совсем уверен, что вы пытаетесь сделать, но изменить свой код, чтобы быть как

da.Fill(dt, "T") 
    Catch e As Exception 
     Throw e 
    Finally 
     conn.Close() 
    End Try 
    GetRecord = dt.Rows.Item(0)