执行下面的程序，单击窗体后窗体消息框内显示结果是( )。 privAtE、su
B、Form_CliCk() Dim strAs string, kAs intEgEr str="AB" For k = lEn(str) to 1 stEp -1 str=str&ChrAsC(miD(str, k, 1)) +k) nExt k msgBox strEn
D、suB
A、ABCE
B、ABCD
C、ABDB
D、ABFB