写一个函数,要求传入一个1到n位数的随机数值,如传入随机数123456789,返回12345金币67银币89铜币,传入随机数1234,返回0金币12银币34铜币。
提示:推荐Int,Rnd,Mid,Len这四个函数组合应用。
解题思路:
先随机一个数,然后铜币取右边2位,银币取右边4-2位,余下的就是金币了金
币了
代码:
Randomize
TracePrint a( Int((99999999 * Rnd) + 1))
Function a(m)
If len(m)>4
a = left(m,len(m) - 4) & "金币" & left(Right(m, 4), 2) & "银币" & Right(m, 2) & "铜币"
ElseIf len(m) <= 2 Then
a = "0金币0银币" & Right(m, 2) & "铜币"
ElseIf 4 <= len(m) > 2 Then
a="0金币"&left(Right(m, 4), 2) &"银币" & Right(m, 2) & "铜币"
end if
End Function
1-6级按键认证答案大全下载:
(复制打开→) url7.me/S4Vk1