Private Sub MenuItem11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem11.Click
myFrm = New frm_AddBookType
myFrm.mdiparent = Me
myFrm.show()
End Sub
Private Sub MenuItem12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem12.Click
myFrm = New frm_AddNewBookCode
myFrm.mdiparent = Me
myFrm.show()
End Sub