• Home
 · 
• Graphics
 · 
• Prints out 11 music 5 line blank staves(staffs)on Letter paper. Easily modified to add staves or ma

Prints out 11 music 5 line blank staves(staffs)on Letter paper. Easily modified to add staves or ma

Prints out 11 music 5 line blank staves(staffs)on Letter paper. Easily modified to add staves or make tab paper.

Rate Prints out 11 music 5 line blank staves(staffs)on Letter paper. Easily modified to add staves or ma

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Printer.ScaleMode = vbPoints
Printer.ForeColor = vbBlack
' makes 11 staves on Letter paper.Easily modified by adding or subtracting loops
'or changing the variables ,colour etc.

For a = 10 To 14
Printer.Line (20, a * 6)-(700, a * 6)
Next a

For a = 20 To 24
Printer.Line (20, a * 6)-(700, a * 6)
Next a

For a = 30 To 34
Printer.Line (20, a * 6)-(700, a * 6)
Next a

For a = 40 To 44
Printer.Line (20, a * 6)-(700, a * 6)
Next a

For a = 50 To 54
Printer.Line (20, a * 6)-(700, a * 6)
Next a

For a = 60 To 64
Printer.Line (20, a * 6)-(700, a * 6)
Next a

For a = 70 To 74
Printer.Line (20, a * 6)-(700, a * 6)
Next a
For a = 80 To 84
Printer.Line (20, a * 6)-(700, a * 6)
Next a
For a = 90 To 94
Printer.Line (20, a * 6)-(700, a * 6)
Next a

For a = 100 To 104
Printer.Line (20, a * 6)-(700, a * 6)
Next a

For a = 110 To 114
Printer.Line (20, a * 6)-(700, a * 6)
Next a

Printer.EndDoc
End Sub