[belajar-excel] Select Case menggantikan IF dengan banyak parameter

dear be-exceler,
saya sedang belajar menggantikan fungsi IF di macro digantikan dengan 
Select Case,
sudah googling tp masih belum ketemu yang dengan bnyk parameternya.

mohon berkenan mengajari saya lg atau mungkin ada link yang bisa saya 
pelajari.

misal :

kolA = Range("A1").Value
kolB = Range("B1").Value
kolC = left(Range("C1").Value, 2)
If kolA = "01" And kolB = "0" And kolC = "AS" Then
     Range("D1").Value = "belajar macro"
Else
     Range("D1").Value = "belajar select case"
End If


bagaimana men-transformnya menjadi Select Case ?

terima kasih sebelumnya.