Visual Basic - Como paso el resultado de un método Fill a un formulario

Buenos días a todos los foreros, tengo un gran problema...

Estoy haciendo una aplicación en la que tengo que validar el usuario que la va a usar con nombre de usuario y contraseña...una vez que ya esta validado el usuario, tengo que poner en un label de otro formulario el nombre y apellidos del usuario que ha iniciado sesion.

El problemas es que valido el usuario correctamente con un Fill pero no se como pasarlo al otro formulario para poder volver a buscar el usuario y su nombre y apellidos.

Aqui os dejo mi codigo por si os es de ayuda

FORMULARIO FRMLOGIN.VB

consulta = Me.AgentesTableAdapter.FillByLogin(Me.InmobiliariaDataSet.Agentes, txtCodAgente.Text, txtContraseña.Text)

If consulta = 0 Then
If MessageBox.Show("Usuario o Contraseña Incorrecta. ¿Desea volver a intentarlo?", "", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2) = Windows.Forms.DialogResult.Yes Then
txtCodAgente.Text = ""
txtContraseña.Text = ""
End If
Else
frmPrincipal.Show()
Me.Close()
End If


FORMULARIO FRMCITAS.VB

Private Sub frmCitas_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim consulta As Integer
consulta = frmLogin.AgentesTableAdapter.FillByLogin(frmLogin.InmobiliariaDataSet.Agentes, frmLogin.txtCodAgente.Text, frmLogin.txtContraseña.Text)
ofila = frmLogin.InmobiliariaDataSet.Agentes.Rows(iPosicionFilaActual)
txtAgente.Text = ofila("NombreApellidos")
End Sub



Gracias!!!

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim f2 As New Form2
f2.Label1.Text = "YO"
f2.Label2.Text = "1234"
f2.Show()
End Sub
End Class