Dim a As New Random
Dim num As Int32
Dim h As New Hashtable
While h.Count < n + 1
num = a.Next(1, 36)
If Not h.Contains(num) Then
h.Add(num, num)
Label2.Text = Label2.Text & " " & num
End If
End While
在这个代码中抽取n个数字后,应如何结束代码?

[此贴子已经被作者于2007-4-30 21:31:28编辑过]

用一个while(?=?)
行不行！就是当输入一个预定的字符，结束循环