因为你是根据条件才去执行标签控件的赋值 所以 你只需要在num赋值后 msgbox num 看是否达到你那些判断条件 如果没有达到 自然无法显示出指定字符
你在 num=int((5*rnd)+1)下面加一行代码Msgbox num看看是什么值,你是否考虑到了所有可能产生的随机数?