主题：[求助]帮忙看下代码错误》？

If e.DataCol.Name = "样品图片" Then
Dim N As Integer=e.DataRow("编号")
Dim N1 As Integer=4*n-3
Dim N2 As Integer=4*n-2
Dim EEEE As  New  List(of  String)
EEEE= e.DataRow.LINES("样品图片").
e.DataRow("样品接受状态")=EEEE(N1)
End If

【样品接受状态】这列没有被赋予值啊

谢谢~大神