VB.NET no tiene StrPtr o equivalente

Pues eso, que el VB.NET hasta la versión 2008 no tiene un equivalente al StrPtr del Visual Basic 6, así que en el caso del InputBox no hay forma de saber cuando un usuario ha presionado el botón y cuando ha ingresado un texto vacío.

VB6

Dim dato As String

dato = InputBox("Ingrese el dato","Título")
If StrPtr(dato) = vbEmpty Then
'El usuario ha presionado Cancelar
Else
'Lo que sea...
End If

VB.NET

Dim dato As String = InputBox("Ingrese el dato","Título")

If dato Is Nothing Then
'El usuario ha presionado el botón Cancelar
'...o ingresó un texto vacío
Else
'Lo que sea...
End If

Este es mi escritorio de trabajo...

Creo que el título lo dice todo.