生成一个VB代码 获取当前日期

以下是获取当前日期的VB代码：

Dim currentDate As Date
currentDate = Date.Today
MsgBox("Today's date is: " & currentDate)

这段代码会在窗口中弹出一个消息框，显示当前日期。如果你想在程序中使用当前日期，可以将 `currentDate` 变量传递给其他函数或方法。