Hallo
Nachdem ich nach stundenlanger Recherche nichts gefunden habe, hier meine Frage:
Ich möchte aus einer Webanwendung eine MsgBox öffnen aber so, dass nur noch auf der MsgBox Daten eingegeben oder drauf geklickt werden kann.
In meinem Beispiel funktioniert das nicht; Ich kann immer noch auf die aufrufende Form klicken:
Dim msg As String
Dim title As String
Dim style As MsgBoxStyle
Dim response As MsgBoxResult
msg = "Möchten Sie weiterfahren?"
style = MsgBoxStyle.DefaultButton2 Or _
MsgBoxStyle.Critical Or MsgBoxStyle.YesNo Or MsgBoxStyle.ApplicationModal Or MsgBoxStyle.SystemModal Or MsgBoxStyle.MsgBoxSetForeground
title = "MsgBox Demonstration"
response = MsgBox(msg, style, title)
If response = MsgBoxResult.Yes Then
' Mach was.
Else
' Mach Anderes.
End If
Eigentlich müsste dies ja eigentlich der Parameter 'SystemModal' übernehmen, tut es aber nicht.
Habt ihr eine Idee?
Gruss
Manfi
Nachdem ich nach stundenlanger Recherche nichts gefunden habe, hier meine Frage:
Ich möchte aus einer Webanwendung eine MsgBox öffnen aber so, dass nur noch auf der MsgBox Daten eingegeben oder drauf geklickt werden kann.
In meinem Beispiel funktioniert das nicht; Ich kann immer noch auf die aufrufende Form klicken:
Dim msg As String
Dim title As String
Dim style As MsgBoxStyle
Dim response As MsgBoxResult
msg = "Möchten Sie weiterfahren?"
style = MsgBoxStyle.DefaultButton2 Or _
MsgBoxStyle.Critical Or MsgBoxStyle.YesNo Or MsgBoxStyle.ApplicationModal Or MsgBoxStyle.SystemModal Or MsgBoxStyle.MsgBoxSetForeground
title = "MsgBox Demonstration"
response = MsgBox(msg, style, title)
If response = MsgBoxResult.Yes Then
' Mach was.
Else
' Mach Anderes.
End If
Eigentlich müsste dies ja eigentlich der Parameter 'SystemModal' übernehmen, tut es aber nicht.
Habt ihr eine Idee?
Gruss
Manfi
Comment