在一个文本框里显示26个顺序英文字母Dim num As Integernum = Asc("A") '获取字母A的ascii码Dim s As String For i = 0 To 25s = s + Chr(num + i) ' 根据ascii码反求字符并顺序连接NextText1.Text = s '在文本框里打印