标题:请问下列程序为什么高位先输出,比如输入100转换8进制, 为什么输出 1 4 4, ...
取消只看楼主
lizhengxing
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2010-9-25
结帖率:50%
已结贴  问题点数:20 回复次数:0 
请问下列程序为什么高位先输出,比如输入100转换8进制, 为什么输出 1 4 4,而不是4 4 1
Public Function t1(ByVal n As Integer, ByVal r As Integer)     '方法二实现进制转换
If n <> 0 Then
  t1 = t1(n \ r, r)     '递归调用的方式,进行进制转换
  Picture1.Print n Mod r;     '结果依次在窗体上输出
End If
End Function


Private Sub Command1_Click()
Dim m%, r%, i%
m = Val(Text1.Text)     '取要进行转换的十进制数
r = Val(Text2.Text)     '取要转换的进制R
Picture1.Cls
Picture1.Print "用方法二转换成"; r; "进制数是:"
Picture1.Print t1(m, r)     '调用递归函数实现进制转换
End Sub

搜索更多相关主题的帖子: 进制 高位 输出 输入 
2010-11-02 18:16



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




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.647754 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved