Imports EgtUILib Public Class MissingKeyWD Private Sub MissingKeyWD_Initialized(sender As Object, e As EventArgs) 'Imposto i messaggi letti dal file dei messaggi ErrorLbl.Content = EgtMsg(MSG_MISSINGKEYWD + 1) 'Error! - Errore MissingKeyLbl.Content = EgtMsg(MSG_MISSINGKEYWD + 2) 'Missing key - Chiave non presente InsertKeyLbl.Content = EgtMsg(MSG_MISSINGKEYWD + 3) 'Insert it and reload program - Inserirla e riavviare il programma ExitBtn.Content = EgtMsg(MSG_MISSINGKEYWD + 4) 'Ok End Sub Private Sub ExitBtn_Click(sender As Object, e As RoutedEventArgs) Handles ExitBtn.Click Close() End Sub End Class