End If 该例检查当前单元格的值,并且在相邻的列贴上适当的“标签”(零,正和负)。注意,此时没有使用Else子句。如果第一种情况(ActiveCell.Value = 0)为假,VB将跳到下一个ElseIf语句,并且评估该条件(ActiveCell.Value>0),如果该值不大于0,VB将跳到下个ElseIf并检查条件ActiveCell.Value<0。
二.控件参数在用控件作为参数时,必须考虑到作为实参的控件是否具有通用过程中所列的控件的属性。为此VB提供了一个TypeOf语句,格式为:IfTypeOf控件名称 Is控件