（10）运行下列程序，输入如下两行：Hi,I am here．弹出的窗体中的显示结果是 【10】 。Private Sub Comm

（10）运行下列程序，输入如下两行：

Hi,

I am here．

弹出的窗体中的显示结果是 【10】 。

Private Sub Command11_Click()

Dim abc As String, sum As string

sum=""

Do

abc=InputBox("输入abc")

If Right(abc,1)="." Then Exit Do

sum=sum+abc

Loop

MsgBox sum

End Sub