主题：[原创]菜鸟也能用foxtable开发自己的应用程序，图文视频教程[连载结束，整理至1楼]

学习Foxtable已经有1年多了,都已经忘记曾经是怎么开始的,也已经忘记到底是什么让我坚持了下来,不管怎样,能坚持一年多,已足以证明Foxtable这个工具有着强大的吸引力和诱惑力,对于一个出身文科的我来说,需要在短时间内看到成效，这个工具确实是不二之选。

回想一年前,把那个“自动输入省市列表”的案例奉为经典！把那个“自动关联”的功能奉为传奇！为那个“自动统计”功能啧啧称奇！而如今,我自己已经可以独立完成这些基本的功能,甚至用代码实现,甚至已经很久没有再碰过Excel了，而在这个之前我每天都要反复打开Excel数几十次！

不知道什么原因,自从接触Foxtable开始,运动都少了很多,坐在电脑前的时间比往常多了几倍,真是有点不可思议!

看到Foxtable一步步的成长,功能一点点的完善,我很钦佩作者的坚持,感谢作者的付出,怎奈,软件的入门确实还是有点小难度,实现基本的,似乎很简单,但是一涉及到复杂一点的,没有学过编程的人,就没有了头绪,正是由于这个情况,也表示我对Foxtable的感谢,对作者的支持，我希望以自己的绵薄之力，为Foxtable的入门学习，增加一点点浅显的学习内容，让Foxtable更加容易学习，让Foxtable被更多人了解，让Foxtable被更多人采用。

于是，花了1个月的业余时间，设计了一个半成品，“会员管理系统”，作为学习的案例文件，做一个循序渐进的开发实例，在春节前为大家奉献出来，希望大家多多捧场。

    本文共分九个章节进行讲述，主要是图文辅以视频的方式进行，经过2个多月的整理，现已整理完毕，特意给大家分享。

 

第一章，创建会员表同时为会员表设置其必要的事件

1，项目介绍，1楼

2，开场PPT 2,3楼

3，软件介绍及下载，4，5，6楼

4，第一章节所需要的文件及讲解提纲下载  7楼

5，系统设置的预见性——增加时候的事件 13楼

6，系统设置的预见性——修改编辑事件  14楼

7，系统设置的预见性——保存事件 22楼

8，其他事项——表达式 23楼

9，其他事项——项目列表  24楼

10，其他事项——特殊字段  24楼

11，第一章总结 85楼

 

第二章，创建会员充值表并设置必要的事件

 

1，第二章介绍 ：   88楼

2，第一部分：创建会员充值表，并设置表属性  89楼

3，快速建立会员充值表，同时设置“系统设置的预见性——增加时候的事件” 90楼

4，设置“系统设置的预见性——修改编辑事件”  90楼

5，设置“系统设置的预见性——保存事件” 91楼

6，设置会员充值表的其他属性   92楼

7，第二章第一部分案例文件下载     93楼

8，快速建立会员消费表，同时设置“系统设置的预见性——增加时候的事件” 103楼

9，设置与表相关的事件（关联，关联数据引用等） 107楼，108楼，109楼，110楼

10,设置“系统设置的预见性——修改、编辑”事件 111楼

11,设置会员消费表的其他属性   112楼

12,第二章第二部分案例文件下载     112楼

13,第三部分：创建消费表，消费明细表、产品表并设置表属性  129楼

14,设置“系统设置的预见性——增加时候的事件” 130楼

15,设置其他属性事件   131楼

16,第三部分案例下载  131楼

 

第三章,设置各表之间的关联及表间关系

1，分析各表之间的关系，设置各表的关联    147楼

2，第三章需要的案例文件下载  147楼

 

第四章，设置简单的导航菜单及窗口

1，设置简单的导航菜单及窗口    172楼

2，第四章需要的案例文件下载  172楼

 

第五章，完善各表的事件以及设置简单的查询表

1，第五章第一部分：完善会员表的相关事件   178，179楼

2，第五章第二部分：完善会员充值表相关事件  204楼

3，第五章第三部分：设置简单的查询表 205楼

