zl程序教程

您现在的位置是:首页 >  其他

当前栏目

VB编程:Enum创建包含12个月的枚举类型-20_彭世瑜_新浪博客

博客编程 创建 类型 12 20 包含 枚举
2023-09-14 09:07:15 时间
运行效果:
VB编程:Enum创建包含12个月的枚举类型-20

程序代码:
Option Explicit
Public Enum Month
    jan = 1
    feb = 2
    mar = 3
    apr = 4
    may = 5
    jun = 6
    jul = 7
    aug = 8
    sep = 9
    Oct = 10
    nov = 11
    dec = 12
End Enum
Private Sub Form_Load()
    Text1.Text = Month.jan & "月份" _
                 & Month.jan & "月份" _
                 & Month.feb & "月份" _
                 & Month.mar & "月份" _
                 & Month.apr & "月份" _
                 & Month.may & "月份" _
                 & Month.jun & "月份" _
                 & Month.jul & "月份" _
                 & Month.aug & "月份" _
                 & Month.sep & "月份" _
                 & Month.Oct & "月份" _
                 & Month.nov & "月份" _
                 & Month.dec & "月份"
End Sub

编写总结:
    “ _”=>>“空格下划线”,续行符。类似于英文中的连字符。