For i = 1 To 1
Selection.TypeText Round(Rnd() *1-0.5, 1)
Selection.MoveRight Unit:=wdCharacter,Count:=3
Next i
随机生成-0.5到+0.5之间的数,结果出来显示的是-.2等,不显示0
请高手赐教
æ§å¶é¢æ¿-åºåä¸è¯è¨-å ¶ä»æ ¼å¼-é¶èµ·å§æ¾ç¤ºï¼æ°åé项å¡ï¼-éæ©0.*ï¼è¿æä¸é¡¹æ¯.*ï¼-åºç¨
æ¥çwordä¸æ¾ç¤ºå°æ°çåå æ ¼æ ¼å¼æ¯ä¸æ¯ææ¬ï¼å¦æ¯ï¼è¯·æ´æ¹ä¸ºå¸¸è§
âwordä¸æ¾ç¤ºå°æ°çåå æ ¼æ ¼å¼æ¯ä¸æ¯ææ¬ï¼å¦æ¯ï¼è¯·æ´æ¹ä¸ºå¸¸è§âè¿ä¸ªä¸ä¼æ¹ï¼ä½æ¯å¨æ§å¶é¢æ¿é设置åé®é¢å·²è§£å³