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