以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何实现序号列自动编号等!!!谢谢  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=3571)

--  作者:杨浩
--  发布时间:2009/7/14 15:19:00
--  如何实现序号列自动编号等!!!谢谢
1、如何实现序号列自动编号?
2、如何实现使用录入窗口选择职务时,自动把“工资标准”表的相应职务数据生成到录入窗口?
3、如何实现开发的软件,具有审核数据的功能?比如出生日期和录入身份证号,性别和录入身份证号进行比较审核,最后将审核结果在文本框中显示出来?谢谢

--  作者:狐狸爸爸
--  发布时间:2009/7/14 15:22:00
--  
2、3很简单,1不知道。

请先看帮助,尝试自己做,有具体问题再提问,要上传简单的列表。
--  作者:杨浩
--  发布时间:2009/7/14 15:36:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


--  作者:杨浩
--  发布时间:2009/7/14 15:37:00
--  
1指的编制唯一的序号?
--  作者:狐狸爸爸
--  发布时间:2009/7/14 15:53:00
--  
你提的都是最基础的问题,帮助中提供了大量这样的例子,看一下就会明白的
2、3做好了,1不用做,用_identify做编号就行:

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


--  作者:杨浩
--  发布时间:2009/7/14 17:07:00
--  
审核结果在审核窗口提示!!!
--  作者:杨浩
--  发布时间:2009/7/14 17:13:00
--  
审核结果在审核窗口提示!!!

--  作者:狐狸爸爸
--  发布时间:2009/7/14 17:20:00
--  
按钮代码设置为:

Dim r As Row = Tables("人事工资管理").current
If r.IsNull("出生时间") = False AndAlso r.IsNull("身份证号") = False Then
    If r("出生时间") <> ReadBirthday(r("身份证号")) Then
        messagebox.show("校对错误")
    End If
End If

--  作者:qianhouge
--  发布时间:2009/7/14 17:29:00
--  
不愧是狐狸老爸!!就是强!!!厉害!图片点击可在新窗口打开查看
--  作者:狐狸爸爸
--  发布时间:2009/7/14 17:31:00
--  
静下心来看帮助,你就会发现,这些其实很简单的.