Animasi Seperti Office Assistant dengan Visual Basic (VB6.0)
‘Menggunakan Microsoft Agent Control 2.0
Dim Agent As IAgentCtlCharacterEx
Private Sub Form_Load()
Dim DataFile As String
DataFile = App.Path & “\GENIE.ACS”
Agent1.Characters.Load “GENIE.ACS”, DataFile
Set Agent = Agent1.Characters(“GENIE.ACS”)
Agent.Show
Agent.MoveTo 620, 120
Agent.Speak “Selamat Datang di Solobro.wordpress.com”
End Sub
Ketika membuat blog
Ketika pertama register blog ini, bingung mau dibuat apa. Tapi yang jelas membuat blog ini dengan Tujuan. Ya belajar lah siapa tahu pasti bisa bikin blog yang bagus, syukur syukur bisa dapetin duit banyak …weleh.
Tapi blog ini aku dedikasikan buat masa lalu ku yang indah, kerinduan ku, kesayangan ku.
Buat cinta putih
Ketika tidak ingin berbagi….
Ketika tidak ingin berbagi
Berharap tiada yang bisa mendekati indahmu
Namun tiada pernah memberimu kesempatan untuk memilihku
Hingga kau bukan bagiku
