Question

vb如何在form2中调用form1的值和变量

如题

Answer 1

VB6.0在Form2中调用Form1的控件属性值和变量方法：

1. 控件属性值引用需加前缀Form1：

   例：在Form2的Label1的Caption属性引用Form1的Text1.text值。

   Label1.Caption = form1.Text1.text

2. 引用变量，需要先在Form1窗体代码的通用部分声明一个公共变量。

   Public a As String

   例：在Form2的Label1的Caption属性引用Form1的a变量值。

   Label1.Caption = form1.a

3. 引用在标准模块中声明的变量，且在Form1中被赋值，在Form2中无需添加Form1前缀。
   

Answer 2

如果是Form1的控件，可以写成Form1.xxxx 因为这些是Form1 Form2是全局对象。否则不行。不然就把在Form1使用的变量在Module里定义。这样的变量也是全局的

追问

举个小例子吧

追答

比如说Form1有个command1
在Form1可以这样用Me.command1.Enable=False
在Form2中可以Form1.command1.Enable=False
如果用变量的话。Form1的变量只能在Form1中用，Form2的变量在Form2中用。这里涉及一个变量的作用域的问题，使用公共变量就可以在任意地方使用。

写公共变量的方法是添加一个模块。在模块里面定义变量
‘在模块内
public str as string' Form1 Form2中都可以用str这个变量

追问

公用变量如何定义

追答

在模块里面定义就行了，用public 变量 as 类型，变量可以在任意区域使用。

追问

哦

Answer 3

值可以调用，一般变量要有公共变量调用，或者由form1为form2附值

追问

举个小例子吧

追答

'1
'模块
Public Scd As Integer '公共变量
'Form1窗
Dim ff As String
Private Sub Command1_Click()
ff = 5555
Scd = ff
End Sub
'Form2窗
Private Sub Form_Load()
Me.Caption = Scd
End Sub
'2
'或者：
'Form1窗
Dim ff As String
Private Sub Command1_Click()
ff = 5555
Form2.Caption = ff
End Sub

追问

很复杂

Answer 4

Form2代码中需要调用时写 Form1.****.****

追问

举个小例子吧

追答

比如你在Form1中有一个Text控件当你要从Form2中获取他的Form1中的Text属性时，语句如下

Form1.Text1.Text

写在任何可用的过程中

追问

恩等下上电脑试试可以就采纳
对了要是想调用变量值呢 改怎么写