主题：SQLTable数据后台新增

窗口表为SQLTable型

此主题相关图片如下：搜狗截图17年06月12日1150_1.png


<!--[endif]-->

点新增后打开新增窗口，窗口为什么不能编缉

 
此主题相关图片如下：搜狗截图17年06月12日1236_2.png

窗口afterload代码

 '================新增与修改================

Dim name1 As String ="在建项目_table1"

Select Case zfsb

Case  1

Tables(name1).AddNew

e.Form.Controls("窗口名称").text=name1 &  "> > 新增项目"

Case 3

e.Form.Controls("窗口名称").text=name1 &  "> > 修改项目"

Case 0

e.Form.Controls("窗口名称").text=name1 &  "> > 查看信息"

e.Form.Controls("保存").Visible=False

e.Form.Controls("取消").Visible=False

'==================查看,不可修改=============

Dim p As WinForm.GroupBox = e.Form.Controls("GroupBox1")

Dim c As Integer= p.Children.Count-1

For c0 As Integer =0 To c

If zfsb=0 Then

If p.Children(c0).Gettype.Name Like "textbox" O r p.Children(c0).Gettype.Name Like "ComboBox"  Then

p.Children(c0).ReadOnly=BooleanEnum.True

End If

End If

Next

现在问题：1.点新增或修改，老是出现第一条数据，而不是新增行或指定的数据行

      2.新增后后台数据不会自动更新到前台