在窗体上加上一个文本控件PCSTextBox，画一个命令按钮，当单击命令按钮的时候将显示"打开文件"对话框，设置该对话框只用于打开文本文件，然后在文本控件中显示打开的文件名。请填空。Private Sub Command1_Click（）CommonDialog1.Filter= 【12】CommonDialog1.ShowOpenPCSTextBox.Text= 【13】End Sub
在窗体上加上一个文本控件PCSTextBox，画一个命令按钮，当单击命令按钮的时候将显示"打开文件"对话框，设置该对话框只用于打开文本文件，然后在文本控件中显示打开的文件名。请填空。
Private Sub Command1_Click（）
CommonDialog1.Filter= 【12】
CommonDialog1.ShowOpen
PCSTextBox.Text= 【13】
End Sub
相关考题：
在窗体上加上一个文本框控件TextBox，画一个命令按钮，当单击命令按钮的时候将显示"保存文件"对话框，设置该对话框可用于保存文本文件（默认） 和Word文档，然后在文本框控件中显示保存的文件名，请填空。Private Sub Command1_Click（）CommonDialog1.Filter= 【13】CommonDialog1.Filter= 【14】CommonDialog1.ShowSaveTextBox.Text= 【15】End Sub
窗体中有两个命令按钮：“显示”（控件名为cmdDisplay）和“测试”（控件名为cmdTest）。以下事件过程的功能是：单击“测试”按钮时，窗体上弹出一个消息框。如果单击消息框的“确定”按钮，隐藏窗体上的“显示”命令按钮；单击“取消”按钮关闭窗体。按照功能要求，将程序补充完整。 Private Sub cmdTest_Click（）Answer= （“隐藏按钮”，vbOKCancel）If Answer=vbOK ThencmdDisplay.Visible=ElseDocmd.CloseEnd IfEnd Sub
在窗体上加上一个富文本控件RichTextBox，画一个命令按钮，当单击命令按钮的时候，将显示“保存文件”对话框，设置该对话框可用于保存文本文件(默认文件类型)和Word文档，然后将富文本控件中显示的内容以指定的文件名保存，完成程序。Private SubCommand1_Click()CommonDialogl.Filter=【 】CommonDialogl.FilterIndex=【 】CommonDialogl.ShowSaveRichTextBoxl.SaveFile【 】End Sub
在窗体上加上一个富文本控件Rich TextBox，画一个命令按钮，当单击命令按钮的时候，将显示“打开文件”对话框，设置该对话框只用于找开文本文件，然后在富文本控件中显示打开的文件内容。Private Sub Command1_Click ( )CommonDialogFilter = 【 】CommonDialogShowOpenRichTextBoxFileName = 【 】End Sub
（ 14 ）窗体中有两个命令按钮： “ 显示 ” （控件名为 cmdDisplay ）和 “ 测试 ” （控件名为 cmdTest ） 。 以下事件过程的功能是：单击 “ 测试 ” 按钮时，窗体上弹出一个消息框。如果单击消息框的 “ 确定 ” 按钮 ，隐藏窗体上的 “ 显示 ” 命令按钮；单击 “ 取消 ” 按钮关闭窗体。按照功能要求，将程序补充完整。Private Sub cmdTest_Click()Answer= 【 14 】 （ “ 隐藏按钮 ” ， vbOKCancel ）If Answer=vbOK ThencmdDisplay.Visible= 【 15 】ElseDocmd.CloseEnd IfEnd Sub