4，第五章第四部分:使用辅助sql工具205楼

 

第六章[设置必要的用户及权限]

1，第六章第一部分：移植优秀的用户管理模块视频过程以及案例文件下载 242楼

2，第六章第二部分：用户权限模块移植视频过程及案例文件下载  258楼

 

第七章[纯表格系统的完善和发布]

1，纯表格系统的完善和发布（视频过程）  269楼

第八章，设计我们的第一个窗口

1，从第一个窗口开始对系统进行改头换面     视频过程  319楼

第九章，系统的纠错及完善

1，第九章第一部分：[窗口的分类及开发顺序]      更新至342楼

2，第九章第二部分：[操作类窗口——会员登记窗口设计]   更新至353楼

3，第九章第三部分：[操作类窗口——会员消费窗口设计]   更新至370楼

 

菜鸟也能用foxtable开发自己的应用程序之菜鸟学习foxtable感受（PPT）下载

下载地址（第一部分）：http://www.foxtable.com/bbs/viewFile.asp?BoardID=2&ID=25011

下载地址（第二部分）：http://www.foxtable.com/bbs/viewFile.asp?BoardID=2&ID=25012

                      http://www.kuaipan.cn/file/id_122000349929144336.htm

菜鸟也能用foxtable开发自己的应用程序整理篇（word版本）下载

                      http://www.kuaipan.cn/file/id_122000349929144330.htm

 

案例分期文件下载链接：

                      http://www.kuaipan.cn/file/id_122000349929144332.htm

数据库文件：

http://www.kuaipan.cn/file/id_122000349929144333.htm                             

已经发布的视频链接

                     http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=28164&replyID=184069&skin=1

 

已经发布的PPT文件下载

                    http://www.kuaipan.cn/file/id_122000349929144336.htm

                     http://www.kuaipan.cn/file/id_122000349929144337.htm

已经发布的其他辅助文件（mmap）下载：

                    http://www.kuaipan.cn/file/id_122000349929144334.htm

                           http://www.kuaipan.cn/file/id_122000349929144335.htm

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

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

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

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

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

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


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

软件下载地址

 

开发者密码已经不重要了，大家只需要将34阶段的主文件替换掉这个文件夹中的文件即可。

由于U盘和狗丢失，所有的文件都是重新做过的，所以建议大家下载第34阶段的文件覆盖

1.  创建我们的第一张表——会员表

参见会员系统第一阶段文件

表结构如下图

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

同时设置字段的类型，其他的暂时不要考虑；

2.分析我们的第一张表，看看是否有什么事件会发生？

可以按照以下的思路去分析

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

这样，一个一个部分的来做

1）增加的时候是否有什么动作发生？

当添加一个新会员的时候，各个字段的状态

 会员卡号，默认为会员编号； 

会员等级，默认为普通； 

卡片状态，默认为正常； 

过期时间，默认为今天+一年； 

卡片余额，默认为0； 

积分数量，默认为0； 

折扣字段怎么操作呢？

这些分析完毕之后，想想怎么达成你的目的呢？

既然是新增的时候发生的事情，那么就找到表事件

如图

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

当我们点击 datarowadding的时候，就会看到帮助的动态提示

DataRowAdding

增加一行时执行，此时新增行(DataRow)已经创建，但并未真正增加到DataTable中，通常在此处对新增行进行默认值的设置。

e参数属性：　

DataTable：返回增加行的数据表。
DataRow：  返回新增加的行。

示例一

例如希望新增行的日期设为当前系统日期，姓名设为当前登录用户名，可以将DataRowAdding事件的代码设置为：

e.DataRow("日期") = Date.Today()
e.DataRow("姓名") = User.Name

有了这个提示，以上的内容是不是就迎刃而解了呢？

是不是觉得其实弄这个也挺简单的嘛！

代码如下：

e.DataRow("会员等级") = "普通"

e.DataRow("会员卡状态")= "正常"

e.DataRow("登记时间")= Date.today

e.DataRow("过期日期") = e.DataRow("登记时间").AddDays(365)

