vb编译错误:必选参数
PrivateSubCommand1_Click()a,k=InputBoxb=0i=0Doq=a\kr=aModkb=b+r*10^ii=i+1a=qLoopUntil...
Private Sub Command1_Click()
a , k = InputBox
b = 0
i = 0
Do
q = a \ k
r = a Mod k
b = b + r * 10 ^ i
i = i + 1
a = q
Loop Until q = 0
Print b
End
End Sub 展开
a , k = InputBox
b = 0
i = 0
Do
q = a \ k
r = a Mod k
b = b + r * 10 ^ i
i = i + 1
a = q
Loop Until q = 0
Print b
End
End Sub 展开
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询