本任务的内容
概要
在 Microsoft Excel 中,可以创建一个自定义对话框,以提示用户输入信息,通过使用文本框、 按钮或其他对话框控件。通常,当在文本框中键入文本时,文本将显示您键入。但是,可以使用的 (VBA) 版用户窗体 Microsoft Visual Basic for Applications 的属性以创建隐藏或"屏蔽"文本框的效果。这可用于创建密码的对话框中,您不希望在"可见"文本框中键入的文本。以下信息描述如何达到这种效果。返回页首
创建对话框
-
启动 Excel。
-
按 Alt + F11 来启动 Microsoft Visual Basic 编辑器。
-
在插入菜单中,单击用户窗体。
-
使用控件工具箱中添加一个文本框和一个命令按钮到您的用户窗体。
-
在属性页中的对象列表中,单击TextBox1。
-
单击按字母顺序选项卡中的PasswordChar。
-
键入一个星号 (*)。
-
在属性页中的对象列表中,单击UserForm1。
-
单击运行菜单上的运行用户窗体。
在键入字母时,会显示星号。返回页首
要使用对话框中的代码示例
若要检索写到文本框中的文本字符串,可以使用下面的代码示例:
-
双击用户窗体上的CommandButton1 。
-
键入以下代码:
Private Sub CommandButton1_Click() MsgBox Me.TextBox1End Sub
-
单击保存以保存您的项目。
-
单击运行菜单上的运行子过程/用户窗体。
在文本框中,键入一个单词,然后单击命令按钮。您键入的文本将显示在消息框中。返回页首