virgülü noktaya çevirmek

[uguristanbul]

Arkadaslar
Private Sub TextBox21_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case Asc("0") To Asc("9")
Case Asc(",")
Case Else
KeyAscii = 0: MsgBox "Sadece rakam girebilirsiniz.", vbExclamation, "İŞLEM HATASI !"
End Select
End Sub
kodundaki
(",") virgülü bir kodla (".") olarak algılatmam lazım
convert case falan demem lazımda nasıl
yardım edecek arkadaslara simdiden tesekkur

 

[uguristanbul]

yani arkadaslar
bu soru ile ilgilenecek bir kisi dahi yokmu burda
tek olacak sey numpaddeki virgülü
noktaymış gibi gosterecek çevirecek bişey

 

[security]

Private Sub TextBox21_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
Select Case KeyAscii
Case Asc("0") To Asc("9")
Case Asc(".")
Case Else
KeyAscii = 0: MsgBox "Sadece rakam girebilirsiniz.", vbExclamation, "İŞLEM HATASI !"
End Select
End Sub

işinizi görmüyormu ?

 

[uguristanbul]

hayır hocam onu zaten yapabiliyorum sorunu virgül yazarak çözmem gerekli
ilginize tesekkurler