编辑特别推荐:

　　全国计算机等级考试（等考）指定教材

　　全国计算机等级考试学习视频

　　全国计算机等级考试网上辅导招生

　　全国计算机等级考试时间及科目预告

　　考试大教育全国计算机等级考试在线测试平台

　　全国计算机等级考试资料下载

　　全国计算机等级考试论坛

　　计算机等级考试四级应用题解析汇总

　　2009年下半年全国计算机二级考试报名时间从6月1日起已经开始报名。详情点击：2009年下半年全国计算机等级考试各地报名点汇总。2009年下半年全国计算机二级考试时间是2009年9月19日至23日。更多优质资料尽在考试大论坛 考试大在线题库。

　　eXpressApp Framework (以下简称XAF)是Devexpress公司开发的一套基于.net平台的O/R M快速开发应用架构,其特点是可以快速的开发出基于web和winform的数据库应用程序,在XAF的实际应用开发过程中,我们难免要实现单据编号的自动生成和管理,传统的很多应用系统都是利用存储过程来实现这一目的的,我们知道XAF的是用XPO来和数据库存储系统交互的,有没有办法不用存储过程而直接用XPO来生成和管理应用系统的单据编号呢?经过本人的尝试,答案是肯定的,下面我就把这个实现的实体类和相应的实现函数共享出来,给大家参考,由于水平和时间的关系,代码可能没有那么的顺眼,请大家批评指正:　

　　1.单据编号设定实体类
　　Imports System
　　Imports System.ComponentModel
　　Imports DevExpress.Xpo
　　Imports DevExpress.ExpressApp
　　Imports DevExpress.Persistent.Base
　　Imports DevExpress.Persistent.BaseImpl
　　Imports DevExpress.Persistent.Validation
　　<DefaultClassOptions()> _
　　<System.ComponentModel.DisplayName("单据编号设定")> _
　　Public Class B_BILLCODEPREX
　　Inherits BaseObject
　　Public Sub New(ByVal session As Session)
　　MyBase.New(session)
　　End Sub
　　Private FTBNAME As String
　　<DevExpress.Xpo.DisplayName("表")> _
　　<Custom("AllowEdit", "False")> _
　　Public Property TBNAME() As String
　　Get
　　Return FTBNAME
　　End Get
　　Set(ByVal value As String)
　　SetPropertyValue("TBNAME", FTBNAME, value)
　　End Set
　　End Property
　　Private FTBCAPTION As String
　　<DevExpress.Xpo.DisplayName("表名称")> _
　　<Custom("AllowEdit", "False")> _
　　Public Property TBCAPTION() As String
　　Get
　　Return FTBCAPTION
　　End Get

上一页12下一页