bueno...es triste pero creo haberme encontrado yo mismo la solución.
la posteo por si ha alguien le ocurre lo mismo, que por lo menos pueda guiarse por estos pasos:
hice el siguiente codigo en el formulario2:
Código vb:
Ver originalImports MySql.Data.MySqlClient
Public Class Form2
Dim tabla, tipo, consultaTipo As String
Dim consulta As New MySqlCommand
Dim conexion As New MySqlConnection
Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
conexion = New MySqlConnection("server=localhost;database=horta na mesa; uid=root;")
tabla = Form1.listaTabla.Text
tipo = Form1.listaTipo.Text
conexion.Open()
'Hacemos un case para el tipo de consulta que se realiza
Select Case tipo
Case "SELECT"
consulta = New MySqlCommand("SELECT * from " & tabla & ";")
'Hacemos "consultaTipo" para que podamos mostrarlo en el textbox, ya que "consulta"
'no se puede transformar a string devido a que es un MysqlCommand
consultaTipo = "SELECT * from " & tabla & ";"
consulta.Connection = conexion
'Metemos en los textbox lo que queremos
txtConsulta.Text = consultaTipo
Dim da As New MySqlDataAdapter
da.SelectCommand = consulta
Dim dt As New DataTable
da.Fill(dt)
Dim numeroregistros = dt.Rows.Count()
If tabla = "clientes" Then
For i = 0 To numeroregistros - 1
Dim row As DataRow = dt.Rows(i)
txtResultado.Text = txtResultado.Text & CStr(row("nombre")) & ", " & CStr(row("dni")) & ", " & CStr(row("direccion")) & ", " & CStr(row("telefono")) & Environment.NewLine
Next
ElseIf tabla = "proveedores" Then
MessageBox.Show("Tabla de proveedores")
End If
'Borro los otros "Case" ya que solo interesaba el select
End Select
End Sub
Private Sub f2Cerrar_Click(sender As Object, e As EventArgs) Handles f2Cerrar.Click
Close()
End Sub
End Class