- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 菜鸟，关于窗体中的按钮事件，望指点。 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=76798)
-- 发布时间：2015/11/5 11:59:00
-- 菜鸟，关于窗体中的按钮事件，望指点。
-- 发布时间：2015/11/5 12:08:00
--
1、直接写
Dim r As Row = Tables("表A").AddNew
r("第一列") = e.Form.Controls("TextBox1").Text
r("第二列") = e.Form.Controls("TextBox2").Text
r.Save
2、
If e.Form.Controls("TextBox1").Text > "" Then
Dim Result As DialogResult
Result = MessageBox.Show("是否需要保存?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
End If
End If
-- 发布时间：2015/11/5 23:13:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
一．汇总窗口，
1点击“新增”，打开“录入窗体”，空白
2点击“编辑”，打开“录入窗体”，显示可编辑内容
3点击“删除”，删除当前行，设置权限
二．录入窗体
1. 点击“新增”，有未保存的内容，提示是否保存，是： 在表中新增一行，将textbox写入对应列，删除空行，保存。
否：清空textbox。
2．点击“撤销”，撤销之前的输入。
3. 点击“保存”，将textbox写入对应列，保存。
4. 点击“关闭”，有未保存的内容，提示是否保存，是：将textbox写入对应列，删除空行，保存。否：删除空行，关闭“录入窗体”
没有未保存的内容，直接删除空行，关闭录入窗体。
以上还请老法师们做个实例出来，方便菜鸟学习。谢谢。
-- 发布时间：2015/11/5 23:48:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1.table |
-- 发布时间：2015/11/6 8:54:00
--
-- 发布时间：2015/11/6 9:11:00
--
-- 发布时间：2015/11/6 11:53:00
--
-- 发布时间：2015/11/6 12:00:00
--
1、可以；
2、用1判断，不是可以了么？
-- 发布时间：2015/11/6 12:25:00
--
-- 发布时间：2015/11/6 14:11:00
--
保存按钮这样写
Tables("表A").Save