这段时间苦学，终于会了一些基本的代码，写了个录入信息的窗口。

没有控件, 怎么还能弹出呢?

用事件啊 calendar.show

1、网上下载日期控件 mscomct2.ocx，如果是32位，把它复制到 c:\windows\system32中，如果是64位系统，就复制到 c:\windows\syswow64中；
2、注册控件，以64位系统为例，regsvr32 c:\windows\syswow64\mscomct2.ocx，32位系统的注册只需要改下路径就行；
3、excel菜单-开发工具，这个菜单默认是没有的，需要在选项中去配置，快捷菜单-插入，选最后的“其他工具”，找到刚才注册的 Microsoft Data and Time Picker Control 控件，然后插入到excel就行了。这是真正的日期控件，不需要额外的代码控制；
4、如果用窗体，vba菜单-工具-附加控件，同样也是勾选 Microsoft Data and Time Picker Control，这个控件就会被加入到控件箱的最后面，名字叫 DTPicker；

这个问题解决了，和大家说一下，折腾我好久了
首先在userform1的textbox1中加入单击事件来调出日历窗体，然后再去日历窗体各个单击事件中写入退出和赋值以及设置日期格式。