[Release] Your Own Custom Message maker!

Hey, I ve released my own cutom message maker! its my fith program ive made =) Enjoy!

Features:
Advanced Styles of your choice
15 different types!
Choose your message title!
choose your message!
Fast And Easy!

S/S:

Virus Scan:VirusTotal - Free Online Virus, Malware and URL Scanner

Code:

 If Me.RadioButton1.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.Critical, Me.TextBox2.Text)
    End If
    If Me.RadioButton2.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.Information, Me.TextBox2.Text)
    End If
    If Me.RadioButton3.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.Exclamation, Me.TextBox2.Text)
    End If
    If Me.RadioButton4.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.MsgBoxHelp, Me.TextBox2.Text)
    End If
    If Me.RadioButton5.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.MsgBoxRight, Me.TextBox2.Text)
    End If
    If Me.RadioButton6.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.AbortRetryIgnore, Me.TextBox2.Text)
    End If
    If Me.RadioButton7.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.OkOnly, Me.TextBox2.Text)
    End If
    If Me.RadioButton8.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.OkCancel, Me.TextBox2.Text)
    End If
    If Me.RadioButton9.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.YesNo, Me.TextBox2.Text)
    End If
    If Me.RadioButton10.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.YesNoCancel, Me.TextBox2.Text)
    End If
    If Me.RadioButton11.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.Question, Me.TextBox2.Text)
    End If
    If Me.RadioButton12.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.OkOnly, Me.TextBox2.Text)
    End If
    If Me.RadioButton13.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.RetryCancel, Me.TextBox2.Text)
    End If
    If Me.RadioButton15.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.OkOnly, Me.TextBox2.Text)
    End If
    If Me.RadioButton16.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.MsgBoxRtlReading, Me.TextBox2.Text)
    End If

What does this do exactly?

I didn't actually run the application, but all your other buttons have no functions, and you radio controls have no function (according to the source).

So ....do tell.

I don't get the point

I got the point, but its kinda useless. Good try though =)

Approved...I missed the point of the application, found it in simplicity

The Exact point of this Application is useless
And there was no point in making this

Originally Posted by NextGen1

Code:

 If Me.RadioButton1.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.Critical, Me.TextBox2.Text)
    End If
    If Me.RadioButton2.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.Information, Me.TextBox2.Text)
    End If
    If Me.RadioButton3.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.Exclamation, Me.TextBox2.Text)
    End If
    If Me.RadioButton4.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.MsgBoxHelp, Me.TextBox2.Text)
    End If
    If Me.RadioButton5.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.MsgBoxRight, Me.TextBox2.Text)
    End If
    If Me.RadioButton6.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.AbortRetryIgnore, Me.TextBox2.Text)
    End If
    If Me.RadioButton7.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.OkOnly, Me.TextBox2.Text)
    End If
    If Me.RadioButton8.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.OkCancel, Me.TextBox2.Text)
    End If
    If Me.RadioButton9.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.YesNo, Me.TextBox2.Text)
    End If
    If Me.RadioButton10.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.YesNoCancel, Me.TextBox2.Text)
    End If
    If Me.RadioButton11.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.Question, Me.TextBox2.Text)
    End If
    If Me.RadioButton12.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.OkOnly, Me.TextBox2.Text)
    End If
    If Me.RadioButton13.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.RetryCancel, Me.TextBox2.Text)
    End If
    If Me.RadioButton15.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.OkOnly, Me.TextBox2.Text)
    End If
    If Me.RadioButton16.Checked Then
        Interaction.MsgBox(Me.TextBox1.Text, MsgBoxStyle.MsgBoxRtlReading, Me.TextBox2.Text)
    End If

What does this do exactly?

I didn't actually run the application, but all your other buttons have no functions, and you radio controls have no function (according to the source).

So ....do tell.

Ill Explain XD

Textbox 1 is Where it says message...In other words where you type your message

So its like Msgbox(Textbox1.text) Textbox1.text stands for the message of the users input

The radio buttons have no source because if you click on them when message isn't complete the msgbox comes up and all of this coding is in button1

And Btw This is my 1 week with vb and I am Having a blast! XD

Why is it useless? It makes a messagebox of your choice... Don't comment if you don't even understand the post you fucking idiot
btw ncie spam for post count

Thanks! XD

Originally Posted by VistaLite

Lmfao.
Ofc he knows what it does, hes the VB god.
No need to explain.
And its useless, because thats all it does. Its like 7-15 lines of code? No effort, no use.
Don't flame..

Oh Yes btw incase I didn t make it very clear

The Button has All The Functions coded into It XD

Button is known as:
Button1
Generate

Originally Posted by tempta43

Don't flame..

No no no. It's properly said:

Flameshield Activate

...its useless.

For your 6th program try making something worth using, put more time into it...

I'd say don't release anything unless its worth downloading.

When you first start learning I found it helpful to search You Tube like "Visual basic Tutorial" or "Visual Basic " and see what shows.

(Not trying to be mean just saying what I think.)

Must agree.

Clean up your code a bit, If statements are only for smaller things, use Cases and such.

Also, ^.
Although it's nice to take pride in your accomplishments, with an unoriginal (no offense) project such as this, it's not worth it to release it unless you're looking for areas of improvement and criticism.

I'd have to bet jason's fingers that the OP rated the thread 5 stars.

thats bad.

sorry

Lol Its not like you can drag the message box to my project even tough I could use 1 line of code. Anyways nice release as a beginner

[Release] Your Own Custom Message maker!

Post a Reply

Tags for this Thread