--->>> when i click the yes button me.show, disappears, it suppose to stay, i don't know that the problem is. I hope someone can help thanks in advanced ^_^
Public Class MagicBeans

Private Sub MagicBeans_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    MessageBox.Show("WELCOME TO MAGIC BEANS INC. ^_^ :* :)) :p", Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Information)

    Dim button As DialogResult
    button = MessageBox.Show("Would you like to become a member? (note: membership fee Php 500, non-member 250 for)", Me.Text, MessageBoxButtons.YesNo, MessageBoxIcon.Information)
    If button = Windows.Forms.DialogResult.Yes Then
        Me.Show()
        Me.Dispose(False)
    ElseIf button = Windows.Forms.DialogResult.No Then
        Transaction.Show()
        Me.Dispose(False)

    End If
End Sub

End Class

 MessageBox.Show("WELCOME TO MAGIC BEANS INC. ^_^ :* :)) :p", Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Information)
          Dim button As DialogResult
          button = MessageBox.Show("Would you like to become a member? (note: membership fee Php 500, non-member 250 for)", Me.Text, MessageBoxButtons.YesNo, MessageBoxIcon.Information)
          If button = Windows.Forms.DialogResult.Yes Then
               Me.Show()
               'Me.Dispose(False)
          ElseIf button = Windows.Forms.DialogResult.No Then
               Form2.Show()
               Me.Dispose(False)
          End If
commented: haha laughing at myself right now. Thanks anyway :) +0
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.