MessageBox configurator?
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
Not sure if it could be useful in any kind of way but I tried building some kind of iLogic MessageBox configurator.
Now I'm wondering if it would be possible to like, save the MessageBox it spits out at the end as a template but I am not sure how to do it, I think the best way would be to save the output to another iLogic rule but how can I pass the value of the variables to another rule.
What do you guys think?
I know I could just write a new rule for every new MessageBox I need but where's the fun in that?
Dim Titre As String
Dim Message As String
Dim ListeIcon As New List(Of String)
ListeIcon.Add("Erreur")
ListeIcon.Add("Exclamation")
ListeIcon.Add("Informations")
ListeIcon.Add("Aucune")
ListeIcon.Add("Interrogation")
ListeIcon.Add("Arrêter")
ListeIcon.Add("Avertissement")
Titre = InputBox("Entrez le Titre", "Configurateur de Boite de messages", "Par Défaut")
Message = InputBox("Entrez le Message", "Configurateur de Boite de messages", "Par Défaut")
Icon = InputListBox("Choisir l'icone", ListeIcon, "", Title := "Configurateur de boite de message", ListName :="Icones")
If Icon = "Erreur" Then
MessageBox.Show(Message, Titre, MessageBoxButtons.OK, MessageBoxIcon.Error)
ElseIf Icon = "Exclamation" Then
MessageBox.Show(Message, Titre, MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
ElseIf Icon = "Informations" Then
MessageBox.Show(Message, Titre, MessageBoxButtons.OK, MessageBoxIcon.Information)
ElseIf Icon = "Aucune" Then
MessageBox.Show(Message, Titre, MessageBoxButtons.OK, MessageBoxIcon.None)
ElseIf Icon = "Interrogation" Then
MessageBox.Show(Message, Titre, MessageBoxButtons.OK, MessageBoxIcon.Question)
ElseIf Icon = "Arrêter" Then
MessageBox.Show(Message, Titre, MessageBoxButtons.OK, MessageBoxIcon.Stop)
ElseIf Icon = "Avertissement" Then
MessageBox.Show(Message, Titre, MessageBoxButtons.OK, MessageBoxIcon.Warning)
Else
MessageBox.Show("Essaye d'autres choses", "Ca existe pas")
End If
Link copied