VB6中怎样按下一个按钮则弹出一个对话框~~要具体~~

1,输入对话框的用法:

Private Sub Command1_Click()

h = InputBox("请输入文本框中显示的值")

Text1.Text = h

End Sub

2,消息对话框

Private Sub Command1_Click()

MsgBox ("你好")

End Sub

3,通用对话框（打开对话框,另存为对话框,颜色对话框,字体对话框,打印对话框,帮助对话框）

对用对话框控件不是标准控件,可以通过以下方法添加

工程-部件-控件选项卡 选中Microsoft Common Dialog Control6.0复选框 单击确定.

下面只举打开对话框

Private Sub Command1_Click()

CommonDialog1.Filter = "Access数据库(*.mdb)" '设置“打开”对话框的筛选条件

CommonDialog1.ShowOpen '弹出“打开”对话框

End Sub

建议看VB程序设计方面的书.

这个你直接在:工程-工程1属性-通用选项卡 的启动对象所选的那个窗体(比如名叫FrmMain)

在FrmMain下写如下代码:

Private Sub Form_Load()

FrmLogin.Show 1

End Sub

其中FrmLogin就是你弹出的那个登录窗体的名字.

1表示将窗体作为模式对话框显示，这种情况下，Show方法后的代码要等到模式对话框关闭之后才能执行，且焦点也不能移动到其他窗体；