Visual Basic.NET - formato de fecha y hora

Hola:

tengo este código:

Label8.DataBindings.Add("text", maqDataSet.Tables("maquinas"), "horainicio").ToString()

solo que en el label me sale: 20/12/1899 7:40:00 p.m."
lo que quiero que me ayuden es a darle formato a esa instrucción (horainicio, campo date/time de acces) para que me salga solo la hora: 19:40, no quiero la fecha, alguien puede hecharme una mano? ya lo intenté de varias maneras.
Saludos.

Así no obtienes la hora?
nombrecampo.hour

Hola Guillermo
Fijate que no me funciona, lo he puesto asi
Label8.DataBindings.Add("text", maqDataSet.Tables("maquinas"), "horainicio".hour).ToString()
y asi
Label8.DataBindings.Add("text", maqDataSet.Tables("maquinas"), "horainicio").hour()

y nada.
No sé cómo hacerlo, ayudas porfas. GRACIAS.

No se, yo ayer lo probé y si que me funcionó antes de decírtelo. Lo único que podrías hacer es primero almacenar el valor que quieres convertir en una variable, por ejemplo que se llame Fecha, y la reformateas así:
Y después en fecha ya tendrás sólo la hora almacenada, por lo que puedes asignarla a cualquier control que quieras.
NOTA: Ojo, que la variable Fecha tiene que ser tipo STRING, NO tipo date.
1saludo

Hola Guillermo, disculpa mi ignorancia, pero no consigo formatear el campo "HORAINICIO" de la tabla "maquinas "de mi base de datos "ciber" de Acces.
No se si el problema es la forma de conexión o el campo de la BD, tambien ya lo intenté a ponerle horacorta en acces y nada, algún otro consejo?. Gracias.

Public Sub conectarse()
Dim conn As String
conn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\ciber.accdb;Persist Security Info=False"
Dim cmd As OleDbConnection
cmd = New OleDbConnection(conn)
Dim tAdapter As OleDbDataAdapter
tAdapter = New OleDbDataAdapter
tAdapter.SelectCommand = New OleDbCommand("select * from maquinas where idpc = '" + maq + "'", cmd)
Dim maqDataSet As DataSet
maqDataSet = New DataSet
maqDataSet.Tables.Add("maquinas")
tAdapter.Fill(maqDataSet.Tables("maquinas"))

lboxnombres.DataSource = maqDataSet.Tables("maquinas")
lboxnombres.DisplayMember = "idpc"
GroupBox2.DataBindings.Add("text", maqDataSet.Tables("maquinas"), "idpc")
Label8.DataBindings.Add("Text", maqDataSet.Tables("maquinas"), "horainicio") ''' aqui no consigo formatear la hora en "HH:mm"
GroupBox2.DataBindings.Clear()
Label8.DataBindings.Clear()
cmd.Close()
End Sub

Private Sub but1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles but1.Click
maq = "ciber1"
conectarse()
End Sub

Hola Francisco! No te preocupes, yo tambien he empezado hace poco a reciclarme, puesto que hace años que no tocaba VB y también me han ayudado mucho por aquí y otros foros.
A ver, tú tienes en Label8 la fecha con la hora en formato String, es correcto no?
Pues solo debes reformatear ése label o aplicarle lo de hour. Mira, te pongo el codigo de las 2 opciones, las acabo de probar en un formulario y funcionan las 2 correctamente

Primera opción:

Y si así no te funciona prueba como te dije al principio. Segunda opcion:

El codigo que elijas, lo agregas despues de la linea cmd.Close() y arreglado. Te tiene que funcionar así.
Ya me cuentas. Ale, me voy pa casita que toy hecho polvo hoy. jeje ;-).
1saludo.

Gracias Guillermo!
que esa ha sido la solucion eh?
Creo que podre ir mejorando con personas como tu.
Muchas gracias y hasta laproxima consulta eh?
Saludos.