- Katılım
- 25 May 2018
- Mesajlar
- 1,610
- En iyi yanıt
- 14
- Puanları
- 113
- Konum
- İstanbul
- Web sitesi
- excelarsivi.com
- Ad Soyad
- Murat OSMA
- Office Vers.
- Microsoft 365 TR+EN
Val( String )
Verilen bir dizeyi sayısal bir değere dönüştürür. (Double)
Açıklamalar
* Bu işlev, dizeyi bir sayının parçası olarak tanıyamadığı ilk karakterde okumayı durdurur.
* Bu işlev, ilk sayısal bileşeni döndürür.
* Dolar işareti ve virgül gibi sayısal değerlerin bir parçası olarak kabul edilen semboller ve karakterler tanınmaz.
* Bununla birlikte, işlev, yarıçap ön eklerini ve O (sekizli için) ve H'yi (on altılık olarak) tanır.
* Boşluklar, sekmeler ve satır besleme karakterleri argümandan çıkarılır.
* Bu fonksiyon sadece geçerli bir ondalık ayırıcı olarak (.) tanır.
Farklı ondalık ayırıcılar kullanıldığında, uluslararası uygulamalarda olduğu gibi, bir dizeyi bir sayıya dönüştürmek yerine CDbl kullanın.
Örnek Kullanım
Verilen bir dizeyi sayısal bir değere dönüştürür. (Double)
String | Sayıya dönüştürmek istediğiniz dizedir. (String) |
Açıklamalar
* Bu işlev, dizeyi bir sayının parçası olarak tanıyamadığı ilk karakterde okumayı durdurur.
* Bu işlev, ilk sayısal bileşeni döndürür.
* Dolar işareti ve virgül gibi sayısal değerlerin bir parçası olarak kabul edilen semboller ve karakterler tanınmaz.
* Bununla birlikte, işlev, yarıçap ön eklerini ve O (sekizli için) ve H'yi (on altılık olarak) tanır.
* Boşluklar, sekmeler ve satır besleme karakterleri argümandan çıkarılır.
* Bu fonksiyon sadece geçerli bir ondalık ayırıcı olarak (.) tanır.
Farklı ondalık ayırıcılar kullanıldığında, uluslararası uygulamalarda olduğu gibi, bir dizeyi bir sayıya dönüştürmek yerine CDbl kullanın.
Örnek Kullanım
PHP:
Sub ExcelTurkey()
MsgBox Val("02/04/2010") '= 2
MsgBox Val("16/04/2012") '= 16
MsgBox Val(DateSerial(2012, 7, 14)) '= 14,07
MsgBox Val("14/07/2012") '= 14
MsgBox Val("1050n") '= 1050
MsgBox Val("130.75") '= 130,75
MsgBox Val("54.321") '=54,321
MsgBox Val("50 Kalem") '= 50
MsgBox Val("1453 İstanbul'un Fethi") '= 1453
MsgBox Val("£13.5") '= 0
MsgBox Val("False") '=0
MsgBox Val("metin") '= 0
MsgBox Val("&HFFFF") '= 1
End Sub