Pass en programa

[null]

Buenas a todos, mi pregunta es si existe algun comando para transformar las letras en asteriscos (*) para usarlas a modo de password :

Private Sub Form_Load()
Dim X As String
X = InputBox("Introduzca nombre de usuario:", "Comienzo de sesión")
If X <> "Luciano" Then
End
Else:
Bienvenida = MsgBox("Bienvenidos a la aplicacion", vbExclamation + vbOKOnly, "Bienvenidos!")
End If
End Sub

No hay alguna manera de transformar las letras en asteriscos en el inputbox?
no existe algun otro metodo ?
Seguro estoy equivocado, espero su respuesta!
Soy aprendiz todavia ...

Saludos!