主题：关于MessageBox的一个问题

以下这段代码是加在哪里执行的啊？ 

Dim Result As DialogResult
Result = MessageBox.Show("Visual Basic一点不难，是不是？", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    MessageBox.Show("不错，说明你已经认真学习了。","提示")
Else
    MessageBox.Show("好好学习吧，你会认同这个看法的。","提示")
End if

命令窗口。

在项目中怎么用？

继续看，看到后面Foxtable编程，事件编程，窗口设计，菜单设计就知道怎么用了。

我要在提示窗口按YES按钮，然后打开一个窗口，怎么写代码？谢谢了

楼主：假设你想单击了YES后打开一个名称为“人事录入”的窗体，则其代码为：

Dim Result As DialogResult
Result = MessageBox.Show("如果想打开人事录入窗体请点击YES，否则返回！", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
   forms("人事录入").open()
Else
return

End if

呵呵，我就是不知道这段代码写在那个事件里？

在窗体中增加一个按扭，并在它的单击事件中加入这个代码即可

不行啊

你如果放到命令窗口执行：

 

Dim Result As DialogResult
Result = MessageBox.Show("如果想打开人事录入窗体请点击YES,否则返回!", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    Forms("窗口名称").open()
End If