Visualizzazione dei risultati da 1 a 3 su 3
  1. #1

    [VB6] Impostare i font per un MsgBox

    mi chiedevo se è possibile impostare un font per visualizzare una msgbox con un altro carattere. Il problema è legato al fatto che questa finestra di messaggio fa da riepilogo per un conteggio che il cliente mi dovrebbe pagare e vorrei che le cifre fossero giustificate in modo da rimanere tutte allineate.
    Ho pensato quindi di utilizzare il font del blocco note che, anche senza utilizzare spazi, incolonna per bene lo scritto.

    Sono accettate anche altre idee tranne quella di fare una form apposita per scarsa voglia del programmatore
    "Una volta che si saranno esaurite senza successo tutte le possibilita', ci sara' una soluzione, semplice e ovvia, che saltera' immediatamente all'occhio di chiunque altro."

    Guardate: Il Miracolo delle Noci!!

  2. #2
    Utente di HTML.it L'avatar di Mabi
    Registrato dal
    May 2002
    Messaggi
    1,245
    Originariamente inviato da Lathspell
    Il problema è legato al fatto che questa finestra di messaggio fa da riepilogo per un conteggio che il cliente mi dovrebbe pagare e vorrei che le cifre fossero giustificate in modo da rimanere tutte allineate.
    Per "allineare" meglio potresti usare la Format o la Space:
    codice:
    Dim Numero As Integer
    
    Numero = 123
    MsgBox Format(Numero, "00000")
    (Potresti fare un esempio di visualizzazione da correggere ?)
    ... e non usare while wend è una sintassi deprecata

  3. #3
    premesso che più o meno ho risolto anche se con qualche leggera imperfezione ciò che vorrei giustificare è il risultato che produce il seguente codice:



    codice:
    Msgbox "Totale Spesa della postazione: " & 
    NomePostazione & vbCrLf & "Tariffa Base:                    € " &
    ContoPostazione & vbCrLf & "Fax tipo Città:                  € " &
    TOTALEFAX1 & vbCrLf & "Fax tipo Fuori Città:         € " &
    TOTALEFAX2 & vbCrLf & "Stampe Laser:                  € " &
    TOTALELASER & vbCrLf & "Altri Servizi:                      € " &
    TOTALEALTRI & vbCrLf & "___________________________" & vbCrLf
    & "Totale:                             € " & totale

    il quale ha il seguente equivalente grafico:

    Totale Tariffa.........€
    Fax tipo Città.........€
    Fax tipo Fuori Città...€
    Stampe Laser...........€
    Altre spese............€
    _______________________________
    Totale.................€

    (ps i punti li ho messi per far capire più o meno come risulta altrimenti il forum mi cacella gli spazi e non da l'idea che intendo io)
    "Una volta che si saranno esaurite senza successo tutte le possibilita', ci sara' una soluzione, semplice e ovvia, che saltera' immediatamente all'occhio di chiunque altro."

    Guardate: Il Miracolo delle Noci!!

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.