扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
在任意form类或模块中都可以创建类,跟建立函数和过程一样。
十年的谢通门网站建设经验,针对设计、前端、开发、售后、文案、推广等六对一服务,响应快,48小时及时工作处理。营销型网站的优势是能够根据用户设备显示端的尺寸不同,自动调整谢通门建站的显示方式,使网站能够适用不同显示终端,在浏览器中调整网站的宽度,无论在任何一种浏览器上浏览网站,都能展现优雅布局与设计,从而大程度地提升浏览体验。成都创新互联公司从事“谢通门网站设计”,“谢通门网站推广”以来,每个客户项目都认真落实执行。
示例:
public class form1
‘创建一个属于form的子类,名称为【类名】。
public class 类名
’定义类成员text
public text as string
end class
‘定义一个【类名】类的公共变量。
dim 类名1 as 类名
’定义一个过程,使用【类名】类的text成员
public sub 过程
‘实例化【类名1】
类名1=new 类名
类名1.text=“赋值”
’定义一个【新类】类的私用变量,并实例化。
dim 新类1 as new 新类
新类1.name=“一个字符串”
新类1.age=12
end sub
end class
‘’‘创建一个与form同级的类,名称为【新类】
public class 新类
public sub new()
end sub
public name as string
public age as integer
end class
在模块中使用:
public class module1
dim a as new form1.类名
end module
在你的网站的根目录建立一个叫App_Code的文件,并把这个类放进去。
Sub datalj(ByVal sql1 As String)改成
Public Function datalj(ByVal sql1 As String) As SqlDataReader
conn.ConnectionString = str
conn.Open()
comm = New SqlCommand(sql1, conn)
rs = comm.ExecuteReader
datalj = rs
End Function
使用的时候
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim d As New DB
Dim rs As SqlDataReader = d.datalj("select * from userb")
……
End Sub
模块:相当于全局级变量。
类:可以实例化,继承等。
对于你这样的初学者来说,可以视作 模块变量=类的public shared变量。
最好的方法是:项目-添加-类-粘贴代码。
应该是一样的,createobject(“”)
不过你还是要添加引用的,否则那个调用对象是不行的。
建议你还是引用的好,这样容易查错,object对象无法继承,所以就没有下拉菜单的索引帮助。这样往往运行时才会引发错误,且这种错误不方便查询定位。
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流