大侠在帮帮小弟 是不是选出的随机数据都在a1里，没有随机选出的数据不在a1里面？ 谢谢
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Response.Write("<script lanuage=javascript>alert('您确定要提交这些随机抽查数据吗？');localtion='diaocha.aspx';</script>")
Button1.Enabled = False
Dim connstr As String
connstr = ConfigurationManager.AppSettings("strconn").ToString
Dim conn As New SqlConnection(connstr)
Dim myadapter3 As SqlDataAdapter = New SqlDataAdapter("select * from shuju where id in (" & strids & ")", conn)
Dim myds3 As DataSet = New DataSet()
myadapter3.Fill(myds3)
Dim a1() As DataRow = myds3.Tables(0).Select() 是不是所有数据里，只有随机选取的数据在a1里面？
[解决办法]
那既然这样，显然就是啊，你有什么好问的呢。
计算机是死的，你写的东西你知道它在做什么，它还可能不按照你的意志办事么？
