PublicFunction NTabanaCevir(ByVal Sayı AsString, ByVal Taban AsInteger) AsInteger
Dim kalan AsInteger
Dim sonuc AsString
' Sayı
'Değerler sonuca eklenir..
sonuc = sonuc & Sayı
NTabanaCevir = CInt(Microsoft.VisualBasic.StrReverse(sonuc))
EndFunction
Beyler acıklamasıyla yazdım kodları nerde hata var anlayamadım yani.baştan ilk 3 satırı kırmızı gosteriyor.
__________________
visual basic taban aritmatiği yapma bir sayının tabanını başka tabana cevirme
Visual Basic0 Mesaj
●30 Görüntüleme
- ReadBull.net
- Programlama ve Yazılım
- Programlama Dilleri
- Visual Basic
- visual basic taban aritmatiği yapma bir sayının tabanını başka tabana cevirme