Сравнение двух дат - VB

Формулировка задачи:

Здравствуйте. Делаю программу для зоо магазина. Вроде бы уже все сделал но столкнулся с одной проблемой не могу решить, может кто нибудь подскажет Есть две даты Первая дата рождения Вторая дата рождения матери При выборе матери если дата меньше чем у крольчонка то выдаст ошибку. С этим все получилось

Dim a As Date
Dim b As Date
r = Text1.Text
b = Text2.Text
If Text1.Text > Text2.Text Then
Text3.Text = "Первая дата больше"
Else
Text3.Text = "Вторая дата больше"
End If

А вот с этим как и как это все обьединить с датой Что можно использовать вместо or В программе при добавления, кролика Я ввожу данные порода матери (Белый великан) и порода отца (Серый велика) крольчонок должен быть серым или белым великаном но не например черно белым

If text1.text="Белый великан" or text2.text="Серый великан" then
msgbox "все верно"
Else
msgbox "Крольчонка нашли в капусте" 
end if

Может у кого нибудь есть скайп могу оплатить.

Решение задачи: «Сравнение двух дат»

textual
                            Листинг программы 
                        
                            If cdate(Text1.Text) > cdate(Text2.Text) Then