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

        Label1.Text = My.Computer.FileSystem.GetDriveInfo("c:").TotalSize

        Label2.Text = My.Computer.FileSystem.GetDriveInfo("c:").TotalFreeSpace

    End Sub