validar que textbox no se repita

[erickrpv]

como? crear una columna en la bd que devuelva 0 y 1 ?? para asi comparar?
mira yo hice este código..
Function Duplicado(ByVal C_parm02 As String, ByVal C_parm04 As String) As Boolean
Duplicado = True
Dt_Campo1.Clear()
Dt_Campo1.Reset()
I_var50 = Mid(Trim(LBL_fec2.Text), 7, 4) + "-" + Mid(Trim(LBL_fec2.Text), 4, 2) + "-" + Mid(Trim(LBL_fec2.Text), 1, 2)
Sql = "Select concod,confec from tcontrol where concod= '" & LBL_percod.Text & "' and confec ='" & I_var50 & "'"
Da_Campo1 = New MySqlDataAdapter(Sql, CO)
Da_Campo1.Fill(Dt_Campo1)
End Function

Function Validar()
Validar = True
C_parm02 = LBL_percod.Text
C_parm04 = Mid(Trim(LBL_fec2.Text), 7, 4) + "-" + Mid(Trim(LBL_fec2.Text), 4, 2) + "-" + Mid(Trim(LBL_fec2.Text), 1, 2)
If Duplicado(Trim(C_parm02), Trim(C_parm04)) Then
MsgBox("Registro Ya Ingresado", 16, "Mensaje del sistema")
End If
Dt_Campo1.Clear()
Dt_Campo1.Reset()
End Function