如何根据数组判断一个数组元素是否为空的呢？vb

如题所述

举报该问题

第1个回答 2016-03-28

Dim ArrayS() As String
Private Sub Command1_Click()
On Error GoTo z
If UBound(ArrayS) > -1 Then
MsgBox "数组不为空"
End If
z:
MsgBox "数组空"
End Sub

本回答被提问者采纳

相似回答

在VB.NET中怎么样判断一个数组是不是为空答：一：利用错误捕获功能判断 Dim ArrayS() As String Private Sub Command1_Click()On Error GoTo z ReDim ArrayS(10)If UBound(ArrayS) > -1 Then MsgBox "数组不为空"End If Exit Sub z:MsgBox "数组空"End Sub 二、 Join方法：Dim ArrayS() As String Private Sub Command1_Click()If ...

VB如何判断一个数组为空答：判断数组上限UBound(arr)，如果为-1就是空。

VB 中得为空判断答：IsArray 函数返回 Boolean 值，指出变量是否为一个数组。语法 IsArray(varname) 必要的 varname 参数是一个指定变量的标识符。说明如果变量是数组，则 IsArray 返回 True；否则返回 False。对于包含数组的 variant 表达式来说，IsArray 尤为有用。 IsDate 函数返回 Boolean 值，指出一个表达...

VB 判断数组是否为空的方法答：用ubound会出错，为空时会出错用下面这个我在用的 If (CStr(Join(消息内数组, ""))) <> "" Then

VB 判断数组或者该行是否为空答：dim ss for j=1 to 1000 if sheets(1).rows(j).value<>"" then ss=sheets(1).rows(j).value aa=ubound（ss）end if

如何判断数组的某项是否为空答：所以输出的是False,而且没有换行,是这样吗？如果你要输出一行行的True,很简单,加个括号:response.write (len(objs(n))=0) & ""这样就输出几行True了不过,奇怪的是,上面的代码,将Response.Write 改成 Print 在VB中输出,却是一行行的True,难道VBS和VB中,&与=的优先级不一样? 怪事!!

VB6.0多组文本框数组,如何判断全空?答：Dim flag As Boolean For Each obj In Me.Controls If TypeOf obj Is TextBox Then '在这里判断的是所有窗体上的文本框，如果有不为空的就处理 '在这里你还可以通过obj.name是否等于txtA txtB txtC等判断。'如果想更详细的了解的话，可以暂时将下面的exit for 注释掉，然后把下面一行的注释取消...

大家正在搜

数组的最后一个元素是空字符给定一个非空数组除了某个元素 js删除数组重复元素和空元素 vba删除数组中的空值元素判断数组有几个元素数组元素为空去除数组中的空元素判断数组不为空空数组等于空数组吗

VB6.0: 如何判断数组是否为空？

vb中如何利用join的方法判断一个数组是否为空

VB如何判断一个数组为空

VB中如何判断数组为空数组

如何判断数组中某一元素为空

VB 判断数组或者该行是否为空

vb中,如何判定一个数是否属于一个数组中的元素呢?

VB6 如何判断一个动态数组是否为空？