PrivateSub Button1_Click()Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click DimstrAsString Dim sArr AsString() str= hidden1.Value sArr =str.Split(",") str="" ForEachstrIn sArr Response.Write("<br>数组值:"+str) Next End Sub