TextBox12 Formatında virgülden sonra 3 basamağı görmüy

[bistrobellman]

UserForm1 üzerinde 2 tane TextBox ve 1 tane ComboBox1 ve CommandButton1 var (TextbOX1 ve TextBox2)

Ürün Cinsi ComboBox1'den Seciliyor.

Giriş Miktarı : TextBox1 'e manuel el ile tonaj giriliyor.(virgülden sonra 3 basamaklı sayı bu)

Ã?rn : 35,680

Stok Miktarı : TextBox2'de o ürün cinsine ait şimdiye kadar yapılan toplam girişler
otomatik olarak çıkıyor. (buradada problem yok virgülden sonra 3 basamaklı çıkıyor) Bu da Textbox1 gibi virgülden sonra 3 basamaklı sayı )

Ã?rn : 857,660

" İşlemi onayla " : CommandButton1 'e tıkladığımda Stok miktarının: 857,660 + 35,680= 893,340 olmasını
istiyorum. ANCAK 893,000 OLARAK GÃ?STERİYOR!!!!

Private Sub TextBox2_Change ()

TextBox12 = Format(TextBox2, "#,##0.000")
virgülden sonra üç basamak göstersin diye bunu ekledim OLMADI.
893,000 I NASIL 893,340 OLARAK Göstereceğiz?Kodda #,##0.000 var burayı mı değiştirecem?

 

[omerceri]

Private Sub CommandButton1_Click()
Dim a As Double
Dim b As Double
Dim c As Double
a = TextBox1
b = TextBox2
TextBox3 = Format(a + b, "#,##0.000")
End Sub
böyle birşeyler yaparsan olur