使用vb引用TLBINF32.DLL类库，这个文件在系统目录中PrivateSubCommand1_Click()DimTLIAppAsObjectDimTLBInfoAsObjectDimTypeInfAsObjectSetTLIApp=CreateObject("TLI.TLIApplication")...