Del av programmering ett datorprogram är att ge användare möjlighet att skriva ut . Innan användare skriver ut ett dokument , kan du lista alla tillgängliga skrivare konfigurerade på maskinen . Detta ger användarna möjlighet att välja var de kan skriva ut dokumentet . Du kan få en lista med konfigurerade skrivare med hjälp av Visual Basic (VB ) ” skrivare ” objekt . Printer objektet innehåller en lista över skrivare , så du kan slinga genom och visa var och en
Du behöver : .
Kompilator -och IDE för Visual Basic
1 . .
Skapa en heltalsvariabel och tilldela det totala antalet för den skrivare . Detta är nödvändigt så att du vet hur många gånger för att slinga genom Printer objektet . Koden för att skapa en VB variabel nedan :
Dim I As Integer
i=Printer. Count
2
Display ” Ingen skrivare konfigurerade ”om användaren . har inga installerade enheter. Detta är en felkontroll metod för att undvika att visa något för användaren . Om jag variabeln skapade i steg 1 är noll , då du vet ingen skrivare har konfigurerats . Koden nedan tillkännager för användaren att det inte finns installerade skrivare :
Om i=0 Then
MsgBox ” Ingen skrivare installerad ”
End If
3 .
Loop genom Printer objektet och lägga till skrivaren listan till en listruta kontroll . Detta ger användaren möjligheten att klicka på en skrivare . Den kod för att visa varje skrivare finns nedan:
Dim j As Integer
för j=0 till i-1
listbox1. AddItem Skrivare ( j ) Enhetsnamn
Loop
.
4 .
Spara den nya koden och tryck på ”F5 ” -knappen. Den ” F5 ” knappen kör programmet i debugger och låter dig kontrollera den nya koden . När det körs , ser du varje skrivare som anges i listrutan kontroll .