如何判断数组中是否有内容 避免使用On Error语句。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Private Declare Function SafeArrayGetDim Lib "oleaut32.dll" (ByRef saArray() As Any) As Long 'API判断数组为空或没有初始化 Private Sub Command1_Click()Dim tmp() As StringIf SafeArrayGetDim(tmp) = 0 ThenMsgBox "数组为空或没有初始化"End IfEnd Sub 关于自定义打印纸张的问题 关于通过互联网(非局域网)远程连接ACCESS数据库? 将Excel中的数据导入到SQL Server 2000中 VB中如何创建一个dbf表(Foxpro6.0),并添加字段和记录,麻烦给点代码,谢谢! TreeView的一个问题 不知道哪位前辈有VBasic for DOS呀? 一个简单的问题,怎么让Text文本框的下拉滚动条处于底部状态? 那位兄弟有VB啊发个给我好不 请问什么是osql?见笑了, 如何把 PictureBox 控件与 VScrollBar 控件 联系起来使用 VB如何将缓冲区中的多个字符串数据保存到一个字符数组中 代码转换问题
Private Sub Command1_Click()
Dim tmp() As String
If SafeArrayGetDim(tmp) = 0 Then
MsgBox "数组为空或没有初始化"
End If
End Sub