有人能帮忙解决下素数的问题吗？
[local]1[/local] 我想把列表框1中的素数通过command1 click弄到列表框2中 Private Sub Form_Load()
Dim i As Integer, a(10) As Integer
Randomize
For i = 1 To 10
a(i) = Int(Rnd * 30) + 1
List1.AddItem a(i)
Next i
End Sub 这是窗体的程序 请问各位大神 控件按钮的程序怎么设计
