VB怎么在内部窗弹出新对话柜

像游戏一样！

那些按钮会突然出现，又突然消失。

比如像一些网络游戏一样

点击“物品”按钮就会出现一个新对话柜。

在内部窗弹出窗体有两种最简单的方式：

1.使用picturebox控件，把你要做的界面和控件都放在picturebox里面，然后隐藏掉。当合适和时间，让这个Picturebox显示在合适的位置，就实现了那样的效果。

2.第二种方式就是使用子窗体，将一个窗体设为另一个窗体的子窗体，则子窗体会在父窗体的内部弹出，这需要用到API函数 Setparent

用msgbox和inputbox 可以实现简单的窗口弹出的数据输入

inputbox的例子（用于输入姓名，性别，年龄，输出结果为红色，十五号字体，结果显示在窗体居中位置）

Private Sub Form_Click() tiaoti$ = "学生登陆信息" a$ = InputBox("请输入您的姓名", tiaoti, "张三") b$ = InputBox("请输入您的性别", tiaoti, "男") c$ = InputBox("请输入您的年龄", tiaoti, "20") FontName = "宋体" FontSize = 15 ForeColor = vbRed d$ = "您的姓名是：" & a & "," & b & ",现年" & c & "岁" CurrentX = (ScaleWidth - TextWidth(d)) / 2 CurrentY = (ScaleHeight - TextHeight(d)) / 2 Print d End Sub

msgbox的例子（用于单击窗口时弹出对话框，是否确定退出）

Private Sub Form_Click() a = MsgBox("确定要退出吗？", vbOKCancel + vbQuestion, "提示") If a = 1 Then End Else Print "您还未退出" End If

End Sub 我刚学vb，只能举出两个肤浅的例子，可能不是很符合你提出的要求，希望也能对你有借鉴作用吧！

这些对话窗是需要你自己去设计的，简单的就用MessageBox或者InputBox。