- Katılım
- 22 Aralık 2005
- Mesajlar
- 335
- Excel Vers. ve Dili
- Office - 2019 - Türkçe
Fonksiyonun tanımı:
Function Fahrenheit(x)
Fahrenheit = x * 9 / 5 + 32
End Function
Fonksiyonun kullanımı:
Private Sub Command1_Click()
Dim Değer As Integer
Değer = InputBox(" ")
MsgBox Fahrenheit(Değer)
End Sub
Çalıştığım kitaptaki veriler bunlar
MsgBox Fahrenheit = Değer
Bu şekide yapıp çalıştırdım buraya kadar tamam. Peki yazdığım 25 dereceyi Fahrenheit'e niye çevirmiyor, hatam nerede.
Function Fahrenheit(x)
Fahrenheit = x * 9 / 5 + 32
End Function
Fonksiyonun kullanımı:
Private Sub Command1_Click()
Dim Değer As Integer
Değer = InputBox(" ")
MsgBox Fahrenheit(Değer)
End Sub
Çalıştığım kitaptaki veriler bunlar
MsgBox Fahrenheit = Değer
Bu şekide yapıp çalıştırdım buraya kadar tamam. Peki yazdığım 25 dereceyi Fahrenheit'e niye çevirmiyor, hatam nerede.