Imports System.Windows
Imports System.Windows.Forms
 
Public Class Form1
    Dim rc As ResizeableControl
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        rc = New ResizeableControl(RichTextBox1)
        rc = New ResizeableControl(PictureBox1)
        AddHandler Me.Click, AddressOf Object_Click