Convertendo String para Data

Boa tarde eu irie receber esse valor em uma variável.. 28101980

Isso é uma data.. eu tenho que verificar se essa data é válida e se possui oito dígitos..

Tentei fazer isso..

Dim data As Date data = CDate(ValorTextBox.Text) 'Dim valor As Date = CDate(ValorTextBox.Text) exibe.Text = data

Mas não consegui..

Grata

Letícia