| Flags, ShowFont |
| |
| |
| Private Sub Command1_Click() | |
| | |
| With CommonDialog1 | Attribute für das Dialogfeld Schriftarten zuweisen. |
| .Flags = &H3 + &H100 | CommonDialog zeigt das Dialogfeld Schriftarten an. |
| .ShowFont | Das Label erhält: |
| Label1.Font = .FontName | - den Fontnamen |
| Label1.Font.Size = .FontSize | - den Schriftgrad |
| Label1.Font.Bold = .FontBold | - den Schriftschnitt (Fett) |
| Label1.Font.Italic = .FontItalic | - den Schriftschnitt (Kursiv) |
| End With | |
| |
| End Sub | |
 | |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| | |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| |
| . |
| |
zurück