IsNotEmpty(ByVal sArray As Variant) As Boolean '判断数组是 ...
方法一:Error方法 就是采用通用的错误捕获功能 On Error Goto 行号 遇到错误,转到行号处处理 On Error Resume Next 忽略错误,继续执行 On Error Goto 强制取消错误捕获功能 Function IsNotEmpty ByVal sArray As Variant As Boolean 判断数组是否为空 Dim i As Long IsNotEmpty ...
2015-10-09 19:59 0 2454 推荐指数:
IsNotEmpty(ByVal sArray As Variant) As Boolean '判断数组是 ...
最近有在做一个需求,需要在VB6.0中调用存储过程,整理了一下,供大家参考, 范例: ...
在工程中引用Microsoft Excel类型库 因为office 版本的不同,在代码写完之后,去掉引用 Microsoft Excel 9.0 Object Library(EXCEL2000 ...
VB6.0 的快捷键 公司有部分软件比较老,都是VB6做的软件(目前还不断在用),这个会有点帮助 F1:显示MSDN帮助。当然你要安装MSDN,否则得不到真正的帮助了 F2:显示对象浏览器。这里你可以看到对象的各种属性、方法与事件 F3:查找 ...
最近做了一个Upload文件的需求,文件的格式为CSV,读取文件的方法整理了一下,如下: 1、先写了一个读取CSV文件的Function: 2、调用上面的Function: ...
1、Form窗体事件 Private Sub Form_Activate() '焦点在此窗口时触发 MsgBox "窗体的Activate事件" End Sub Private Sub ...
VB6.0和VB.Net的对照表 VB6.0 VB.NET AddItem Object名.AddItem Object名.Items.Add ListBox1.Items.Add ...
注:大家如果没有VB6.0的安装文件,可自行百度一下下载,一般文件大小在200M左右的均为完整版的软件,可以使用。 特别提示:安装此软件的时候最好退出360杀毒软件(包括360安全卫士,电脑管家等,如果电脑上有这些软件的话),因为现如今的360杀毒软件直接会对VB6.0软件误报,这样的话 ...