[求助]日期时间框外形 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

用同样的代码在窗体的工具栏内添加了两个日期时间框，为什么样式不一样？

部分代码如下：

i = i + 1

Dim DateStart As WinForm.DateTimePicker = e.Form.CreateControl("DateStart" ,ControlTypeEnum.DateTimePicker)

DateStart.text = system_Mydate

gc = basemainform.CreateGraphics

size = gc.MeasureString(DateStart.text,DateStart.Font)

DateStart.Width = size.width + 48

DateStart.visualstyle = VisualStyleEnum.Office2007Silver

e.Form.Strips("上工具栏").Items.InsertControl(DateStart.name,DateStart,i)

i = i + 1

Dim LblEnd As WinForm.Label = e.Form.CreateControl("LblEnd" ,ControlTypeEnum.Label)

LblEnd.text = "--"

gc = basemainform.CreateGraphics

size = gc.MeasureString(LblEnd.text,LblEnd.Font)

LblEnd.Width = size.width

LblEnd.TextAlign = ContentAlignment.BottomRight

e.Form.Strips("上工具栏").Items.InsertControl(LblEnd.name,LblEnd,i)

i = i + 1

Dim DateEnd As WinForm.DateTimePicker = e.Form.CreateControl("DateEnd" ,ControlTypeEnum.DateTimePicker)

DateEnd.text = system_Mydate

gc = basemainform.CreateGraphics

size = gc.MeasureString(DateEnd.text,DateEnd.Font)

DateEnd.Width = size.width + 48

DateEnd.visualstyle = VisualStyleEnum.Office2007Silver

e.Form.Strips("上工具栏").Items.InsertControl(DateEnd.name,DateEnd,i)

此主题相关图片如下：1.png

主题：[求助]日期时间框外形