I created macro and only few people will use it. How change characters to
stars(on monitor) when somebody is writing password?

below Is macro code:

Private Sub CommandButton2_Click()

Dim z As String

z = InputBox("enter password", "password")

If z = "example" Then
UserForm1.Show
Else
Exit Sub

End If
End Sub