Hola!
Me parece que la forma correcta de llamar la funcion (Public Function GetDCNumSegSocial(ByVal numsegsocial As String, ByVal isNumEmpresa As Boolean) As String) es asi:
Código vb:
Ver original'txtDigitoControl=ES UN TEXTBOX
'NumeroSS=NUMERO SEG SOCIAL
'SI EL NUMERO PERTENECE A UNA EMPRESA
txtDigitoControl.Text= GetDCNumSegSocial(NumeroSS,True)
'SI EL NUMERO NO PERTENECE A UNA EMPRESA
txtDigitoControl.Text= GetDCNumSegSocial(NumeroSS,False)
Y el Code es de VB.net...