航空发动机行业现状:能否判断动态数组有没有被分配过

来源：百度文库 编辑：九乡新闻网 时间：2024/04/28 13:06:42
动态数组在VB语言中常能起到出奇制胜的作用。但数组有没有被重新定义或释放，用“is empty”，“is null”，“=""”等方法都不起作用。所以判断时一般采用侦别错误消息（ON ERROR ）的方法。下面给出一个非错误侦别的代码，判断动态字符串数组的分配情况：

 

 

Private Sub Command1_Click()
Dim a() As String, i As Long


MsgBox hasredim(a), 64, "Has a() been redimed?"   ´未初始化


ReDim a(20)

For i = 1 To 20
a(i) = chr(i+64)

Next

MsgBox hasredim(a), 64, "Has a() been redimed?"     ´初始化后


Erase a    ´释放空间后
MsgBox hasredim(a), 64, "Has a() been redimed?"   


End Sub

 


Function hasredim(ByRef x() As String) As Boolean  ´定义布尔函数
Dim temp As String
temp = Join(x, ",")
hasredim = LenB(temp) > 0 ´空数组长度为零
End Function

能否判断动态数组有没有被分配过 【转] 彻底了解指针数组，数组指针，以及函数指针，以及堆中的分配规则 没有被PS过的神奇照片有哪些？ “上大学你有没有被女生追过？” “没有” “你找过原因没？” - 萝卜网 - 人人都是艺术家 JS判断数组中是否包含某一项 oracle pl/sql 入门+ 数组使用+游标+动态SQL 广州历史上有没有下过雪 你有没有过刻骨铭心的恋爱 你有没有这样爱过 你有没有这样爱过? 你有没有这样爱过. '你有没有这样爱过 你有没有这样爱过' 你有没有重视过“电脑病” 易纲：外汇储备能否无偿分配使用？ 分娩能否没有痛苦 你能否听到什么声音，全在于有没有专注地倾听 有没有想过，也许一辈子你都是个小人物。 美国穷人有没有房子 怎么过生活 囧鞋秀，总有一款你没有见过！ 有没有想过，也许一辈子你都是个小人物 有没有想过，也许一辈子你都是个小人物 有没有想过，也许一辈子你都是个小人物 江青到底有没有代笔毛“御批”过？