السلام عليكم ورحمة الله وبركاته
اجعل تعريف الأداة على مستوى الكلاس بمعنى تحت Public Class Form1 وليس داخل Function مثل (على حسب مثالك، بالرغم من انك لم تربط الآداة بأي حدث)
PHP كود :
Public Class Form1
Dim Frm As New Form
Dim Btn As New Button
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
F_Rm()
End Sub
Private Sub F_Rm()
With Btn
.Text = "اضغط هنا"
End With
With Frm
.Text = "تجربة فورم"
.Controls.Add(Btn)
End With
End Sub
End Class
السلام عليكم ورحمة الله وبركاته
