Aşağıdaki şekilde kullanıcı tanımlı fonksiyon oluşturmak istedim ama uymadı. Bu konuda yardımcı olabilir misiniz?
Function aile(S)
If S = "Bekar" Then aile = "Bekar"
If S = "Evli Eşi Çalışmıyor" Then aile = "Evli Eşi Çalışmıyor"
If S = "Evli Eşi Çalışmıyor 1 Çocuk" Then aile = "Evli 1"
If S = "Evli Eşi Çalışmıyor 2 Çocuk" Then aile = "Evli 2"
If S = "Evli Eşi Çalışmıyor 3 Çocuk" Then aile = "Evli 3"
If S = "Evli Eşi Çalışmıyor 4 Çocuk +" Then aile = "Evli 4"
If S = "Evli Eşi Çalışmıyor 5 Çocuk" Then aile = "Evli 5"
If S = "Evli Eşi Çalışıyor" Then aile = "Evli Eşi Çalışıyor"
If S = "Evli Eşi Çalışıyor 1 Çocuk" Then aile = "Evli 1"
If S = "Evli Eşi Çalışıyor 2 Çocuk" Then aile = "Evli 2"
If S = "Evli Eşi Çalışıyor 3 Çocuk" Then aile = "Evli 3"
If S = "Evli Eşi Çalışıyor 4 Çocuk +" Then aile = "Evli 4"
If S = "Evli Eşi Çalışıyor 5 Çocuk" Then aile = "Evli 5"
End Function
Kullanıcı Tanımlı Fonksiyon
- Hamurcu
- Mesajlar: 265
- Kayıt: 06 Ağu 2012, 00:14
- İşletim Sisteminiz: Windows 10/11 - Pardus Linux
- LibreOffice Sürümü: 7.x
Re: Kullanıcı Tanımlı Fonksiyon
Merhaba,
Aşağıdaki şekilde yapabilirsin.
Aşağıdaki şekilde yapabilirsin.
Kod: Tümünü seç
Function AILE(s as String) as String
Dim sonuc as String
Select Case s
Case "Bekar"
Sonuc = "Bekar"
Case "Evli Eşi Çalışmıyor"
sonuc = "Evli Eşi Çalışmıyor"
Case "Evli Eşi Çalışmıyor 1 Çocuk"
sonuc = "Evli 1"
Case "Evli Eşi Çalışmıyor 2 Çocuk"
sonuc = "Evli 2"
Case "Evli Eşi Çalışmıyor 3 Çocuk"
sonuc = "Evli 3"
Case "Evli Eşi Çalışmıyor 4 Çocuk +"
sonuc = "Evli 4"
Case "Evli Eşi Çalışmıyor 5 Çocuk"
sonuc = "Evli 5"
Case "Evli Eşi Çalışıyor"
sonuc = "Evli Eşi Çalışıyor"
Case "Evli Eşi Çalışıyor 1 Çocuk"
sonuc = "Evli 1"
Case "Evli Eşi Çalışıyor 2 Çocuk"
sonuc = "Evli 2"
Case "Evli Eşi Çalışıyor 3 Çocuk"
sonuc = "Evli 3"
Case "Evli Eşi Çalışıyor 4 Çocuk +"
sonuc = "Evli 4"
Case "Evli Eşi Çalışıyor 5 Çocuk"
sonuc = "Evli 5"
Case Else
sonuc="Tanımsız"
End Select
AILE = sonuc
End Function
- Hamurcu
- Mesajlar: 265
- Kayıt: 06 Ağu 2012, 00:14
- İşletim Sisteminiz: Windows 10/11 - Pardus Linux
- LibreOffice Sürümü: 7.x
Re: Kullanıcı Tanımlı Fonksiyon
Özellikle Function veya Sub için isim verirken küçük "i" harfine dikkat etmen gerekir.
Riske girmemek için eğer mutlaka "i" harfi kullanman gerekiyorsa bunun yerine BÜYÜK "I" (Irmak'ın I'sı) harfi kullanın.
Çünkü küçük "i" harfinin BÜYÜK hali de "İ" olur ve İngiliz alfabesinde BÜYÜK "İ" harfi yoktur.
Bu sebeple Basic derleyicisi hata verir.
Riske girmemek için eğer mutlaka "i" harfi kullanman gerekiyorsa bunun yerine BÜYÜK "I" (Irmak'ın I'sı) harfi kullanın.
Çünkü küçük "i" harfinin BÜYÜK hali de "İ" olur ve İngiliz alfabesinde BÜYÜK "İ" harfi yoktur.
Bu sebeple Basic derleyicisi hata verir.
Re: Kullanıcı Tanımlı Fonksiyon
Hocam tam da dediğiniz sebepten dolayı sıkıntı olmuş.. Çok teşekkür ederim.Hamurcu yazdı: ↑04 Haz 2021, 23:24 Özellikle Function veya Sub için isim verirken küçük "i" harfine dikkat etmen gerekir.
Riske girmemek için eğer mutlaka "i" harfi kullanman gerekiyorsa bunun yerine BÜYÜK "I" (Irmak'ın I'sı) harfi kullanın.
Çünkü küçük "i" harfinin BÜYÜK hali de "İ" olur ve İngiliz alfabesinde BÜYÜK "İ" harfi yoktur.
Bu sebeple Basic derleyicisi hata verir.