Neyi sileceğimizi ve silmediği takdirde kodun ne yapmasını istediğinizi belirtmeniz gerekir tam bir cevap için ama şöyle bir kod olacak..
Private Sub CommandButton1_Click()
If TextBox1.Value = "987654321" Then
'silme ile ilgili kodlarınız buraya
Else
MsgBox "Yanlış şifre tekrar deneyin"
End If
End Sub
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.