Question

在vb中结束时弹张图片出来

就是在软件结束时最后弹出一张图片

Answer 1

创建两个窗体,这是form1中代码，缓镇代码直接可用
Option Explicit

Private Sub Command1_Click()
Unload Me
Form2.Show
End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Form2.Show
End Sub
'添加两个缺省窗体,在form2上添加一个picturebox,选择一张图片加载

_____________________________________________________________

form2中代码扰烂粗,代码直接可用

Option Explicit
Dim str1 As Integer

Private Sub Command1_Click()
Form1.Show
str1 = MsgBox("卸载本窗体吗?", vbInformation + vbYesNo, "历袭提示信息")
If str1 = 6 Then
Unload Me
Else
Exit Sub
End If
End Sub

Answer 2

加个窗体(formend)，窗体上早敏搏放picturebox,在主窗体的queryunload事拿雹件中加载陆祥并显示这个窗体（formend.show)

Answer 3

当一个form被穗岩枝关闭时会发生QueryUnload事件，你只要枣陵在这个猜敏sub里面写你想该窗体被关闭时运行的代码就好了.