Private Sub cmdStampa_Click()
if MsgBox("Sei pronto per stampare?",vbYesNo,"Info") = vbYes then
frmAssegnoLuca.PrintForm
end if
end sub