Textbox'a Üslü Yazma

ahmed_ummu

Altın Üye
Katılım
28 Mart 2011
Mesajlar
731
Excel Vers. ve Dili
Excel 2010 Professional Plus 64 Bit
Altın Üyelik Bitiş Tarihi
15-10-2026
Merhaba arkadaşlar.

Aşağıdaki mantıkla Textbox Exit özelliğine üslü yazdırabilir miyiz. 134³ gibi. Aşağıdaki kod ile Textbox'a rakamı girince False yazıyor.

TextBox13.Text = (TextBox13.Text & KeyAscii = 179)
 

muygun

Özel Üye
Katılım
6 Temmuz 2004
Mesajlar
9,181
Excel Vers. ve Dili
Excel-2003 Türkçe
Merhaba;

Private Sub TextBox13_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox13 = TextBox13 & "³"
End Sub

Şeklinde deneyin.
İyi çalışmalar.
 

ahmed_ummu

Altın Üye
Katılım
28 Mart 2011
Mesajlar
731
Excel Vers. ve Dili
Excel 2010 Professional Plus 64 Bit
Altın Üyelik Bitiş Tarihi
15-10-2026
Merhaba;

Private Sub TextBox13_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox13 = TextBox13 & "³"
End Sub

Şeklinde deneyin.
İyi çalışmalar.
Teşekkürler sayın muygun, bu şekilde oldu.
 

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,406
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Alternatif;

C#:
TextBox13 = TextBox13 & Chr(179)
.
 
Üst