Foxtable(狐表)用户栏目专家坐堂 → [求助]代码错误


  共有2185人关注过本帖平板打印复制链接

主题:[求助]代码错误

帅哥哟,离线,有人找我吗?
blsu33
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2927 积分:20167 威望:0 精华:0 注册:2012/2/3 17:45:00
[求助]代码错误  发帖心情 Post By:2017/8/18 13:46:00 [只看该作者]

 老师,
   下面标颜色的代码有误,劳烦您给看下


Dim tbl As WinForm.TabControl = e.Form.CreateControl("tbl_01", ControlTypeEnum.TabControl)
e.Form.AddControl(tbl)
Dim panl As  WinForm.Panel=e.Form.CreateControl("pl_01", ControlTypeEnum.Panel)
Dim spl As WinForm.SplitContainer=e.Form.CreateControl("spl_01", ControlTypeEnum.SplitContainer)
spl.Dock=5
panl.AddControl(spl)
MessageBox.Show(5)
tbl.TabPages(0).AddControl(panl)
MessageBox.Show(6)

Dim w As Integer=tbl.TabPages("1").Width
Dim h As Integer=tbl.TabPages("1").Height
If w-350<=0 Then
    spl.SplitterDistance =w*0.2'必须是添加控件后添加的属性
Else
      spl.SplitterDistance =350'必须是添加控件后添加的属性
End If

 回到顶部
总数 12 1 2 下一页