Cita:
Iniciado por leochavez 
por eso desde el formulario hasteun for ps
vb net
dim Codigos as string
Codigos = ""
For Each row1 As DataGridViewRow In MIDATAGRID.Rows
If row1.Cells("MICHEKBOX").Value = True Then
'RECUPERO EL VALOR Y AUMENTOUNA COMA
Codigos = Codigos + RECUPEROELVALOR + ","
End If
Next
'TODA LA CADENA Y QUITO LA ULTIMA COMA
Codigos = Mid(Codigos, 1, Codigos.Length - 1)
es mas sencillo con la funcion asi nada mas manda llamar la funcion con el parametro que necesita :)
jejeje se me paso una cosa la funcion se usa de la sig manera:
SELECT * FROM TABLE WHERE DATA IN (
SELECT data FROM SplitApplication('1,1,1,1')
)
saludos!