Lines Matching refs:comment
202 '-- For setting the archive comment
399 Dim comment As String
416 comment = InputBox("Enter or edit the comment", Default:=szcomment)
417 If comment = "" Then
418 ' either empty comment or Cancel button
419 If MsgBox("Remove comment?" & Chr(13) & "Hit No to keep existing comment", vbYesNo) = vbYes Then
420 szcomment = comment
425 szcomment = comment