[TUT] How to make a Beeper [TUT]

[mizzer3]

Hello I will learn you how to make a Beeper in VB08

File > New Project > Windows Application

Make :

- 4 Buttons
- 1 Timer

Here is the code : ( Just Copy and Paste )

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Console.Beep()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Timer1.Stop()
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Timer1.Start()


    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Console.Beep()
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Me.Hide()
        ShowInTaskbar = False

    End Sub
End Class

Picture:

Press Thanks !

[XGelite]

i think this has been posted before, but thanks anyways .

[mizzer3]

i think this has been posted before, but thanks anyways .

I dont know i , but the version is mine No Problem

[Zoom]

Hello I will elarn you how to make a Beeper in VB08

File > New Project > Windows Application

Make :

- 4 Buttons
- 1 Timer

Here is the code : ( Just Copy and Paste )

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Console.Beep()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Timer1.Stop()
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Timer1.Start()


    End Sub

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Console.Beep()
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Me.Hide()
        ShowInTaskbar = False

    End Sub
End Class

Picture:

Press Thanks !

Nice man u doing great progress! keep it up!

[Zoom]

Thanks!!

Why do you say thanks? ^^]

[Pixie]

Why do you say thanks? ^^]

Because he is a spammer just looking for posts, that's the 3rd one, but I've already deleted one, because it was the same message