Visual Basic 对象编程与 OLE 自动化详解
1. 对象数据类型测试
在 Visual Basic 中，可以使用If TypeOf...Is编程块来测试对象的数据类型。例如，以下代码用于判断objAnything存储的对象是否为文本框：
If TypeOf objAnything Is TextBox Then此外，Visual Basic 除了支持作为关键字命令的TypeOf，还支持TypeOf()函数，该函数会返回其参数的对象类型。
2. 使用 With 关键字设置对象属性
当需要在代码中设置对象的多个属性时，使用With关键字可以简化代码。例如，设置标签lblTitle的多个属性：
With lblTitle .Caption = "Accounts Payable" .Alignment = vbRightJustify .Font.Size = 15 .Font.Bold = True .Left = 25 .Right = 0 .Width = 1000 End With如果不使用With关键字，则需要在每个赋值语句中重复对象的名称： </
