小弟求大家 帮帮忙

Ctrl_T
在弹出的框中 控件类 选micro common dialog control 6.0
在工具栏会多个控件（对话框 控件）
建立新出现的这个控件
再建个按钮

如下代码：
Private Sub Command1_Click()
CommonDialog1.DialogTitle = "abcd"
CommonDialog1.Action = 1'打开对话框
End Sub

运行
看得很明显 对话框的标题栏变为abcd
关于 对话框的其他属性 可依此法测试

设置弹出对话框的标题