Visual Basic - Comparacion

hola...
como se hace para comparar los numeros que estan delante de un guion: ejemplo 12345-0, quiero comparar los primero 5 digitos con datos de una base de datos

primero ubicas en donde esta el guión y luego pasas a otra variable lo que esta antes del guion.

dim posicion as integer
dim varcomparar as integer
'o bien cadenacomparar as string

'Primero sacas la posicion del guión
posicion=Instr(1,cadenaoriginal,"-") 'En tu ejemplo posicion=6
'Ahora separas los valores que necesitas
'Si lo quieres en string
cadenacomparar=left(cadenaoriginal,posicion-1)
'O si lo quieres en numero
varcomparar=val(left(cadenaoriginal,posicion-1) )

Espero que te sirva