dim objscrubberclass as dynamicclass for each objscrubberclass in colavailableclasses dim asmassemblycontainingform as [assembly] = _ [assembly].loadfrom(objscrubberclass.location) dim typetoload as type = _ asmassemblycontainingform.gettype(objscrubberclass.type) dim genericinstance as object genericinstance = activator.createinstance(typetoload) dim scrubber as scrubberinterface.iscrubber = _ ctype(genericinstance, scrubberinterface.iscrubber) scrubber.scrub(ds) next
步骤 10:创建数据清理类 在 visual studio 中,创建一个类型为 class library(类库)的新项目。将其命名为 firstclass。用以下代码替换 class1 中自动插入的代码:
public class firstclass implements scrubberinterface.iscrubber public sub scrub(byval ds as dataset) _ implements scrubberinterface.iscrubber.scrub dim dr as datarow dr = ds.tables(0).newrow dr.item(0) = "professor moriarty" dr.item(1) = "666" ds.tables(0).rows.add(dr) end sub