(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
