public shared function createCon() as sqlconnection
dim con as sqlconnection=
return con
end function
datagrid1.columns(1).visible=false
datagrid1.databind

解决方案 »

  1.   

    但是第一个例子出错了..大家一定都很有经验吧.特别是用VB.NET写DB.VB数据库链接类的时候!~
    给我一个原样的好么.
      

  2.   

    是这样的.我建了一个名字叫DB.VB的类
    然后代码是
    Imports System.Data.SqlClient
    Public Class DBEnd Class
    Public Shared Function createCon() As SqlConnection
        Dim con As New SqlConnection("server=.;database=bbs;uid=sa;pwd=;")
        Return con
    End Function错误是
    Public Shared Function createCon() As SqlConnection(下面表蓝线)F:\ey\bbsbook\DB.vb(5): 语句在命名空间中无效。
      

  3.   

    我的目的就是建一个DB.VB类.里面有个数据链接.然后在各个网页中.都可以调用
    CON=DB.createCon()
    以前做C#的时候调试的好好的.现在刚用VB就不行了呢.
      

  4.   

    把函数 createCon放入 类 db中
      

  5.   

    c#:
    using System;
    using System.Data;
    using System.Data.SqlClient;
    namespace adoNetTest
    {
    public class DB
    {
    public DB()
    {
    }
    public static SqlConnection createCon()
    {
    return new SqlConnection("server=127.0.0.1;database=departement;uid=sa;pwd=;");
    }
    }
    }vb.net:
    Imports System 
    Imports System.Data 
    Imports System.Data.SqlClient 
    Namespace adoNetTest 
        Public Class DB 
            Public Sub New() 
            End Sub 
            Public Shared Function createCon() As SqlConnection 
                Return New SqlConnection("server=127.0.0.1;database=departement;uid=sa;pwd=;") 
            End Function 
        End Class 
    End Namespace 
      

  6.   

    Imports System.Data.SqlClient
    Public Class DB
    Public Shared Function createCon() As SqlConnection
        Dim con As New SqlConnection("server=.;database=bbs;uid=sa;pwd=;")
        Return con
    End Function 
    End Class