VB 学习笔记

VB 学习笔记这一个月由于工作的需要,学习了一点VB.net操作Excel,记录一下笔记vb里面的下标vb里面的下标有三种:从0开始:当我们在vb中定义一个数组时,下标只能从0开始Dimarr(2)asString中的arr数组长度为3注意不是2Dimarr(1to10)asString则会报错数组的下限只能是0从1开始:主要…

大家好,又见面了,我是你们的朋友全栈君。

这一个月由于工作的需要,学习了一点 VB.net 操作 Excel,记录一下笔记

vb 里面的下标

vb 里面的下标有三种:

  • 从 0 开始:当我们在 vb 中定义一个数组时,下标只能从 0 开始
    • Dim arr(2) as String 中的 arr 数组长度为 3 注意不是 2
    • Dim arr(1 to 10) as String 则会报错 数组的下限只能是 0
  • 从 1 开始:主要用于从 0 开始会引发异常的 collections 比如 Tabs, Pages, Controls(listBox, TextBox),Excel 里面的复杂类型下标都是从 1 开始
  • 字典类型 下标为键值

在代码中尽量使用 LBound 和 UBound 来获取数组最小和最大下标,可以在模块中使用option base 1 来指定下标从 1 开始

VBA 数组下标详解
VBA option base 使用

关于 Excel lastUsedRow 和 lastUsedColumn

Excel 中 Worksheet.UsedRange.Rows 是指 Excel 工作簿中第一个不为空的行到最后一个不为空的行之间的行数 R,所以如果工作簿中一开始有空行的话,最后返回的结果为「R – 开头空的行数」,所以可能不是我们所预期的结果。

所以不要依靠 Worksheet.UsedRange.Rows 来获取最后一行而应该使用参考链接的方法

关于获取 Excel last rows

为什么 vb 中使用 Worksheet.UsedRange.Rows.Count 得到的结果是错的

关于 vb 的异常处理

VB 中使用 try catch 捕获异常,使用 throw 抛出异常。

但是如果有两个类分别在两个模块中,想在 A 类模块的函数中调用 B 类中的函数并捕获 B 类函数的异常,就会报个警告:Exception 类型异常在「模块 2」中发生但未处理

# 模块 1
Public Class Test1
    Private T = new Class Test2

    Private Sub test1()
        Try
            T.Test()
        Catch ex as Exception
            MsgBox(ex.message)
        End Try
    End Sub

End Class

# 模块 2
Public Class Test2
    Public Sub Test()
        Throw new Exception(“error”)
    End Sub
End Class
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请联系我们举报,一经查实,本站将立刻删除。

发布者:全栈程序员-站长,转载请注明出处:https://javaforall.net/151918.html原文链接:https://javaforall.net

(0)
全栈程序员-站长的头像全栈程序员-站长


相关推荐

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

关注全栈程序员社区公众号