【VB源码】判断数组是否为空 _ 资源

查看: 3292\|回复: 13	【VB源码】判断数组是否为空 [复制链接]

发送短消息 UID 211464 帖子 21164 精华 13 鲜花 258 朵铜币 47817 个银币 60 个性别在线时间 263800 注册时间 2008-12-23 最后登录 2022-11-28 1094599314 1094599314 查看公共资料搜索主题搜索帖子兄弟工程师01 组别版主 UID211464 帖子21164 精华13 鲜花258 朵铜币47817 个银币60 个在线时间263800 注册时间2008-12-23 按键精灵开发者4级可通过提升认证等级来升级勋章：rz.anjian.com 兔年勋章兔年纪念勋章论坛MM 按键论坛女性用户勋章小红帽对论坛提出良好建议（可向管理员申请）学有所成学有所成勋章，新手步入按键学堂的第一枚勋章按键元老资深按键用户的尊贵荣誉勋章管理人员按键论坛的管理团队专属勋章	1^# 字体大小: t T 发表于 2010-01-05 14:28 \| \|只看楼主判断数组是否为空 Option Explicit Private Declare Function SafeArrayGetDim Lib "oleaut32.dll" (ByRef saArray() As Any) As Long Private Sub Command1_Click() Dim arrT() As Long 'ReDim arrT(0) MsgBox SafeArrayGetDim(arrT) End Sub 复制代码
	点赞【按键精灵手机版】按键精灵安卓版v3.0发布啦~体验送现金红包哦！！【按键精灵2014.03.16412版】这是有史以来最稳定的版本，不信你用一个？ .

	回顶部

上一主题| 下一主题

【VB源码】判断数组是否为空 [复制链接]