主题：控件锚定

1、某一个容器，停靠设置成fill；

 

2、然后里面的控件，锚定设置一下即可。

 

3、不可能每个容器或控件都能同比显示的啊。

 

自适应参考，http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=75714&replyID=521954&skin=1

 

不会做，就上传例子。

代码没问题

 

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree("配载订单", "车牌|司机|项目")
trv.Nodes.Insert("所有订单",0)

 

你在刷新的地方又换了

 

trv.BuildTree("配载订单", "司机|项目|客户")

 

----------------------------------------

 

报错，报什么错啊

 

 

Dim sd As WinForm.DateTimePicker
Dim ed As WinForm.DateTimePicker
sd = e.Form.Controls("DateTimePicker1")
ed = e.Form.Controls("DateTimePicker2")
Dim cpbh As String '= e.Form.Controls("项目").Value

Dim filter As String = "1=1"
If sd.Value <> Nothing Then
    filter &= " and 出车日期 >= #" & sd.value & "#"
End If
If ed.Value <> Nothing Then
    filter &= " and 出车日期 <= #" & ed.value & "#"
End If
If cpbh <> "" Then
    filter &= " and [项目] like '%" & cpbh & "%' "
End If
If ed.value = Nothing AndAlso sd.value = Nothing Then
    filter &= " and 出车日期 = #" & Date.today & "#"
End If
DataTables("配载订单").LoadFilter=filter
DataTables("配载订单").Load
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree("配载订单", "车牌|司机|项目")
trv.Nodes.Insert("所有订单",0)