这是一个asp.net的全文教程.里面还有数据库的数据.对初学者有很大的帮助

				
				
				
				Ch06-03-02.aspx 产生三组介于1到50之间的整数
				
				
								Dim I As Integer, Nums As Single
				' 使用Fix()函数的范例
				Response.Write("产生三组介于1到49之间的整数为：")
				For i = 1 to 3
					Do Until (Nums  0)
						Randomize
						Nums = Fix(Rnd * 100)
					Loop
					Response.Write(Nums & "")
					Nums = 0
				Next
				%>