在InputBox中使用密码字符“*”

Question

我想在输入框中使用*字符，但会出现错误提示

conversion from "*" to string invalid 

如何让输入框将输入的文本隐藏为密码字符？

这是我的代码

Dim value As String
value = InputBox("Security Check", " Enter password", "*")

If value = "123456" Then
    numr.Enabled = True
End If
End Sub 

Answer 1

内置的功能输入框无法实现。您设置的值“*”是该函数的默认值。 http://msdn.microsoft.com/en-us/library/6z0ak68w(v=vs.90).aspx

这是你可以做的事情。 http://www.vbforums.com/showthread.php?627996-Accepting-password-characters-for-InputBox-function

Answer 2

下载vb.net表单：PasswordDialog.7z (3KB)

Answer 3

不幸的是，InputBox函数没有此参数。 VB.Net正在读取"*"作为DefaultResponse参数的值，或者如果用户只接受默认条目，value将等于InputBox。

事实上，*虽然仍然在VisualBasic命名空间中找到，但自2003年以来不被认为是最新的编码实践，但仍然被许多习惯于VB6的人使用（包括我自己） ）。它是MSDN Visual Basic Reference中的最新条目，适用于2008版Visual Studio，在当前（2017）Visual Basic语言参考中找不到。

在.Net中使用PasswordChar或其他密码字符的标准方法是使用Windows窗体TextBox，然后使用UseSystemPasswordChar或$start_dt = '13 Mar 2017'; $end_dt = '15 Mar 2017'; $diff = Carbon\Carbon::parse($start_dt)->diff(Carbon\Carbon::parse($end_dt)); echo $diff->days; 属性更改Form中的TextBox的本质。这些可以在“表单设计属性”窗口中访问，也可以作为代码中TextBox的属性访问。