vb日期变量赋值

用几个变量给同一个日期变量赋值starttime = # month_i-day_i-year_i #

---

用 datepart函数应该可以拆圆了

Private Sub Form_Load()
Let starttime = DatePart("m"旅培塌, Date) & "_" & DatePart("d", Date) & "中毕_" & DatePart("yyyy", Date)
MsgBox starttime
End Sub

---

正解

---