Excel笑話

寫了壹個自定義函數，可以把自然數轉換成民間的“正”字，但是用停用字代替了四個字(民間從上面缺壹條橫線，從下面缺壹條橫線)。

公共函數鄭(Num As Long)作為字符串

Dim i為整數，j為整數，Mstr為字符串

L = Int(數字/ 5)

Y =數字Mod 5

如果L & gt那麽0

對於i = 1到L

Mstr = Mstr & amp“積極”

然後

如果…就會結束

選擇案例Y

案例1

Mstr = Mstr & amp“壹”

案例2

Mstr = Mstr & amp"?"

案例3

Mstr = Mstr & amp"向上"

案例4

Mstr = Mstr & amp“停止”

結束選擇

鄭= Mstr

結束功能