从品牌网站建设到网络营销策划,从策略到执行的一站式服务
首先引入那个项目的命名空间,在代码最上方用Imports语句,比如
创新互联专注于企业成都全网营销、网站重做改版、乌海网站定制设计、自适应品牌网站建设、H5网站设计、购物商城网站建设、集团公司官网建设、成都外贸网站制作、高端网站制作、响应式网页设计等建站业务,价格优惠性价比高,为乌海等各大城市提供网站开发制作服务。
Imports Project1
然后在需要用的地方写
Dim aform As New MyForm1()
然后通过aform对象的Show方法(弹出普通窗口)或ShowDialog(弹出窗口时后方窗口无响应)方法来显示窗口,最后调用Dispose方法释放对象内存。
看代码吧!在上次累加的基础上继续累加
窗体中包含一个Button1
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Static a As Integer
For i = 1 To 100 '运算100次
a = a + i
Next
End Sub
End Class
static 是声明静态变量,只要程序不退出,值就会一直保存
这样,你第一次点击 a的值就是5050
第二次点击a就变成了 10100
那个是类的字段,只会在类创建的时候执行一次,不会重复执行,如果需要重复打开inst可以用类似这种代码。
dim inst as Form2
private sub button3_Click....
if inst is Nothing or inst.IsDisposed then
inst= new Form2();
end if
inst.Show();
end sub
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图