Knoppen in MsgBox

[Jemp]

Hallo

Wanneer je een MsgBox programmeert in VBA ben je beperkt in het aantal mogelijkheden.
Is het mogelijk om zelf een iets uitgebreider MsgBox te programmeren?
Om aan te geven wat ik bedoel heb ik een voorbeeld van een MsgBox uit Excel (waarschuwing bij verwijderen bestand)?
Misschien is het gewoon onbegonnen werk voor een beginner?
Bekijk bijlage MsgBox.docx

Groetjes
JP

 

[Vincent1468]

Ja dat is mogenlijk.
hier een voorbeeld in vb.net 2010:


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox("Voorbeeld", MsgBoxStyle.YesNoCancel, "Helpmij.nl")
End Sub

zegmaar na de text "voorbeeld" een comma en daar het type
of anders een extra form maken die er zo uitziet.

 

[pasan]

Sub test()
MsgBox "Voorbeeld", vbYesNoCancel, "Helpmij.nl"
End Sub

je had het toch over VBA? en niet over VB.net

 

[Vincent1468]

Sorry verkeerd gelezen!!

 

[Jemp]

Had het inderdaad over VBA.
Wat Pasan aangeeft is wat ik bedoelde met "beperkte" mogelijkheden.
Ik zie nog steeds niet hoe je een "uitgebreider" MsgBox maakt (zie mijn voorbeeld = printscreen van een MsgBox uit excel)

Groetjes

 

[edmoor]

Dat in je voorbeeld is geen message box maar gewoon een formulier met tekst, een plaatje en knoppen.

 

[pasan]

Sub test()
Dim a As String
Dim b As String

a = Application.ActiveWorkbook.Name
File1 = Application.ActiveWorkbook.Path & "\" & a
File = FileLen(File1) / 1000
Mystamp = FileDateTime(File1)
b = Application.UserName
MsgBox (a & vbCrLf & b & vbCrLf & "Gewijzigd op" & "   " & Mystamp & vbCrLf & "bestands grote =  " & File & " kB")
End Sub

bedoelde je zoiets ?

 

[paulva]

Op deze manier kan het ook maar mooi oogt het niet...
Bekijk bijlage msgbox.xlsm

 

[Jemp]

Bedankt voor de snelle reacties iedereen:
- vermoedelijk lukt het niet om plaatjes in een MsgBox te plaatsen en dus zal Edmoor wel gelijk hebben. Als ik hetzelfde resulaat wil bereiken als in excel moet ik dus via een formulier gaan werken (voor zover ik de plaatjes nog ergens vind natuurlijk) ...
-zoals Paulva het doet kan het natuurlijk ook, alleen kan ik de inhoud van de box niet wijzigen en dus niet aangeven welke file er zal verwijderd worden ... maar toch dank voor het antwoord
- voorlopig hou ik het dus bij het voorstel van Passan, niet zo flitsend als in excel maar het werkt wel :thumb:

Groetjes en bedankt allen