-
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
最新更新
nodejs爬虫
Python正则表达式完全指南
爬取豆瓣Top250图书数据
shp 地图文件批量添加字段
爬虫小试牛刀(爬取学校通知公告)
【python基础】函数-初识函数
【python基础】函数-返回值
HTTP请求:requests模块基础使用必知必会
Python初学者友好丨详解参数传递类型
如何有效管理爬虫流量?
2个场景实例讲解GaussDB(DWS)基表统计信息估
常用的 SQL Server 关键字及其含义
动手分析SQL Server中的事务中使用的锁
openGauss内核分析:SQL by pass & 经典执行
一招教你如何高效批量导入与更新数据
天天写SQL,这些神奇的特性你知道吗?
openGauss内核分析:执行计划生成
[IM002]Navicat ODBC驱动器管理器 未发现数据
初入Sql Server 之 存储过程的简单使用
SQL Server -- 解决存储过程传入参数作为s
关于JS定时器的整理
JS中使用Promise.all控制所有的异步请求都完
js中字符串的方法
import-local执行流程与node模块路径解析流程
检测数据类型的四种方法
js中数组的方法,32种方法
前端操作方法
数据类型
window.localStorage.setItem 和 localStorage.setIte
如何完美解决前端数字计算精度丢失与数