vb6.0里“Public”语句如何使用？

Question

有例子最好^-^

Answer 1

public是声明公共变量，可以在多个窗体中共用的，但一般都放到模块中声明公共变量

比如
'Form1中
Public A As Integer

Private Sub Form_Load()
A = 10
End Sub

'Form2中
Private Sub Form_Click()
Print Form1.A
End sub

'结果，在Form2中显示 10

Answer 2

public 声明的变量或过程\函数是全局的,在工程中的任何地方可以直接调用.

public name as string

public sub SetName()
msgbox name
end sub

Answer 3

列如，
public i as integer
private sub command1_click()
i=i+1
print i;
end sub
此时运行，多点击几下command1,结果为
1 2 3 4 5 6 ……
如果这样
Private Sub command2_click()
Dim i As Integer
i = i + 1
Print i;
End Sub
此时运行，多点击几下command1,结果为
1 1 1 1 1 1 ……