Kodların çalışmıyordu
sayı yani Double olmadıgı içindi,
Dim CELOYCE As Double
CELOYCE = "123"
If TextBox1.Text = CELOYCE Then
Form2.Show()
Else
Exit Sub
End If
End Sub
şeklinde çalışır
ayrıca ne yapmak istediğini tam açıklayıcı yazarsan daha hızlı cevap alırsın
