Eliminar los caracteres siguientes a una palabra

[german_martin]

Como se hace esto en VB.NET ?

Supongamos que tengo una variable Coke = "Botella de cocacola"
Necesito que Coke = "Botella"
Es decir... borrar el resto "de cocacola"

Con VisualBasic 6 haria algo tipo:

Código:

Dim Coke As String
Coke = "Botella de cocacola"
MsgBox "Tu envase es:" & Left(Coke, InStr(Coke, " "))

Entonces el mensaje emergente seria en VB6 es:
Tu envase es: Botella



Como se hace esto en VB.Net?

[David]

Podría ser así:

Código vb.net:

Dim Coke As String
Coke = "Botella de cocacola"
MessageBox.Show("Tu envase es:" & Coke.Split(" ")(0))
 

[german_martin]

Muchas gracias