08-04-23, 01:28 AM
(08-04-23, 01:02 AM)سعوذ كتب :PHP كود :
Dim fid As Integer = 1
Private Sub NewFormToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles NewFormToolStripMenuItem.Click
Dim f As New Form
f.ControlBox = False
With f
f.Text = "Form" & fid
f.Size = New Size(111, 111)
fid += 1
f.MdiParent = Me
f.Show()
End With
End Sub
لم ينفع معي الكود اخي
