VB.net 2010 视频教程 VB.net 2010 视频教程 python基础视频教程
SQL Server 2008 视频教程 c#入门经典教程 Visual Basic从门到精通视频教程
当前位置:
首页 > 编程开发 > vb >
  • vb.net 教程 3-2 窗体编程之窗体 5

版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
还有一种传递值的方法:
 
在Form2中定义一个公共(Public)变量,那么我们在Form1中定义(实例化)了个Form2后,就可以使用这个变量了。
 
Form2中:
 
 
 
    Public passedParameter As String
    Private Sub btnParameter_Click(sender As Object, e As EventArgs) Handles btnParameter.Click
        MessageBox.Show("传递的参数是 " & passedParameter)
    End Sub
 
 
 
 
 
 
 
 
 
 
Form1中:
 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim S As String = "http://blog.csdn.net/uruseibest"
        Dim myform As Form2
        myform = New Form2()
        myform.passedParameter = S
        myform.Show()
    End Sub
运行效果同上一节一样:
 
 
如果我们要在Form2中控制Form1呢?非常之遗憾,必须要求Form1实例化,但是实例化后就不是我们现在的Form1了。
 
是不是就没有办法呢?
 
NO
 
我们添加一个Module,右键点击解决方案资源管理器项目名称那里,选择新建项,
 
 
 
选择模块,由于我这里只是简单举例,就是用默认名称就可以了。
 
模块中加入如下代码:
 
 
 
Module Module1
    Public FormNew1 As Form1
 
    Sub main()
        FormNew1 = New Form1
        FormNew1.ShowDialog()
    End Sub
End Module
 
 
 
 
 
 
 
 
 
 
在项目属性窗口中,去掉“启用应用程序框架”的勾,然后启动对象选择“Sub Main":
 
 
 
在Form1中加入如下代码:
 
    Public Sub changeButton1()
        Button1.Text = "成功"
    End Sub
 
在Form2中加入一个按钮,按钮单击代码:
 
    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Call FormNew1.changeButton1()  ‘调用Form1中的方法
        FormNew1.Button1.Width = 200    '直接修改Form1中的按钮宽度
    End Sub
 
既可以调用Form1的子过程,也可以直接修改Form1窗体、控件的属性。
 
 
 
 
 
 
 
学习更多vb.net知识,请参看 vb.net 教程 目录
————————————————
版权声明:本文为CSDN博主「VB.Net」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/uruseibest/article/details/70245066

相关教程