EasyProgrammingPlusFun

Stopwatch in vb.net  (Screen Shot) ****************************************** Public Class Form1     Dim Time As New DateTime     Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load         Button4.Visible = False         Button5.Visible = False         Button6.Visible = False         Label2.Visible = False         Label3.Visible = False         Label4.Visible = False     End Sub     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click         If Timer1.Enabled = True Then             Timer1.Stop()         Else             Time = DateTime.Now             Timer1.Start()...

 How to Crop and save Image in VB.NET (ScreenShot) *********************************************  'code from here Imports System.Drawing Imports System.Drawing.Imaging Public Class Form1     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click         Dim ofd As OpenFileDialog = New OpenFileDialog()         ofd.Title = "Please select a image to open"         ofd.Filter = ("Image Files | *.jpg; *.bmp")         ofd.ShowDialog()         Dim img As Image = New Bitmap(ofd.FileName)         PictureBox1.Image = img     End Sub     Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click         End     End Sub     Private Sub Button2_Click(ByVal sender As System.Objec...

 How to get mp3 tag image in picture box using  vb.net  (ScreenShot) ********************************************* 'code from here Imports HundredMilesSoftware.UltraID3Lib Imports System.IO Public Class Form1     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click         OpenFileDialog1.ShowDialog()         AxWindowsMediaPlayer1.URL = (OpenFileDialog1.FileName)         For Each track In OpenFileDialog1.FileNames             ListBox2.Items.Add(System.IO.Path.GetFileName(track))         Next         For Each track In OpenFileDialog1.FileNames             ListBox1.Items.Add(track)         Next         ListBox2.SelectedIndex = 0         ListBox1.SelectedIndex = 0 ...