Showing posts with label beep. Show all posts
Showing posts with label beep. Show all posts

Saturday, June 23, 2012

Make Your Computer Beep With Visual Basic 2008

 Design
Testing Project

You will need the following:
* 1 Button (Button Has a Hover effect that changes "Click Me!!" to ": D " when hover mouse)


Program Codes :

Imports System.IO
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 Button1_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseHover
        Button1.Text = ":D"
    End Sub

    Private Sub Button1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseLeave
        Button1.Text = "Click Me!!"
    End Sub
End Class