LibreOffice Türkiye Forumları

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

Merhaba,

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

Ö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.

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.

Hocam tam da dediğiniz sebepten dolayı sıkıntı olmuş.. Çok teşekkür ederim.

LibreOffice Türkiye Forumları

Kullanıcı Tanımlı Fonksiyon

Kullanıcı Tanımlı Fonksiyon

Re: Kullanıcı Tanımlı Fonksiyon

Re: Kullanıcı Tanımlı Fonksiyon

Re: Kullanıcı Tanımlı Fonksiyon