[求助]按钮效果求助 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

想实现这样的效果（在其他软件中看到的）

窗口运行后不允许直接在窗口的表中直接编辑数据

三个按钮的初始状态如下

开单按钮可用，修改按钮可用，保存按钮不可用。

开单（取消）：单击开单按钮后表新增一行（单击开单后按钮标题自动变成取消,修改按钮变为不可用状态），此时当前行可以录入数据但并未保存添加到表中，

如单击保存（单击开单按钮后保存按钮自动变为可用状态）按钮则保存数据，三个按钮的状态恢复到初始状态。

如果不想保存，点击取消按钮则不保存，三个按钮的状态恢复到初始状态。

修改（取消）：单击修改按钮后可修改当前行数据（单击修改后按钮标题自动变成取消，开单按钮变为不可用状态），此时当前行数据所做的修改并未保存到表中，

如单击保存按钮（单击修改按钮后保存按钮自动变为可用状态）则保存数据，三个按钮的状态恢复到初始状态

如果不想保存，点击取消按钮则不保存，三个按钮的状态恢复到开单前。

下载信息 [文件大小：下载次数： ]
点击浏览该文件:测试按钮功能.foxdb

[此贴子已经被作者于2017/11/7 22:33:49编辑过]

开单按钮事件，其它按钮控制方法一样，参考处理

If e.Sender.Text = "开单"

Tables("业务估价").Rows.AddNew()

e.Sender.Text = "取消"

e.Form.Controls("Button1").Enabled = False

e.Form.Controls("Button3").Enabled = True

Else

e.Sender.Text = "开单"

DataTables("业务估价").RejectChanges

e.Form.Controls("Button1").Enabled = True

e.Form.Controls("Button3").Enabled = False

End If

有点蓝老师，我还差保存按钮的功能没设置好

初始状态

开单按钮可用，修改按钮可用，保存按钮不可用。

点击开单或者修改后如果点保存按钮则恢复到初始状态（“开单”按钮标题要显示开单不是取消，修改按钮标题要显示修改不是取消，）

下载信息 [文件大小：下载次数： ]
点击浏览该文件:测试按钮功能.foxdb

保存按钮

If e.Form.Controls("保存").Enabled = True
    Tables("业务估价").Current.Save()
    e.Form.Controls("修改取消").Enabled = True
    e.Form.Controls("开单取消").Enabled = True
    e.Form.Controls("修改取消").text = "修改"
    e.Form.Controls("开单取消").text = "开单"

    e.Form.Controls("保存").Enabled = False
End If

主题：[求助]按钮效果求助