单选题编写程序，要求输入一个正整数，计算各位数字之和，并将计算结果显示在窗体上。程序如下：Private Sub Command1_Click() Dim Sum As Integer, k As Long k = Val(InputBox("输入正整数：")) Do While k > 0 Sum = Sum + ( __________ ) k = k / 10 Loop Print Sum End Sub程序不完整，应该在_______ 处填写的内容是

A、 k Mod 10
B、 k
C、 left(CStr(k), 1
D、 mid (CStr(k), 1，1)

【正确答案】 A

【答案解析】解析：k = Val(InputBox("输入正整数："))的意思是将输入对话框中输入的数据转换成数字赋给变量k。在内层循环中，循环体的意思是将k除10的余数（k mod 10）加入到sum变量中，然后k重新赋值， k除以10的整数赋值给k。执行循环体，直到k=0为止。最后得到的sum就是输入整数的各位数字之和，故选择A项。