28/05/2009, 11:02
28/05/2009, 13:34
Textbax'ın özelliklerini açıp, biçim özelliğini Para Birimi olarak ayarlarsan sorun çözülmüş olur.
28/05/2009, 16:40
Text box nesnesi olarak adı geçen denetim sanırım Microsoft Forms 2.0 Ole sınıfı Forms.TextBox.1 sınıfı olarak adlandırılan activex denetimidir. Bu denetimde bahsedilen türde bir özellik normal olarak görülmüyor. Ama mutlaka bir yolu vardır fakat maalesef ben göremedim. Bir sürü özellik var ama biçim özelliği sanırım konulmamış.
06/11/2009, 17:17
Merhaba Arkadaşlar konu açılalı baya olmuş sorunun çözülüp çözülmediğini bilmiyorum ama ben yinede vereyim belki başka arkadaşların işne yarar.
excel Vba da
[Vba]Private Sub TextBox1_Change()
TextBox1 = Format(TextBox1.Value, "#,##0.00 ")
End Sub[/Vba]
Visual Basic 6 ise
excel Vba da
[Vba]Private Sub TextBox1_Change()
TextBox1 = Format(TextBox1.Value, "#,##0.00 ")
End Sub[/Vba]
Visual Basic 6 ise
PHP Kod:
Private Sub Text1_LostFocus()
Text1 = Format(Text1.Text, "#,##0.00 ")
End Sub
22/10/2014, 20:53
If IsNumeric(TextBox1.Text) Then
Dim tlira As Double = TextBox1.Text
TextBox3.Text = Format(tlira, ("C"))
End If
ister// Private Sub TextBox1_TextChanged_1(sender As Object, e As EventArgs) Handles TextBox1.LostFocus olarak text kutusunun kontrolunun kaybından sonraya yazılabilir.
Format(tlira,("C") da yazılan C:Currency yani para birimini direk yazar.
Örnek 5.00 TL(yeni sembolle) 14.00 $ gibi
Sondan iki haneyi böler, ##.## tarzında format alır.
Dim tlira As Double = TextBox1.Text
TextBox3.Text = Format(tlira, ("C"))
End If
ister// Private Sub TextBox1_TextChanged_1(sender As Object, e As EventArgs) Handles TextBox1.LostFocus olarak text kutusunun kontrolunun kaybından sonraya yazılabilir.
Format(tlira,("C") da yazılan C:Currency yani para birimini direk yazar.
Örnek 5.00 TL(yeni sembolle) 14.00 $ gibi
Sondan iki haneyi böler, ##.## tarzında format alır.