用VB做一個產生隨機數的程序過程:
1 創建隨機數窗體:
2 編寫產生隨機數的事件:Private Sub Command1_Click()Randomize '初始化隨機數生成器List1.AddItem Int((Rnd * 9) + 1)End Sub3 運行結果:
用VB做一個產生隨機數的程序過程:
1 創建隨機數窗體:
2 編寫產生隨機數的事件:Private Sub Command1_Click()Randomize '初始化隨機數生成器List1.AddItem Int((Rnd * 9) + 1)End Sub3 運行結果: