VB automatically registers DLL files

Const A = 10 const B = 5 private sub commandementclick () dim omathlib as new class1dim R as integermsgbox omathlib. add (a, B) end subprivate sub command2_click () 'uninstallshell "CMD/C regsvr32/u/s dlltest. DLL ", vbhideend subprivate sub command3_click () dim OML as new class2dim R as integermsgbox OML. minus (a, B) end subprivate sub command4_click () dim OML as new class1dim R as integermsgbox OML. TMS (a, B) end subprivate sub command5_click () dim OML as new class2dim R as integermsgbox OML. DDB (a, B) end subprivate sub regdll_click () Shell "CMD/C regsvr32/s dlltest. DLL ", vbhideend sub