Çözüldü Textbox kuruş basamağı??

[s.savas]

Merhaba arkadaşlar.
Aşağıdaki kod bloğu ile asgari geçim indirim tutarını hesaplıyorum.
Ancak işlem sonucunda resimde de görüldüğü üzere kuruş ayracını . (nokta) olarak gösteriyor. Bu durumda da excel sayfasında hesaplama hatası oluşuyor.
İşlem sonucunda kuruş ayracının , (virgül) olarak gösteremedim.

Private Sub ComboBox2_Click()
If ComboBox2.Value <> "" Then
TextBox9.Value = ComboBox2.List(ComboBox2.ListIndex, 2)
End If

brut_asgari = CDbl(TextBox8) * 12
agi = CDbl(TextBox9)
gelir_vergisi = CDbl(TextBox12)
TextBox10.Value = Round((brut_asgari * agi / 100 * gelir_vergisi / 100 / 12), 2)
End Sub

 

[Muzaffer Ali]

Merhaba.
Aşağıdaki gibi yapın.

TextBox10.Value =FormatNumber( Round((brut_asgari * agi / 100 * gelir_vergisi / 100 / 12), 2),2)

 

[s.savas]

Teşekkür ederim.