未命名  

Private Sub CommandButton1_Click()
For i = 1 To 16
Cells(1, i) = Fix(Rnd() * 16)
Next

End Sub

 

創作者介紹
創作者 王宗華 的頭像
ray800528

王宗華

ray800528 發表在 痞客邦 留言(0) 人氣( 2 )

▲top

請先 登入 以發表留言。