有如下程序: privAtE suBCommAnD1_CliCk() Dim kAs intEgEr,mAs intEgEr Dim pAs intEgEr k=4:m=1 p=pC(k,m):print p; p=pC(k,m):print p EnD suB privAtE FunCtion pC(AAs intEgEr,BAs intEgEr) stAtiC mAs intEgEr,iAs intEgEr m=0:i=2 i=i + m + 1 m=i + A + B pC=m EnD FunCtion 程序运行后,输出的结果为 A、4 6 B.6 6 C.8 8 D、10 12