My First Progam

[Lmsjr1234]

This is my first program using Visual Basic.It is a very simple one and isn't quite where i want it to be.Just try it out and give your thoughts and ideas.
Virus Total
Virus Scan
Screenshot

It is basically a quiz/sur.vey to find out if you are popular or just a loser

[Lyoto Machida]

1º - What is it?
2º - 2 Virus Scans , virusscan.jotti.org , virustotal.com
3º - Screen shoot
4º - Program description

Good luck

[Lmsjr1234]

1º - What is it?
2º - 2 Virus Scans , virusscan.jotti.org , virustotal.com
3º - Screen shoot
4º - Program description

Good luck

opps sorry haven't released in awhile editing now

1º - What is it?
2º - 2 Virus Scans , virusscan.jotti.org , virustotal.com
3º - Screen shoot
4º - Program description

Good luck

That good?

[Lyoto Machida]

Now its good
Now wait for the approve

@Cho Chang

[Jabuuty671]

Approved .

[kats916]

how did yo make a new window pop put with other stuff not just a txtbox?

[Lmsjr1234]

how did yo make a new window pop put with other stuff not just a txtbox?

I think you mean what code did i use for each button.I simply used Form1. Show()

[Blendsoft]

Interesting... Facebook makes you popular

[Lmsjr1234]

Interesting... Facebook makes you popular

Yeah I mean I could have made a question for each response but I'm way to lazy to do that so i just link both of answers to the same window except for last one

[Lyoto Machida]

There are better ways to do this, without having to make like 500 forms..

[Meow556]

Pretty good, you know you can add a color dialog and change the background color and text color :P

[cgallagher21]

Ok u should instead opening like 20 god damn windows. Do Form2.Show()
Form1.Hide()
And so on

[Blendsoft]

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim answer As String
        MsgBox("Question 1", MsgBoxStyle.YesNo, "Sample quiz")
        MsgBox("Question 2", MsgBoxStyle.YesNo, "Sample quiz")
        MsgBox("Question 3", MsgBoxStyle.YesNo, "Sample quiz")
        answer = MsgBox("Do you have facebook profile?", MsgBoxStyle.YesNo, "Sample quiz")
        If answer = "6" Then '6 is Yes, 7 is No
            MsgBox("You're popular, add me. I wanna be popular too (hehheh)", MsgBoxStyle.Information, "Sample quiz")
            End
        Else
            MsgBox("You are looser! Get one immediatly!!! :)", MsgBoxStyle.Critical, "Sample quiz")
            End
        End If
    End Sub

Easier?

[Takari]

Good for your first program.