Se importi il namespace Microsoft.VisualBasic, ottieni accesso alla funzione DateSerial.

Ad ogni modo, io ti suggerirei di sfruttare la struttura DateTime:
codice:
Dim myDateTime As New System.DateTime(2004, 10, 26)
Ciao!