vb.net公共变量 vbs public

VB.net里的公共变量操作语句为什么不执行？

试试下面的：

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

相关问答

Q1: vb.net 如何做到一个子窗体绑定一个数据库

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

VB.NET的特点：

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

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

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

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

Q2: vb.net module 里面的 公共变量 ?

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

public module module1

Public i As Integer = 365

end module

Q3: vb.net 怎么实现多个控件共同使用一个变量

把变量定义时增加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.net公共变量和vbs public的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。