Want to Pass In a UserControl into your Class? Yes it’s possible.

Partial Class Application_Controls_Payment
    Inherits System.Web.UI.UserControl
    '...
End Class

Public Shared Function CreateTransactionRecordInDB(ByRef PaymentUserControl As Application_Controls_Payment) As Integer
    'This Errors, as Application_Controls_Payment class from the UserControl can not be seen from this level
End Function

Public Interface PaymentControl
    Property CreditCardNumber() As String
    Property CCVCode() As String
    Property ExpirationMonth() As String
    Property ExpirationYear() As String
    Property TransactionAmount() As Double
    Property TransactionAmountAdditionalInfo() As String
    Property TransactionDescription() As String
    Property InvoiceNumber() As String
    Property BillingFirstName() As String
    Property BillingLastName() As String
    Property BillingEmail() As String
    Property BillingCompany() As String
    Property BillingAddress() As String
    Property BillingState() As String
    Property BillingCity() As String
    Property BillingZipCode() As String
    Property CustomerID() As String
    Property CustomerIPAddress() As String
    Property EmailCustomerReceipt() As Boolean
    Property EmailReceiptHeader() As String
    Property EmailReceiptFooter() As String
    Property EmailOfMerchant() As String
    Property TestMode() As Boolean
    Property ValidationGroup() As String
End Interface

Partial Class Application_Controls_Payment
    Inherits System.Web.UI.UserControl
    Implements CheckOut.PaymentControl

    Public Property CreditCardNumber() As String Implements CheckOut.PaymentControl.CreditCardNumber
        Get
            Return txtCCNumber.Text
        End Get
        Set(ByVal Value As String)
            txtCCNumber.Text = Value
        End Set
    End Property
    Public Property CCVCode() As String Implements CheckOut.PaymentControl.CCVCode
        Get
            Return txtCCVCode.Text
        End Get
        Set(ByVal Value As String)
            txtCCVCode.Text = Value
        End Set
    End Property
'... Rest of Properites
End Class

Public Shared Function CreateTransactionRecordInDB(ByRef PaymentUserControl As PaymentControl) As Integer
        'Now you can reference the properties from the usercontrol
        Dim oPaymentTransactions As New PaymentTransaction
        oPaymentTransactions.BillingAddress = PaymentUserControl.BillingAddress
        oPaymentTransactions.CCVCode = PaymentUserControl.CCVCode
        oPaymentTransactions.CCExpirationMonth = PaymentUserControl.ExpirationMonth
        'Rest of code here
End Function