Çift Değişken Tip
VBA Çift veri türü, ondalık basamak gerektiren sayıları depolamak için kullanılır. Negatif değerler için -1.79769313486231E308'den -4.94065645841247E-324'e, pozitif değerler için 4.94065645841247E-324'ten 1.79769313486232E308'e kadar saklayabilir.
Bir Double değişkeni bildirmek için Dim İfadesini kullanırsınız (Boyut'un kısaltması):
1 | Çift olarak Dim dblA |
Ardından, bir değişkene değer atamak için eşittir işaretini kullanmanız yeterlidir:
1 | dlbA = 3658.25 |
Bunu bir prosedüre koymak şöyle görünür:
12345678 | Alt dblÖrnek()'çift değişkeni bildirÇift olarak Dim dblA'çift değişkeni doldurundblA = 3658.25'mesaj kutusunu gösterMesaj Kutusu dblAAlt Bitiş |
Yukarıdaki kodu çalıştırırsanız, aşağıdaki mesaj kutusu gösterilecektir.
Tek Veri Türü
Single veri türü, Double veri türünün yalnızca daha kısa bir sürümüdür. Bu nedenle, tek veri türü 4 ondalık basamağa yuvarlanacağından, Çift veri türü 12 ondalık basamağa yuvarlanacağından, bir prosedürde kullanıldığında yuvarlamayı etkileyebilir. Double veri tipine ihtiyacınız yoksa, Single veri tipini kullanabilirsiniz.
Int veya Uzun Veri Türleri
Ondalık basamağa ihtiyacınız yoksa, Int veri türünü veya Uzun veri türünü kullanabilirsiniz.
1 | Tamsayı olarak Dim intA |
1 | Uzun olarak Dim lngB |
Modül veya Global Düzeyde Çift Değişken Bildirin
Önceki örneklerde Double değişkenini bir prosedür içinde tanımlamıştık. Bir prosedürle bildirilen değişkenler yalnızca o prosedür içinde kullanılabilir.
Bunun yerine Double değişkenlerini modül veya global düzeyde tanımlayabilirsiniz.
Modül Seviyesi
Modül seviyesi değişkenler, kod modüllerinin en üstünde şu şekilde bildirilir: loş Beyan.
Bu değişkenler, o kod modülündeki herhangi bir prosedürle kullanılabilir.
Küresel düzey
Küresel düzey değişkenler ayrıca kod modüllerinin en üstünde bildirilir. Ancak, kullanmak yerine loş ifadesini kullanın Halk Double değişkeninin VBA Projeniz boyunca kullanılabileceğini belirten ifade.
1 | Çift olarak Public DblA |
Eğer bir modül seviyesinde double değişkeni tanımlayıp farklı bir modülde kullanmayı denerseniz, bir hata meydana gelir.
Ancak, double değişkeni bildirmek için Public anahtar sözcüğünü kullanmış olsaydınız, hata oluşmaz ve prosedür mükemmel bir şekilde çalışırdı.
Çift Depolanan Dize Olarak Biçimlendir
Bir çift veri türünü bir dizeye biçimlendirmek istediğiniz bir zaman olabilir - örneğin, bir para birimi simgesi görüntülemek ve sayıyı 2 ondalık basamağa yuvarlamak isteyebilirsiniz.
Bunu başarmak için Biçim işlevini kullanırsınız.
Aşağıdaki prosedür
1234567891011 | Alt TestDoubleToCurrencyString()'dize değişkenini bildirDim strMoney As String'çifti ilan et ve değeri doldurDim dblValue As DoubledblDeğeri = 44055.256'çiftini 2 ondalık basamaklı bir para birimi sembolü olan bir dizgeye dönüştürünstrMoney = Format(dblValue , "$#,##0.00")'sonucu görmekMsgBox strMoneyAlt Bitiş |
bu sonucu döndürürdü:
Benzer şekilde, bir numarayı biçimlendirilmiş bir telefon numarası olarak görüntülemek isteyebilirsiniz.
Bu prosedür:
1234567891011 | Alt TestDoubleToPhone()'dize değişkenini bildirDim strPhone As String'çifti ilan et ve değeri doldurDim dblValue As DoubledblDeğeri = 555968541'çifti para birimi sembolü olan bir dizgeye dönüştürünstrPhone = Format(dblValue, "(000)-000 0000")'sonucu görmekMsgBox strTelefonAlt Bitiş |
bu sonucu döndürürdü: