podrías hacerlo de ésta forma:
Cita: Dim sbSQL As New System.Text.StringBuilder
...
...
If ckbRecopInfo.Checked Then
sbSQL.Append(ckbRecopInfo.Text.ToLower)
End If
If ckbInterpNum.Checked Then
sbSQL.Append(ckbInterpNum.Text.ToLower)
End If
If ckbjuicio.Checked Then
sbSQL.Append(ckbjuicio.Text.ToLower)
End If
...
...
y con sbSQL.ToString() obtienes todo el texto
por cierto, ya no necesita el casting a string ya que por default Text es un string
Salu2