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

Dim N As Integer=1
Dim N1 As Integer=4*n-3
Dim N2 As Integer=4*n-2
Dim EEEE As  New  List(of  String)
EEEE= DataTables("A").DataRows(0).LINES("样品图片")
DataTables("A").DataRows(0)("样品接受状态")=EEEE(N1)