Online Reference

Home

Microsoft Reference
Knowledge Developer Database Internet Resource Forum
VBA
Inspection Function
ดาวน์โหลดคู่มือ

IsDate Function

VBA Function, ส่งออกค่าเป็นประเภทข้อมูล Boolean เพื่อตรวจสอบว่า expression สามารถแปลงเป็นวันที่ได้หรือไม่

ไวยากรณ์

IsDate(expression )

อากิวเมนต์ expression เป็นประเภทข้อมูล Variant ที่เก็บค่า expression เป็นวันที่หรือข้อความที่รับรู้เป็น วันหรือเวลา

ลักษณะการประยุกต์

ฟังก์ชัน IsDate ส่งออกค่าเป็น True ถ้า expression เป็นวันที่หรือสามารถแปลงวันที่ได้ กรณีอื่นๆ ส่งค่าเป็น False ใน Microsoft Access วันที่ที่มีจริง คือ ช่วงระหว่าง 1 มกราคม ค.ศ. 100 ถึง 31 ธันวาคม ค.ศ. 9999

ดูเพิ่มเติม

ฟังก์ชัน Array, ฟังก์ชัน IsArray, ฟังก์ชัน IsEmpty, ฟังก์ชัน IsError, ฟังก์ชัน IsMissing, ฟังก์ชัน IsNull, ฟังก์ชัน IsNumeric, ฟังก์ชัน IsObject, ฟังก์ชัน TypeName, ฟังก์ชัน VarType, ประเภทข้อมูล Variant

ตัวอย่าง

ตัวอย่างการใช้ฟังก์ชัน IsDate ในการหาว่า expression สามารถแปลงค่าเป็นวันหรือไม่

Dim MyDate, YourDate, NoDate, MyCheck

MyDate = "February 12, 1969": YourDate = #2/12/69#: NoDate = "Hello"
' ส่งออกค่าเป็น True
MyCheck = IsDate(MyDate)
' ส่งออกค่าเป็น True
MyCheck = IsDate(YourDate)
' ส่งออกค่าเป็น True
MyCheck = IsDate(NoDate)

ตัวอย่างประยุกต์ใน Access

ตัวอย่างการใช้ฟังก์ชัน IsDate ในการหาว่า expression สามารถแปลงค่าเป็นวันหรือไม่ แล้วแสดงค่า

Sub CheckDate()

   Dim strDate As String

  strDate = InputBox("Enter string to display as a date.")

  ' ทดสอบตัวแปร
  If IsDate(strDate) Then
    'ถ้าตัวแปรเป็นวันที่ จัดรูปแบบและแสดงข้อความ
    MsgBox "The date is: " & Format(DateValue(strDate), "Long Date")
  Else
    MsgBox "The value you entered is not a date."
  End If

End Sub