Visula Basic 6.0关于Set语句的作用问题

在VB6.0语言中定义变量用Dim以后为什么还要使用Set呢？两个语句的作用是不是重复了呢？谢谢

Dim是定义变量，Set是给对象型变量赋值，两者怎么会重复呢？