e.DataRow("卡片余额") = 0

e.DataRow("会员积分") = 0

这里面仅有一个地方需要解释一下

e.DataRow("过期日期") = e.DataRow("登记时间").AddDays(365)

这里是什么意思呢？

过期日期是需要自动填充的，什么时候呢？

是登记日期后的365天，那么我们怎么获得这个addday呢？

e.DataRow("登记时间")= Date.today

后面点一个·，按tab立即就出来帮助了

这个是不是很方便

首先，

我们点击表属性，看看涉及保存的事件有哪些？

其次，

看看哪些属性适用于我们的系统？

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

我们看到这里只见到有一个属性，beforesavedatarow

BeforeSaveDataRow

在保存某一数据行之前执行，可以在此对数据进行最终的验证。

e参数属性：
　
DataTable: 返回正在保存的数据表。
DataRow:   返回正在保存的数据行。
Cancel：   逻辑型，设为True，取消正在进行的保存。

而我们需要些什么呢？

 

需求：

<!--[if !supportLists]-->1.   <!--[endif]-->保存的时候，需要部分列字段不能为空，否则就不能保存；

<!--[if !supportLists]-->2.   <!--[endif]-->被编辑的行如果状态不是保存状态，那么不能离开下一行；

<!--[if !supportLists]-->3.   <!--[endif]-->如果离开，那么对该行数据的操作就会被撤销；

 

我们一个个的来解决！

第一个问题：部分列字段不能为空，否则就不能保存；

 

假设，会员姓名和手机号码列不能为空，那么我们可以这样做

If e.DataRow("会员姓名") = "" Then  '假设-正在保存的数据行-的列为空值

    MessageBox.Show("会员姓名必须输入")  '那么弹出一个消息

Else

    e.Cancel = True   '逻辑型,设为True,取消正在进行的保存.

End If

 

目前阶段，我们还不会用更复杂的语句，先用这些吧

接下来，我们设置手机号码不能为空

If e.DataRow("手机号码") = "" Then  '假设-正在保存的数据行-的列为空值

    MessageBox.Show("手机号码必须输入")  '那么弹出一个消息

Else

    e.Cancel = True   '逻辑型,设为True,取消正在进行的保存.

End If

 

这样做了之后，是不是已经完成了这样的目标呢？

 

第二个问题：被编辑的行如果状态不是保存状态，那么不能离开下一行；

 

 

这个时候，我们关注的是：数据行的状态

在帮助中搜索关键词“行的状态”

我们来模拟一下，如果该行状态没有发生变化，那么就新增一行。

If  e.DataRow.RowState =DataRowState.Unchanged Then  '如果该行的状态为  unchanged

    Return                                '终止执行下面的程序

Else

    Dim Result As DialogResult   '否则,定义一个对话框

    Result = MessageBox.Show("你是否需要增加一行?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

    If Result = DialogResult.no Then

        Return

    Else

        e.DataTable.AddNew()

    End If

End If

 

 

第三个问题：如果离开，那么对该行数据的操作就会被撤销；

 

上一节中，我们接触到对话框，当点击确定的时候就增加，否则就撤销

帮助文件中搜索关键词“撤销”

Reject

撤销自打开文件或最近一次保存以来，对该行做出的修改。
如果是新增加的行，执行此方法，会删除行。

这样的描述很清楚。

我们只需要加一条

e.datarow.reject()

即可完成任务！

 

 

关于保存相关的事件，是不是很简单？

你也可以操作一下，遇到不熟悉的，就翻翻帮助

此主题相关图片如下：image003.gif

知识链接：

在帮助文件中搜索“保存”，你得到哪些结果呢？是不是有您需要的？

更为复杂的不能为空的操作，先给出思路，先做一下，不懂再发问吧

<!--[if !supportLists]-->1）          <!--[endif]-->定义多个不能为空的字段集

<!--[if !supportLists]-->2）          <!--[endif]-->定义一个数据行

<!--[if !supportLists]-->3）          <!--[endif]-->在保存的时候遍历这个数据行，如果某列为空，就提示