سوالی در مورد VSFlexGrid

[m2011kh]

سلام دوستان.
من از این کد برای اضافه کردن موردی به گریدم استفاده میکنم:
With VSFlexGrid1
.ColWidth(0) = 3000
.ColWidth(1) = 3000
.ColWidth(2) = 3000
.ColWidth(3) = 3000
.ColWidth(4) = 3000
.ColWidth(5) = 3000
.ColWidth(6) = 3000
.ColWidth(7) = 3000
.ColWidth(8) = 3000
.ColWidth(9) = 3000
.ColWidth(10) = 3000
.ColWidth(11) = 3000
.TextMatrix(0, 0) = "نام"
.TextMatrix(0, 1) = "نام خانوادگي"
.TextMatrix(0, 2) = "سن"
.TextMatrix(0, 3) = "نسبت"
.TextMatrix(0, 4) = "شماره تماس"
.TextMatrix(0, 5) = "شماره تماس محل کار"
.TextMatrix(0, 6) = "شماره موبايل"
.TextMatrix(0, 7) = "شماره موبايل دوم"
.TextMatrix(0, 8) = "نشاني پست الکترونيکي"
.TextMatrix(0, 9) = "نشاني"
.TextMatrix(0, 10) = "مدرسه"
.TextMatrix(0, 11) = "دانشگاه"
.TextMatrix(0, 12) = "شغل"
.TextMatrix(txtSearch, 0) = FirstNa.Text
.TextMatrix(txtSearch, 1) = LastNa.Text
.TextMatrix(txtSearch, 2) = Old.Text
.TextMatrix(txtSearch, 3) = Nesbat.Text
.TextMatrix(txtSearch, 4) = PhonNumberHome.Text
.TextMatrix(txtSearch, 5) = PhoneNumberWork.Text
.TextMatrix(txtSearch, 6) = MibileNumber.Text
.TextMatrix(txtSearch, 7) = MobileNumbertwo.Text
.TextMatrix(txtSearch, 8) = Email.Text
.TextMatrix(txtSearch, 9) = address.Text
.TextMatrix(txtSearch, 10) = School.Text
.TextMatrix(txtSearch, 11) = danehgah.Text
.TextMatrix(txtSearch, 12) = Work.Text
End With
تا حدودی مطمئنم که کدم درسته و تا نهمی رو هم انجام میده ولی همین که به دهمی میرسه که ایجاد کنه اررور میده.
از راهنمایی هاتون ممنون میشم.

[m.4.r.m]

شما تعداد ستون ها رو چک کنه چون احتمال حداکثر ستون VSFLEXGRID روی 10 هست و شما بیشتر نمی تونی ایجاد کنی اون رو بزار رو عدد دلخواهت

[m2011kh]

کاملا درسته ممنون