Function NgayHienTai(Optional ByRef kieu As Integer = 1)
Select Case kieu
Case 1
NgayHienTai = Format(Now, "dd/mm/yyyy")
Case 2
NgayHienTai = Format(Now, "mm/dd/yyyy")
Case 3
NgayHienTai = Format(Now, "yyyy/mm/dd")
End Select
End Function
Nhờ chuyên gia hướng dẫn giúp em ý nghĩa của các lệnh như Select Case, Optional ByRef kieu
Chào bạn Optional ByRef kieu As Integer = 1 nghĩa là mặc điểu kiểu bằng 1 nhé.
Phần Select Case là duyệt qua những kiểu nó vào kiuer nào thì format kiểu đó.