逛逛老师的小日历，将主窗口改为共有窗口，sizechanged事件报错，代码如下：

If e.Form.Controls("BL_日历_当前选择年月").text = "" Then Return
Dim MyYear =CDate(e.Form.Controls("BL_日历_当前选择年月").text).Year
Dim MyMonth =CDate(e.Form.Controls("BL_日历_当前选择年月").text).Month
Functions.Execute("日历_小日历刷新",e.Form.Controls("T_日历"),MyYear,MyMonth)

报错提示：

错误所在事件：窗口,导航窗口,SizeChanged
详细错误信息：
从字符串“BL_日历_当前选择年月”到类型“Date”的转换无效。

msgbox(e.Form.Controls("BL_日历_当前选择年月").text) 弹出什么？

用这个行不行？

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=101669&skin=0

弹出两次：

第一次显示：“BL_日历_当前选择年月”

第二次显示：“2018-03-04”

我把窗口中这个控件属性中的“文本”删除，再以共有窗口打开，就不报错了，不知有没有其他影响？

回复3楼，你加入转换的判读比较好，如

http://www.foxtable.com/webhelp/scr/0324.htm