I am first-time new to module development and am trying to implement a simple search module to search databas (which I have put within the DNN tables). Sorry for the length, but I would really appreciate all the help I can get!  Thanks!

My ascx page looks like this:

<%@ Control Language="VB" AutoEventWireup="false" CodeFile="SimpleSearch.ascx.vb" Inherits="DesktopModules_SimpleSearch_SimpleSearch" %>  Error: 'Context' not a member of 'DesktopModules_SimpleSearch_SimpleSearch'

<p>Please enter your zip code and see if Shipley Propane services your area . . .</p>
    <br />
    <asp:TextBox ID="zipCode" runat="server" Width="75px"></asp:TextBox><br />
    <br />
    <asp:Button ID="checkZip" runat="server" Text="Check Zip" Width="75px" /><br />
    <br />
    <asp:Panel ID="Panel1" runat="server" Font-Size="Medium" ForeColor="#C00000" Height="26px"
        Visible="False" Width="403px">
        Shipley Propane provides service for your area.</asp:Panel>
    <br />
    <asp:Panel ID="Panel2" runat="server" Font-Size="Medium" ForeColor="#C00000" Height="26px"
        Visible="False" Width="470px">
        Shipley Propane might provide service for your area . . . please call for further
        information.</asp:Panel>
    <br />
    <asp:Panel ID="Panel3" runat="server" Font-Size="Medium" ForeColor="#C00000" Height="26px"
        Visible="False" Width="396px">
        We are sorry, but Shipley Propane does not provide service in your area at this
        time.</asp:Panel>
    <br />

Here is my ascx.vb:

Imports DotNetNuke
Imports System.Web.UI
Imports System.Collections.Generic
Imports System.Reflection
Imports DotNetNuke.Security.PortalSecurity

Partial Class DesktopModules_SuperSimple_SuperSimple
    Inherits Entities.Modules.PortalModuleBase

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If Not Page.IsPostBack Then
            'ShowData("")
        End If
    End Sub
    Protected Sub checkZip_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles checkZip.Click

        Dim zip As String
        Dim service As String

        zip = zipCode.Text
        service = Trim(GetData(zip))

        If zip = "yes" Then
            Panel1.Visible() = True
            Panel2.Visible() = False
            Panel3.Visible() = False
        ElseIf zip = "maybe" Then
            Panel1.Visible() = False
            Panel2.Visible() = True
            Panel3.Visible() = False
        Else
            Panel1.Visible() = False
            Panel2.Visible() = False
            Panel3.Visible() = True
        End If

    End Sub

    Private Function GetData(ByVal SearchString As String) As Object

        Dim mySqlString As New StringBuilder()

        mySqlString.Append("SELECT service")

        mySqlString.Append("FROM {databaseOwner}{objectQualifier}tbl_zipCodes")

        mySqlString.Append("WHERE zipCode like '%' + @SearchString + '%' ")

        Dim myParam As SqlParameter = New SqlParameter("@SearchString", SqlDbType.VarChar, 150)

        myParam.Value = SearchString
        Dim resultPC As String

        resultPC = Convert.ToString(DataProvider.Instance().ExecuteScalar("sp_retrieveZipServiceCode", myParam) 

        Return resultPC

       
    End Function

End Class

I'm replying to myself....I figured it out.  First I had copied previous code from another module and that was my first error message.  Next, I wasn't utilizing the scalar method properly...here's my correction incase it helps anyone else:

Private Function GetData(ByVal SearchString As String) As Object

        Dim myParam As SqlParameter = New SqlParameter("@zipCode", SearchString)

        Dim resultPC As String

        resultPC = Convert.ToString(DataProvider.Instance().ExecuteScalar("RetrieveZipServiceCode", myParam))

        Return resultPC


    End Function