Also erstmal Eigene Dateien öffnen:
Code:
pfad = Environ("userprofile")
Shell "explorer.exe " & pfad & "\Eigene Dateien", vbNormalFocus
So, jetzt ist die Frage wie du das mit den Fenstern meinst. Man könnte das ganz einfach über MsgBoxen regeln, dann sähe das so aus:
Code:
a = MsgBox("Ja oder Nein", vbYesNo + vbQuestion, "Frage")
If a = vbYes Then MsgBox "Vielen Dank!" Else MsgBox "Dann halt nicht!"
Als Referenz dazu: MsgBox-Funktion (Visual Basic)
Wenn du das über mehrere Formen machen willst, dann musst du eine zweite erstellen und so aufrufen:
Form2.Show
Wenn die andere Form dann auch noch verschwinden soll:
Form1.Hide