VB 学习笔记

2022-06-24 19:32:32 浏览数 (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」中发生但未处理

代码语言:javascript复制
# 模块 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.cn/151918.html原文链接:https://javaforall.cn

0 人点赞