在VB中怎樣用代碼將26個英文字母按順序寫出來？

在一個文本框里顯示26個順序英文字母DimnumAsIntegernum=Asc("A")'獲取字母A的ascii碼DimsAsStringFori=0To25s=s+Chr(num+i)'根據ascii碼反求字符并順序連接NextText1.Text=s'在文本框里打印