单选题 有如下程序，运行该程序后从键盘接收1个有效的(≥0)数据。如果输入的数据无效，则要求重新输入，否则显示该数据的平方根。程序空白处应填写(    )。
   Dim s As  Integer,  i As  Integer
   Dim flag As Boolean,  p As  Integer
   flag=True
   Do While flag
       s=val(InputBox("请输入："))
       If s＜0 Then
           MsgBox"输入无效!请重新输入。"
      Else
           MsgBox Sqr(s)
           ______
      End If
   Loop
   A．flag=True    B．flag=False    C．True=flag    D．False=flag