p;               End If

               End Property

 

               Private internal_ProgramDate

 

               Public Property Get ProgramDate

                       ProgramDate = Day(internal_ProgramDate) & _

                               " " & MonthName(Month(internal_ProgramDate)) & _

                               " " & Year(internal_ProgramDate)

               End Property

 

               Public Property Let ProgramDate(ByVal varDateIn)

                       If IsDate(varDateIn) Then

        

上一页  [1] [2] [3] 下一页

在google里搜索更多在VBScript中使用类（四）

	Web www.51ec.org

上一篇信息学院： ASP：网上通讯簿1.00

下一篇信息学院： 在VBScript中使用类（三）