1、过程
成都创新互联公司凭借在网站建设、网站推广领域领先的技术能力和多年的行业经验,为客户提供超值的营销型网站建设服务,我们始终认为:好的营销型网站就是好的业务员。我们已成功为企业单位、个人等客户提供了网站制作、成都网站设计服务,以良好的商业信誉,完善的服务及深厚的技术力量处于同行领先地位。Public|Private Sub 过程名(形参, ...)
...
End Sub
注:Exit Sub强制退出过程
2、函数
Public|Private Function 函数名(形参, ...) As 返回数据类型
...
函数名=返回值
End Function
注:Exit Function强制退出函数
3、类模块
Private 变量名 As 数据类型
Property Get 属性名() As 属性类型
属性名=变量名
End Property
Property Let 属性名(ByVal 形参名 As 数据类型)
变量名=形参名
End Property
Property Set 属性名(ByVal 形参名 As 数据类型)
...
End Property
4、异常处理
On Error GoTo 标签
...
Exit Sub
标签:
...
Err.clear
另外有需要云服务器可以了解下创新互联scvps.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。