Emlak tipi ile ilgili kısım

    Select Case crc_emlaktipi

    

    Case 1

    

    GEmlakTipi = "KONUT"

    Case 2

    

    GEmlakTipi = "İŞYERİ"

    

    Case 3

    

    GEmlakTipi = "ARSA"

    

    End Select





strWhere = strWhere & "([kategori] = """ & GEmlakTipi & """) AND "

Emlak türü için;

    Select Case crc_emlakturu
    
    Case 1
    
    GEmlakTuru = "KİRALIK"

    Case 2
    
    GEmlakTuru = "SATILIK"
    
    Case 3
    
    GEmlakTuru = "DEVREN KİRALIK"

    Case 4
    
    GEmlakTuru = "DEVREN SATILIK"
    
    End Select


strWhere = strWhere & "([tablodakialan] = """ & GEmlakTuru & """) AND "


koddaki crc_emlakturu, emlak türünün seçildiği seçenek grubunun adı, tablodakialan ise verilerin bulunduğu tablodaki alanın adı.

crc_emlakturu isimli seçenek grubunda satılık'ı seçerseniz GEmlakTuru değişkenine "SATILIK" değeri atanacaktır.