窗体之间的变量传递,可以声明一个类不就完了吗?里面的变量用public static来声明这样就不用声明新的对象也可以用,就类似全局变量!好好看看C#高级编程!那里面有这些,不过比较不容易理解!你就当public static是全局变量好了哈!使用方法!a.a1,a.a2就跟VB模块中的全局变量一样用!明白了吗?
public class a
{
public a()
{}
public static string a1;
public static string a2;
}
Module PublicParasModule
Public PublicForm As Form
End Module
Form1中加三个Button,补充的代码:
Public Form1Name As String = "It is me,Form1"
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
PublicForm = Me
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
If TypeOf PublicForm Is Form2 Then
MsgBox(CType(PublicForm, Form2).Form2Name)
End If
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim frm As New Form2
frm.Show()
End Sub
Form2中加两个Button,补充的代码:
Public Form2Name As String = "It is me,Form2!"
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TypeOf PublicForm Is Form1 Then
MsgBox(CType(PublicForm, Form1).Form1Name)
End If
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
PublicForm = Me
End Sub
打开: Dim Frm1 As New 要找开的窗体
Frm1.Show()
不显示任务栏:ShowInTaskbar = False
关于两个窗体间进行交互传递数据参见
http://vb.studysea.net/BBS/DispBBS.jsp?BoardID=36&BMID=108&TopicID=2893