我喜欢这么用:if MessageBox.Show("确定录入信息正确吗?","提示",MessageBoxButtons.OKCancel,MessageBoxIcon.Question) = 1 Syscmd.Project.Save() Forms("窗口1").Close()end if