EasyProgrammingPlusFun

Advance Media Player Code in vb .net  *********************************************** Option Strict On Imports System.Runtime.InteropServices Public Class Form1     Private Const APPCOMMAND_VOLUME_MUTE As Integer = &H80000     Private Const APPCOMMAND_VOLUME_UP As Integer = &HA0000     Private Const APPCOMMAND_VOLUME_DOWN As Integer = &H90000     Private Const WM_APPCOMMAND As Integer = &H319     Dim TrcBarValue As Integer     <DllImport("user32.dll")> Public Shared Function SendMessageW(ByVal hWnd As IntPtr, ByVal msg As Integer, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As IntPtr     End Function     Dim track As String     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click         If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then             ListBox1.Items.Clear()             ListBox2.Items.Clear()             AxWindowsMediaPlayer1.URL = (OpenFileD

For this you need  1) a picture box with image 2) text box 3) a button Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click         Dim NF As New Font("Impact", 36, FontStyle.Italic)         Dim NB As New SolidBrush(Color.FromArgb(64, 192, 255, 255))         NB.Color = Color.FromArgb(128, 0, 0, 0)         PictureBox1.CreateGraphics.DrawString(TextBox1.Text, NF, NB, 15, 135)     End Sub