vb弹出窗口程序编写 vb弹出消息框
首先要在vb的菜单编辑器建立一个菜单,比如建立一个标题为弹出菜单的,名称是menu1的主菜单项.然后在这个之下建立子菜单,记得建立的时候把子菜单的可见性的勾.
VB如何编写简单弹出对话框的代码?Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer) '点程序窗体上的X退出 Dim QueDing As Integer Beep QueDing = MsgBox("你真的确定要退出本程序吗?", vbYesNo + vbQuestion, "关闭窗口提示") If QueDing = vbYes Then End Else Cancel = 1 End If End Sub Private Sub Command1_Click() '点退出按钮退出 Form_QueryUnload 0, 0 End Sub
vb制作弹出窗口可以啊例如:你点击设置按钮,弹出窗体FORM2 你可以在FORM2里写入Private Sub Form_Load()Form3.show(弹出的那个窗体)End Sub
如何VB编写个随即弹出窗口的代码??急啊!Private Sub Form_click()a = "这是A"b = "这是B"c = "这是C"Randomizei = Int(Rnd * 3)Select Case iCase 0MsgBox aCase 1MsgBox bCase 2MsgBox cEnd SelectEnd Sub
VB中如何编写简单弹出对话框的代码?msgbox函数就可以啊~~
本人是VB小白,请问弹出窗口代码怎么编写直接使用 Shell 函数即可Private Sub Command1_Click()Shell "C:\Users\someone\Desktop\test.exe", vbNormalFocusEnd Sub
vb 弹出窗体1.在"菜单编辑器窗口"中建立一个将要作为弹出式菜单的主菜单项,如你所说的,就是"编辑"主菜单项,此菜单项的标题为"编辑",名称为"edit",所包含的菜单.
VB弹出窗口Private Sub Form_Load() Show MsgBox "kk" Form1.Print "kk" End Sub
vb中怎样写程序让窗口不断弹出?private sub form_load()while true msgbox "弹出窗口"wendend sub貌似楼主不干好事,这是个死循环,会不停的弹出来
怎么做VB的弹出对话框呢?msgbox 提示,按钮,标题 按钮那里用后面的值:0 只有确定 1确定和取消 2终止 重试 忽略 3…… 4^……5…… 自己试下