DateAndTime.DateSerial(Int32, Int32, Int32) Yöntem

Tanım

Ad Alanı:

Microsoft.VisualBasic

Bütünleştirilmiş Kod:

Microsoft.VisualBasic.Core.dll

Kaynak:

DateAndTime.vb

Belirtilen yıl, ay ve günü temsil eden ve saat bilgisinin gece yarısı (00:00:00) olarak ayarlandığı bir Date değer döndürür.

public:
 static DateTime DateSerial(int Year, int Month, int Day);

public static DateTime DateSerial (int Year, int Month, int Day);

static member DateSerial : int * int * int -> DateTime

Public Function DateSerial (Year As Integer, Month As Integer, Day As Integer) As DateTime

Parametreler

Year

Int32

Gereklidir. 1 ile 9999 arasında tamsayı ifadesi. Ancak, bu aralığın altındaki değerler de kabul edilir. 0 ile 99 arasındaysa Year , "Açıklamalar" bölümünde açıklandığı gibi 1930 ile 2029 arasında olarak yorumlanır. 1'den küçükse Year , geçerli yıldan çıkarılır.

Month

Int32

Gereklidir. 1 ile 12 arasında tamsayı ifadesi. Ancak, bu aralığın dışında kalan değerler de kabul edilir. değeri Month 1'e göre kaydırılır ve hesaplanan yılın Ocak ayına uygulanır. Başka bir deyişle, (Month - 1) Ocak'a eklenir. Gerekirse yıl yeniden hesaplanır. Aşağıdaki sonuçlar bu etkiyi gösterir:

1 ise Month , sonuç hesaplanan yılın Ocak ayıdır.

0 ise Month , sonuç önceki yılın Aralık ayıdır.

-1 ise Month , sonuç önceki yılın Kasım ayıdır.

13 ise Month , sonuç sonraki yılın Ocak ayıdır.

Day

Int32

Gereklidir. 1 ile 31 arasında tamsayı ifadesi. Ancak, bu aralığın dışında kalan değerler de kabul edilir. değeri Day 1'e göre kaydırılır ve hesaplanan ayın ilk gününe uygulanır. Başka bir deyişle, (Day - 1) ayın ilkine eklenir. Gerekirse ay ve yıl yeniden hesaplanır. Aşağıdaki sonuçlar bu etkiyi gösterir:

1 ise Day , sonuç hesaplanan ayın ilk günüdür.

Day 0 ise, sonuç önceki ayın son günüdür.

Day-1 ise, sonuç önceki ayın son günüdür.

Geçerli ayın sonunu geçtiyse Day , sonuç bir sonraki ayın uygun günüdür. Örneğin, Month 4 ve Day 31 ise, sonuç 1 Mayıs'tır.

Döndürülenler

DateTime

Belirtilen yıl, ay ve günü temsil eden ve saat bilgisinin gece yarısı (00:00:00) olarak ayarlandığı bir değer.

Örnekler

Bu örnekte belirtilen yıl, ay ve günün tarihini döndürmek için işlevi kullanılır DateSerial .

' DateSerial returns the date for a specified year, month, and day.
Dim aDate As Date
' Variable aDate contains the date for February 12, 1969.
aDate = DateSerial(1969, 2, 12)
Console.WriteLine(aDate)

' The following example uses DateSerial to determine and display
' the last day of the previous month.
' First, establish a starting date.
Dim startDate = #1/23/1994#
' The 0 for the day represents the last day of the previous month.
Dim endOfLastMonth = DateSerial(startDate.Year, startDate.Month, 0)
Console.WriteLine("Last day in the previous month: " & endOfLastMonth)

' The following example finds and displays the day of the week that the 
' 15th day of the following month will fall on.
Dim fifteenthsDay = DateSerial(Today.Year, Today.Month + 1, 15)
Console.WriteLine("The 15th of next month is a {0}", fifteenthsDay.DayOfWeek)

Açıklamalar

Bağımsız değişken için Year iki basamaklı değerler, kullanıcı tanımlı bilgisayar ayarlarına göre yorumlanır. Varsayılan ayarlar, 0 ile 29 arasındaki değerlerin 2000-2029 yılları, 30 ile 99 arasındaki değerlerin ise 1930-1999 yılları olarak yorumlandığıdır. Diğer tüm yılları ifade etmek için dört basamaklı bir yıl kullanın, örneğin 1924.

Aşağıdaki örnekte negatif, sıfır ve pozitif bağımsız değişken değerleri gösterilmektedir. Burada işlev, DateSerial geçerli yıldan 10 yıl önceki yılın Mart ayının ilk gününden önceki günü, diğer bir deyişle on yıl önceki Şubat ayının son gününü temsil eden bir Date döndürür.

Dim EndFeb As Date = DateSerial(-10, 3, 0)  

Normal aralığını aşıyor Month veya Day aşıyorsa, uygun şekilde sonraki daha büyük birime uygulanır. Örneğin, 32 gün belirtirseniz, değerine Monthbağlı olarak bir ay ve bir ila dört gün olarak değerlendirilir. 9999'dan büyükse Year veya herhangi bir bağımsız değişken -2.147.483.648 ile 2.147.483.647 aralığından farklıysa bir ArgumentException hata oluşur. Üç bağımsız değişken tarafından belirtilen tarih 1 Ocak'ta 1 Ocak'ta 00:00:00'dan erkense veya 31 Aralık 9999'da 23:59:59'dan sonraysa bir ArgumentOutOfRangeException hata oluşur.

Veri Date türü zaman bileşenlerini içerir. DateSerial bunların tümünü 0 olarak ayarlar, dolayısıyla döndürülen değer hesaplanan günün başlangıcını temsil eder.

Her Date değer bir DateTime yapı tarafından desteklendiğinden, yöntemleri size bir Date değerin birleştirilmesinde ek seçenekler sağlar. Örneğin, istenen bileşen bileşimini kullanarak bir Date değişkeni doldurmak için aşırı yüklenmiş DateTime oluşturuculardan birini kullanabilirsiniz. Aşağıdaki örnek, sabah 8:30'dan önce saniyenin onda birinde 6 Mayıs 1978 olarak ayarlar NewDateTime :

Dim NewDateTime As Date = New Date(1978, 5, 6, 8, 29, 59, 900)  

Ayrıca bkz.

• DateValue(String)
• Day(DateTime)
• Month(DateTime)
• Now
• TimeSerial(Int32, Int32, Int32)
• TimeValue(String)
• Weekday(DateTime, FirstDayOfWeek)
• Year(DateTime)
• System
• Veri Türü Özeti (Visual Basic)