Aprire Visual Basic , fare clic su " File ", " Nuovo progetto " e selezionare " EXE standard " dall'elenco dei modelli.
2
doppio clic sul " controllo ListBox "nel pannello Casella degli strumenti a sinistra per posizionare questo controllo nel modulo . Utilizzare il trascinamento maniglie ( le piccole scatole quadrate agli angoli e centrali del box) per aumentare la dimensione di riempire circa 3/4 della forma .
3
Fare clic su " Visualizza " " codice " per aprire la finestra del codice . Digitare quanto segue come una lunga serie : Private Declare Function SendMessage Lib " user32 " Alias " SendMessageA " ( ByVal hWnd As Long , ByVal wMsg As Long , ByVal wParam As Long , ByVal lParam As Long ) As Long
4
Digitare il seguente sotto il testo nel passaggio 3 : private Sub Form_Load ( ) Dim linguette (1 a 3 ) Come Longtabs ( 1 ) = 20 : linguette (2 ) = 50 : linguette ( 3) = 50SendMessage List1.hWnd , LB_SETTABSTOPS , 3 , linguette ( 1 ) List1.AddItem " 1 " e vbTab & "Gennaio " e vbTab & "2009" & vbTab e "Italia" List1.AddItem " 2" & vbTab & VTAB & "Febbraio " e vbTab & " 2009 "& vbTab e " France " List1.AddItem " 3 " & vbTab e " marzo " e vbTab & " 2009 " & vbTab e " Spagna " End Sub
5
Premere" F5 "per vedere il risultato . Si dovrebbe vedere quattro colonne con i numeri , mesi , date e luoghi . In caso contrario , verificare nuovamente il codice al punto 3.
Programmazione © www.354353.com