If MsgBox("Silmek istediğinizden emin misiniz?", vbYesNo + vbQuestion, "AccessTr.Net") = vbYes Then
' Silinmesi isteniliyorsa yazılacak kodlar
End If

Katıştırılmış Makroları kullanmanızı tavsiye etmem. Makro ile yapabileceğiniz her şeyi ve fazlasını kodlar ile yapabilirsiniz.
AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.