vb点虐 公共变量 vb如何定义公共变量

vb点虐  怎么实现多个控件共同使用一个变量

把变量定义时增加Shared关键字即可.如:

让客户满意是我们工作的目标,不断超越客户的期望值来自于我们对这个行业的热爱。我们立志把好的技术通过有效、简单的方式提供给客户,将通过不懈努力成为客户在信息化领域值得信任、有价值的长期合作伙伴,公司提供的服务项目有:域名申请、虚拟空间、营销软件、网站建设、浮山网站维护、网站推广。

Private

Shared

AAA

As

String

Public

Shared

AAA

As

String

......

这样AAA在一个应用程序里就是公用的.

------------------------------------------------------

补充:

不可能没用,我都是这样做的.

该控件使用中,自己看吧:

Public

Class

CMB_MemoryTextBox

Inherits

TextBox

#Region

"

变量定义

"

Private

Shared

p_HisData

As

STRU_DATA

'用数据表保存所有控件的历史记录

Private

Shared

p_FileName

As

String

'保存历史记录的文件名

......

vb点虐 如何做到一个子窗体绑定一个数据库

加个模块,定义公共变量2个窗体都可以对数据库进行读写,每次读写之前先刷新一次,保证数据最新就行了。

VB.NET的特点:

1.真正成为面向对象以及支持继承性的语言。

2.窗体设计器支持可视化继承,并且包含了许多新的特性,比如自动改变窗体大小、资源本地化支持、数据类工具内在支持XML数据。

3.直接建立在.NET的框架结构上,因此开发人员可以充分利用所有.NET平台特性,也可以与其他的.NET语言交互。

4.为Windows应用程序提供了XCOPY部署,开发者不再需要为DLL的版本问题担忧。

VB点虐 里的公共变量操作语句为什么不执行?

试试下面的:

Public Class Form1

Public i As Boolean = False

Delegate Sub MySubDelegate()

Private Sub F()

Label1.Text = (Int(Label1.Text) + 1).ToString

Label1.Text = (Int(Label1.Text) + 2).ToString

End Sub

Private Sub setA()

Dim msd As MySubDelegate = AddressOf F

Me.Invoke(msd)

i = True

End Sub

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

End Sub

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim t1 As Threading.Thread = New Threading.Thread(AddressOf setA)

t1.Start()

Do

Application.DoEvents() '关键

If i = True Then

Exit Do

End If

Loop

End Sub

End Class

vb点虐 module 里面的 公共变量 ?

您仅仅声明了一个变量,变量在未被赋值时,它指向一个空的地址,所以,它没有被实例化。您给它赋一个值,它就指向您定义的值,就行了。

public module module1

Public i As Integer = 365

end module


网页标题:vb点虐 公共变量 vb如何定义公共变量
当前链接:http://scyanting.com/article/ddicpes.html