窗口表为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.新增后后台数据不会自动更新到前台