Private Sub My_Weblog
Dim Bahman as new My.Weblog
Bahman.Subject="Note of a Student"
Bahman.Creator="Sadeq Bahmani"
Bahman.Address: Sadeqbahmani.blogfa
Bahman.Create()
End Sub
____________
يادداشت هاي يك دانش آموز.

---