[Meteora]

Γιώργη, δοκίμασε κάτι σαν αυτό...

Private Sub cmdAddPc_Click()
Dim rs As DAO.Recordset
  Set rs = CurrentDb.OpenRecordset("SELECT TOP 2 SVNnumber FROM tblLogSVN")
If rs.RecordCount =0 Then exit sub   
  select case True
      case  IsNull(Me.SVN1) Or Me.SVN1 = ""
               Me.SVN1 = rs!SVNnumber :  Me.Pc1 = True
               MsgBox "Message SVN1.!!", vbInformation, "Warning 1"
      case  2η συνθήκη
               < κάνε ότι λέει κώδικας ...»
      case else
               <αν δεν ισχύουν οι συνθήκες 1η και 2η, κάνε τα εξής...>
  End select
  End Sub

Ελπίζω να τα καταφέρεις. Γενικά δεν πρέπει να δουλεύεις με περισσότερα από ένα if...else...end if

Με εκτίμηση
Νίκος