Vá nos eventos do formulário, procure por "Querymodechange" e declare a variável "Continue" com valor igual a "false". Vai ficar assim:
Sub Querymodechange(Source As Notesuidocument, Continue As Variant)
Continue = false
End Sub
"A plenitude da atividade humana é alcançada somente quando nela coincidem, se acumulam, se exaltam e se mesclam o trabalho, o estudo e o jogo; isto é, quando nós trabalhamos, aprendemos e nos divertimos, tudo ao mesmo tempo. (...) É o que eu chamo de 'ócio criativo', uma situação que, segundo eu [penso], se tornará cada vez mais difundida no futuro." (Domenico de Masi)
Nenhum comentário:
Postar um comentário