importing an option value through a dtsx

I have a dts which fires every time a record is added to a legacy SQL system. I am trying to import the data to crm through a dtsx, but have come a cropper.

one of the values im trying to import is a Boolean and i'm struggling to select a yes / option from the value

   Public Overrides Sub Input0_ProcessInputRow(ByVal Row As Input0Buffer)
        Dim NewCustomer As New Entity("account")
        ' Set Licence
        If Not Row.Licence_IsNull Then
            NewCustomer("name") = Row.Licence
        End If
        ' Set Comapny Name
        If Not Row.CompanyName_IsNull Then
            NewCustomer("new_companyname") = Row.CompanyName
        End If
        ' Set if KeyWorker
        If Not Row.KeyWorker_IsNull Then
            NewCustomer("new_keyworker") = Row.KeyWorker   ' ????? 
        End If
        organizationservice.Create(NewCustomer)
    End Sub

Dont ask me .. i dont know