123
返回列表 上一主題 發帖

[發問] VBA 表單功能發問

准提部林

帖子
2825 
主題
10 
精華
0 
積分
2881 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2024-9-15 
21# 跳轉到 »
發表於 2023-2-12 15:02 | 只看該作者
回復 20# v03586


V = InStr("+H0DP", xF(1, 3)) - 1 這也要加"P"


D = CDate(format(20230130, "00-00-00")) '即可轉成日期
if D - Date < 90 then msgbox "已過期"

TOP

        靜思自在 : 慈悲沒有敵人，智慧不起煩惱。
123
返回列表 上一主題