cfieldvalue.cls

来自「VB开发的ERP系统」· CLS 代码 · 共 24 行

VERSION 1.0 CLASS
BEGIN
  MultiUse = -1  'True
  Persistable = 0  'NotPersistable
  DataBindingBehavior = 0  'vbNone
  DataSourceBehavior  = 0  'vbNone
  MTSTransactionMode  = 0  'NotAnMTSObject
END
Attribute VB_Name = "CFieldValue"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Option Explicit

Public FieldName As String
Public FieldNameC As String
Public FieldValueName As String
Public FieldLengthInt As Integer
Public FieldLengthFra As Integer
Public FieldType As Integer
Public FieldWidth As Integer
Public FieldIsShow As Integer