Metodo ExecuteScalar() e valore Null restituito

[Kahm]

salve a tutti
dato il seguente codice:

  Dim strsql As String
        strsql = "SELECT RCodTipologia FROM RigheCarico where CodRigaCarico=" & CodRigaCarico
        Dim Quantita As Long
        Dim cmd As OleDbCommand = New OleDbCommand(strsql, myconnection)
       
        Quantita = CType(cmd.ExecuteScalar, Integer)
      
        Return Quantita

se il risultato della query non trova niente mi da errore:"impossibile convertire dbnull to integer"
come mi conviene fare?
se implemento una iif sicuro che non mi esegue 2 volte la executescalar?
grazie!