主题：for

Dim nms() As String = E.DataRow("参加任务人员").Split(",")
            For I As Integer = 
                For Each nm As String In nms
                    Dim dt As DataRow = DataTables("员工薪资明细").FIND(" 姓名= '" & nm & "'")
                    If DT IsNot Nothing Then
                        
                        DT("任务时间") = Tables("印刷生产单").Current("实际执行任务时间")
                    End If
                    Dim YG As DataRow = DataTables("员工资料").Find("姓名 = '" & nm & "'")
                    Dim XZ As DataRow = DataTables("员工薪资明细").Find("姓名 ='" & YG("姓名") & "' And 薪资类型 = '" & YG("薪资类型") & "'")
                    Dim SUM As Double = DataTables("员工薪资明细").Compute("SUM(任务薪资)","姓名 ='" & YG("姓名") & "' And 薪资类型 = '" & YG("薪资类型") & "'")
                Next
                SUM =SUM + I             
            Next

？？？？？？？？？ For I As Integer =        这一句后面不是少了值吗，我不懂写，所以问这个要怎么写？？？？？？