SUB Resize ( Width AS Integer , Height AS Integer )