主题：用代码动态绑定table时闪烁的现象

各位老师，我使用了如下代码，对窗口中的table表进行动态的绑定，结果出现切换闪烁的情况，请问老师，怎么解决这个问题？

button1_click事件

forms("育苗作业记录").show

If forms("育苗作业记录").opened Then

Tables("育苗作业记录_Table1").DataSource = DataTables("育苗记录")

Dim trv As WinForm.TreeView = Forms("育苗作业记录").Controls("TreeView1")

trv.BuildTree("育苗记录", "育苗基地名称|苗床|编号")

Forms("育苗作业记录").Controls("gb1").text ="育苗记录"

End If

button2_click事件

forms("育苗作业记录").show

If forms("育苗作业记录").opened Then

Tables("育苗作业记录_Table1").DataSource = DataTables("幼苗领取记录")

Dim trv As WinForm.TreeView = Forms("育苗作业记录").Controls("TreeView1")

trv.BuildTree("幼苗领取记录", "幼苗来源|园区名称|编号")

Forms("育苗作业记录").Controls("gb1").text ="幼苗领取记录"

End If

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