摘要: Dim bb As New Random(123) Dim Pcolor(deptEmp.Rows.Count) As Color For i As Integer = 0 To deptEmp.Rows.Count Step 1 Pcolor(i) = Color.FromArgb(bb.Next(255), bb.Next(25... 阅读全文
posted @ 2007-09-30 12:36 ipusr 阅读(530) 评论(0) 推荐(0) 编辑