VB一个窗体上的数值怎么能够被另一个窗体上的代码引用

来源：百度知道编辑：UC知道时间：2024/06/21 08:58:52

1、VB编程过程中怎样实现，在一个窗体上文本框中，输入的数值退出该窗体后，能把窗体上输入的内容保存起来？
2、怎样实现在另一打开的窗体代码中使用刚刚保存起来的数值？
3、求段简捷而实用的代码。

可以采用两种方法来解决：

一）在标准模块中声明全局变量，该变量在一个窗体的某事件中赋值或改变，另一窗体的某事件或过程中执行时就可直接引用。

'标准模块代码
Option Explicit
    Public i As Long

'Form1代码
Option Explicit

Private Sub Command1_Click()
    i = 12345
End Sub

Private Sub Form_Load()
    Form2.Show
End Sub

'Form2代码
Option Explicit

Private Sub Command1_Click()
    Text1 = i
End Sub

二）定义变量属于一个窗体上的公共变量，在另一格窗体可使用（窗体名.变量名）的代码来饮引用。

例引用Form1中定义的公用变量i赋值给文本框Text1的属性Text，则写为

Text1.Text = Form1.i

'Form1代码
Option Explicit
    Public i As Long

Private Sub Command1_Click()