VB 可以实现强制类型转换吗？

Question

请看这段代码：public sub FreeObject(byval Obj as Object)  if Obj as DAO.Database then
    '在这里我想实现关闭数据库,代码应该如何写???
     ....Close '调用数据库Close方法
   Set Obj=Nothing
  end ifend sub'==========================================================Delphi 可以用Database(Obj).Close
C#可以(Database)Obj.Close

Answer 1

to  leolan(史留香) 假設obj 是commandbutton類型將報錯! ^O^

Answer 2

CInt() 强制转换整型
以此类推