TextBox

[ahmett46]

Slm Hocam ve arkadaşlar
TextBox1 hangi sayıyı yazarsak yazalım TextBox2 ye otomatik olarak 1 fazlasını yazdırmak istiyorum ne yapmalıyım Teşekkürler

 

[Recep İpek]

Aşağıdaki kodları deneyin.

Private Sub TextBox1_Change()
TextBox2.Value = ""
If IsNumeric(TextBox1.Value) Then TextBox2.Value = TextBox1.Value + 1
End Sub

 

[ahmett46]

Teşekkürler :icelim: