Intermediate
Date of registration: Jan 1st 2009
Location: Hanover, Germany
Occupation: Software Engineer
Hobbies: Hilbert Curves
Jabaco Source |
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
Option Explicit Public Sub Applet_Initialize() Const nl = "<P>" Dim txt As String = _ "<html><body>" _ & "<div align=center>" _ & nl & " " _ & nl & "Now is the time" _ & nl & "for all brave men" _ & nl & "to come to the aid" _ & nl & "of their party!" _ & "</div>" _ & "</body></html>" With Label1 .BackStyle = vbSolid .BackColor = RGB(0, 0, 255) .ForeColor = RGB(255, 255, 255) .FontSize = 12 .FontBold = True .Caption = txt End With End Sub |
Intermediate
Date of registration: Jan 1st 2009
Location: Hanover, Germany
Occupation: Software Engineer
Hobbies: Hilbert Curves
This post has been edited 2 times, last edit by "A1880" (Jun 15th 2011, 11:12pm)