Visual Basic

Dim enableButton As Boolean = True
Dim form As Form = DirectCast(Activator.CreateInstance(formType, New Object() {enableButton}), Form)

Imports System.Reflection
Imports System.Windows.Forms

Public Class MyBaseForm
    Inherits Form

    Public Function IsControlEnabled(controlMemberName As String) As Boolean
        Dim control As Object = Me.GetType().GetProperty(controlMemberName, BindingFlags.Instance Or BindingFlags.NonPublic Or BindingFlags.Public).GetValue(Me, Nothing)
        Return CBool(GetType(Control).GetProperty("Enabled").GetValue(control, Nothing))
    End Function
End Class

Dim form As MyBaseForm = DirectCast(Activator.CreateInstance(formType), MyBaseForm)

SELECT 'DELETE FROM ['
+ A.[name] + '].['
+ B.[name] + '] WHERE ['
+ C.[name] + ']=1'
FROM [sys].[schemas] A
INNER JOIN [sys].[objects] B
ON A.[schema_id]=B.[schema_id]
INNER JOIN [sys].[columns] C
ON B.[object_id]=C.[object_id]
INNER JOIN [sys].[types] D
ON C.[system_type_id]=D.[system_type_id]
WHERE B.[schema_id]!=4
AND C.[name]='ToDelete'
AND D.[name]='boolean'

Using transaction As DbContextTransaction = yourContext.Database.BeginTransaction()
    
    Const query As String = "SELECT N'DELETE FROM ' + QUOTENAME(A.[name]) + N'.' + QUOTENAME(B.[name]) + N' WHERE ' + QUOTENAME(C.[name]) + N' = 1' As CommandText FROM sys.schemas As A INNER JOIN sys.objects As B ON B.schema_id = A.schema_id INNER JOIN sys.columns As C ON C.object_id = B.object_id INNER JOIN sys.types As D ON D.system_type_id = C.system_type_id WHERE A.[schema_id] != 4 And B.[type] = 'U' And C.[name] = 'ToDelete' And D.[name] = 'bit';"
    
    Dim commandsToExecute As List(Of String) = context.Database.SqlQuery(Of String)(query).ToList()
    For Each command As String In commandsToExecute
        yourContext.Database.ExecuteSqlCommand(command)
    Next
    
    transaction.Commit()
End Using