如何输出A到Z呢？ - VB6论坛 - 编程论坛档案馆

编程论坛 → 开发语言 → 『 VB6论坛』 → 如何输出A到Z呢？

标题：如何输出A到Z呢？

取消只看楼主

yuma

来　自：银河系
等　级：贵宾
威　望：33
帖　子：1883
专家分：2904
注　册：2009-12-22
结帖率：89.13%

楼主

问题点数：0 回复次数：5

如何输出A到Z呢？

就是写一个程序输入出：A B C D E F G H I J K L M N O P Q R S T U V W X Y Z

最好用上循环。

[ 本帖最后由 yuma 于 2012-6-27 19:39 编辑 ]

搜索更多相关主题的帖子: 如何　最好　

2012-06-27 19:26

yuma

来　自：银河系
等　级：贵宾
威　望：33
帖　子：1883
专家分：2904
注　册：2009-12-22

第 2 楼

得分:0

除了用ASCII 还有其它的办法吗？

心生万象，万象皆程序！
本人计算机知识网：http://bbs.为防伸手党，本站已停止会员注册。

2012-06-28 09:18

yuma

来　自：银河系
等　级：贵宾
威　望：33
帖　子：1883
专家分：2904
注　册：2009-12-22

第 3 楼

得分:0

好吧。我完成了。

程序代码：

Dim a As Long
For a = 65 To 90
Open "1.txt" For Append As #1
Print #1, Chr(a)
Close #1
Next

心生万象，万象皆程序！
本人计算机知识网：http://bbs.为防伸手党，本站已停止会员注册。

2012-06-29 18:45

yuma

来　自：银河系
等　级：贵宾
威　望：33
帖　子：1883
专家分：2904
注　册：2009-12-22

第 4 楼

得分:0

以下是引用h598937749在2012-7-8 15:15:45的发言：

Private Sub Command1_Click()
    For i = 65 To 90
      Print Chr(i)
    Next i
End Sub

可以给我来个横向排序吗？
就是输出在一横排上。

心生万象，万象皆程序！
本人计算机知识网：http://bbs.为防伸手党，本站已停止会员注册。

2012-07-08 17:31

yuma

来　自：银河系
等　级：贵宾
威　望：33
帖　子：1883
专家分：2904
注　册：2009-12-22

第 5 楼

得分:0

谢谢楼上两位。

心生万象，万象皆程序！
本人计算机知识网：http://bbs.为防伸手党，本站已停止会员注册。

2012-07-26 14:43

yuma

来　自：银河系
等　级：贵宾
威　望：33
帖　子：1883
专家分：2904
注　册：2009-12-22

第 6 楼

得分:0

这个cls可以不要的。

心生万象，万象皆程序！
本人计算机知识网：http://bbs.为防伸手党，本站已停止会员注册。

2012-07-30 20:02

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-372357-1-1.html