当你厌倦了选择你的幸运号码，你可以让VB为你选择。下面的过程Lotto使用1到51的六个数字填充数组： Sub Lotto()Const spins = 6Const minNum = 1Const maxNum = 51Dim t As Integer'looping variable in outer loop 外部循环变量Dim i As Integer'looping va