                 Next l
                  txtView = sOut
              Else
                  ' Get a string and show that:
                  If (m_cClip.GetTextData(lID, sText)) Then
                      txtView.Text = sText
                  End If
              End If
              m_cClip.ClipboardClose
          End If
          txtView.ZOrder
      End Select
    End If
    Screen.MousePointer = vbNormal
End Sub

Private Sub m_cCV_ClipboardChanged()
Dim lCount As Long
Dim lFormat As Long
Dim lID As L