Ciao Ragazzisono uno studente alle prese con la programmazione in visual basic, la prof questa volta si è divertita a darci un bel esercizio.Ecco il testo del compito:Un messaggio viene criptato inserendolo nel quadrante 4x5 in alto a sx di una matrice 8x10. Il quadrante viene specchiato nel quadrante 4x5 di dx e a questo punto si applica la simmetria orizzontale e si riempe tutta la matrice.Il messaggio criptato si ottiene inviando i dati della matrice per colonna.Vincoli: il messaggio deve avere lunghezza pari a 20 caratteri (spazi esclusi)la mia testa ha creato questo listato:Option ExplicitDim V() As StringDim F As StringDim L As StringDim C As StringDim K As DoubleDim X As IntegerDim I As IntegerDim J As IntegerDim M As IntegerDim S As IntegerDim Z As IntegerPrivate Sub Form_Load()'Scrivo immissione testo da inserireDoF = InputBox(" INSERISCI FRASE ")L = Len(F)For K = 0 To L - 1C = Mid(F, K, 1)If C "0" ThenReDim Preserve V(X)V(X) = CX = X + 1End IfNext'Scrivo vincolo