从品牌网站建设到网络营销策划,从策略到执行的一站式服务
做一个窗体模板,假设是Form2
目前创新互联公司已为上千家的企业提供了网站建设、域名、网络空间、网站托管维护、企业网站设计、邛崃网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。
Dim x as New Form2
x.Show()
如果弹出窗口较多,x可以用动态数组替代
private sub command1_click()
shell "explorer ;Uin=123456789"
'注:123456789的位置就是QQ号,请自行替换
shell "explorer ",1
'注:网址也请自行替换
end sub
你在第一个窗口里写 Form2.ShowDialog()
这样就可以了,关掉form2的时候form1的代码就会继续执行
Me.IsMdiContainer = True
Dim f As New Form2
f.MdiParent = Me
f.Show()
成都网站建设公司地址:成都市青羊区太升南路288号锦天国际A座10层 建设咨询028-86922220
成都快上网科技有限公司-四川网站建设设计公司 | 蜀ICP备19037934号 Copyright 2020,ALL Rights Reserved cdkjz.cn | 成都网站建设 | © Copyright 2020版权所有.
专家团队为您提供成都网站建设,成都网站设计,成都品牌网站设计,成都营销型网站制作等服务,成都建网站就找快上网! | 成都网站建设哪家好? | 网站建设地图