Dim constr As String = "5231,5232"
 Dim sss() As String = ConStr.Split(CChar(ConStr), CChar(","))
TextBox1.Text = sss(0)
什么东西都没有.数组下表是0 开始的吧.
 TextBox1.Text = sss(1)
只显示231,前面的5不见了.
 TextBox1.Text = sss(2)
也是什么也没有.顺便在问一下,怎么样运行时确定datagrid的列宽度和标题.