用vb编写程序将十进制数转换成八进制数(vb十进制怎么补零)

用vb编写程序将十进制数转换成八进制数(vb十进制怎么补零)

首页维修大全综合更新时间:2024-08-06 20:15:51

用vb编写程序将十进制数转换成八进制数

Private Sub Command1_Click() Dim a As Long a = InputBox("输入一个正整数"): n = a Do s = s & a Mod 8 a = a 8 Loop Until a = 0 Print "十进制数" & n & "转换成八进制数后为:"; StrReverse(s)End Sub

大家还看了
也许喜欢
更多栏目

© 2021 3dmxku.com,All Rights Reserved.