hurtigt spørgsmål om msgbox

Kode 

lol=msgbox ("vil du slå dig selv i hovedet?", 19 ,"test")

If lol = MsgBoxResult.Yes Then  
   ' Gør noget.
Else
   ' Gør noget andet.
End If

hmm... skal jeg bare kopiere koden over i notesblok? For det virker ikke

Kode 

lol=msgbox ("vil du slå dig selv i hovedet?", 19 ,"test")

If lol = MsgBoxResult.Yes Then  
   msgbox("Du vil gerne slå dig selv i hovedet!")
Else
   msgbox("Du vil ikke slå dig selv i hovedet")
End If