21.7 利用形状控件制作掷骰子的实例