当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 在窗体上建立—个名称为Text1的文本框,用来接收一个整数。当form1_ Click事件发生时,将在窗体上显示输入整数的各位数字和。Private Function fun(m As Integer) As IntegerDim k As Integer, n As Integerdo n = 【10】 k=k+ n m= m10Loop until m = 0fun = kEnd FunctionPrivate Sub form_ Click() Dim n As Integer n =

  

参考答案:

[10]mMod10

  参考解析

[11]fun(n)本题Fun函数的功能是求得形参m的各位数字的和,并作为函数值返回。在该函数中通过一个do...Loop循环把参数m的各位数字分离出来,加到和k中。不难得到[10]处应填“mMod10”。当在窗体上单击时,将调用函数Fun求得Text1中输入整数的各位数字和,因此[11]处应填“fun(n)”。

微信端