Xử lý lỗi hàm thời gian trong VBA

[hvn8006]

Kính chào các anh chị GPE.
Em đang tự tạo một hàm trong VBA như sau:
Function gio(So As Variant)
If Trim(So) = "" Or So = 0 Then
Else
gio = "gi" & ChrW(7901) & " phút "
mGio = Hour(So)
mPhut = Minute(So)
gio = mGio & " gi" & ChrW(7901) & " " & mPhut & " phút"
End If
End Function

Trong trường hợp phút chẵn ( 15h00) thì hàm này trả về kết quả là : 15 giờ 0 phút (Như ảnh đính kèm)

Em muốn sửa code này để hàm trả về kết quả là 15 giờ 00 phút.

Nhờ các anh chị giúp đỡ.
'
Trân trọng cảm ơn.

 

[SA_DQ]

Bạn thử vầy xem sao:

mphut = Right("0" & CStr(Minute(so)), 2)

 

[hvn8006]

Bạn thử vầy xem sao:

mphut = Right("0" & CStr(Minute(so)), 2)

Rất cảm ơn anh em đã xử lý được vấn đề rồi ạ