重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
Public 声明的就是全局的..
创新互联是一家专业提供溪湖企业网站建设,专注与成都做网站、成都网站建设、成都外贸网站建设、H5开发、小程序制作等业务。10年已为溪湖众多企业、政府机构等服务。创新互联专业网站设计公司优惠进行中。
转贴内容如下:
VB 共享数据 全局变量
在用VB开发软件时,经常需要在不同的窗体间共享数据,但在过多的使用全局变量时不便于软件的调试和修改。通常有两种解决方法。
第一种方法:定义全局变量,然后在各个窗体中直接使用,例如
Public strCustomerID As String
Public strCustomerName As String
第二种方法:添加一个模块专门用于定义变量,然后定义一些Public过程或函数来设置和获取这些数据,例如
Dim strCustomerID As String
Dim strCustomerName As String
Public Sub SetCustomerID(CustomerID As String)
strCustomerID = CustomerID
End Sub
Public Function GetCustomerID() As String
GetCustomerID = strCustomerID
End Function
Public Sub SetCustomerName(CustomerName As String)
strCustomerName = CustomerName
End Sub
Public Function GetCustomerName() As String
GetCustomerName = strCustomerName
End Function
其实这两种方法都有缺点,使用第一种方法时,当过程或函数中过于频繁的使用全局变量时会给调试和修改程序带来很大的工作量,有时会产生灾难性的后果。使用第二种方法时,若共享数据很多,则需要定义很多的Set*和Get*函数。
通过菜单“工程-添加模块”(注意:是添加模块不是类模块,在VB中模块有三种类型:窗体、标准和类。)新建一标准模块(标准模块文件的扩展名为“.bas”),默认的模块名为“Module1”,在该模块中输入您要声明的全局变量,变量前必须要有关键词“Public”,如“Public myname As String”,一个VB工程中可添加多个模块,但每个模块中声明的全局变量名不能重复,否则会产生二义性。您也可将不同窗体模块中要用到的重复代码在该模块中写成过程或函数,在VB6中过程和函数默认为“Public”,如下面两个函数等效,均为全局:
sub a()
msgbox now
end sub
public sub a()
msgbox now
end sub
建议养成良好的习惯,在过程和函数定义时前面均显式写上“Public”(公共,其他模块可调用)或“Private”(私有,只能在本模块中使用)。
另外,不同的窗体模块的变量如果声明为“Public”,可以互相引用,但引用时前面要加上窗体名,如“Form1.a”,过程和函数也类似。
Public m as string = textbox1.tex 不要放在任何过程里。加在script language=vb runat=server下边
在这里
sub a()
可以访问m了。
end sub