vba窗体vb.net VBA窗体独立运行

用VB.net能实现根据变量的值打开不同的窗体吗？

可以把想要的窗体放字典里，比如

创新互联建站专业为企业提供团风网站建设、团风做网站、团风网站设计、团风网站制作等企业网站建设、网页设计与制作、团风企业网站模板建站服务，十载团风做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。

Dictionarystring,Form dic = new ...

{

{"Form1", Form1}

}

调用：

Form f1 = dic["Form1"]

Office 2013为什么还是用VBA而不用VB.NET？

VBA 是 Office 常见套件的母语，不是说换就换的，就好比 N 年前发明的自行车，在这个汽车流行的时代依然存在，这至少说明了一点：经典的东西自然有其自身存在的价值。

当使用 VBA 做出来的功能满足不了我们需求的时候，我们可以考虑用 VSTO (Visual Studio Tools for Office) 来开发，而在 VSTO 的开发中就有两种常见的语言，他们是：VB.NET、C#。VB.NET 和 VBA 都属于 Basic 语言家族的，所以他们有相似之处。

PS：

在 .NET 中有 WebService，在 Excel 2013 中也可以方便的调用 WorksheetFunction.WebService，但是在 Excel 2013 以前的版本中是没有的，从这点可以看出，微软还是在不断的加强和完善新版 Office 组件中的 VBA 功能。

请问 VB, VBA, VBS, VB.NET 有什么不同之处呢？

vb是语言

vba是微软内嵌入office的模块,可以快速对word,excel等编程

vbs是一种脚本语言

这三种语法一样

vb.net是微软基于.net框架的vb,语法略不同于vb

VB,VBA, VB.net 都有什么区别和共同点?

VB是是一种编程语言。VBA主要VB是office上的应用，VB.net可以说是VB的最新版本，如果就是业余或者刚入门的话，语法什么的和VB几乎完全一样。只是语法上面，要求比VB要求规范，比方说VB6.0里面Text1="1"读的出来，VB.net就会报错，一定要textbox1.text="1"才可以。对于初学者来说，VB.net这种规范要求有益无害。

如果你想学的话，最好学VB.net，一来功能强，二来，能帮助你学习基本概念。比方说我学VB的时候，什么是类一点概念都没有。都是学了.net之后才懂得。三来么，学会了VB.net.学其他都很方便的。

但是如果就是用用excel的话么，VBA就可以了。不过说句老实话，光学VBA的话，很多东西理解起来比较难。我是最后学VBA的，看了书一个礼拜之后就能随便编了。但是书上很多代码的，我猜如果没有VB基础，估计看不懂

如何给VB.NET窗体添加子窗体？

直接添加一个MID父窗体或在已有窗体的属性中找到IsMDIContainer属性，然后设置为True，然后创建第二个窗体 ，需要加载子窗体的时候：

Dim NewMDIChild As New Form2

NewMDIChild.MdiParent = Me

NewMDIChild.Show()

Public Shared Sub CheckMDIChildForm(ByVal MDIForm As Windows.Forms.Form, ByVal MDIChildForm As Windows.Forms.Form, ByVal MDIChildFormName As String)

If MDIForm.MdiChildren.Length  1 Then

'如果没有任何一个MDI子窗体，则创该MDI子窗体的窗体实例

Dim MDIChildFrm As Windows.Forms.Form = MDIChildForm ' 定义MDI子窗体

MDIChildFrm.MdiParent = MDIForm '指定父窗体

MDIChildFrm.Show() '打开窗体

Exit Sub

Else

Dim x As Integer

Dim frmyn As Boolean

For x = 0 To (MDIForm.MdiChildren.Length) - 1

Dim tempChild As Windows.Forms.Form = CType(MDIForm.MdiChildren(x), Windows.Forms.Form)

If tempChild.Name = MDIChildFormName Then

'检测到有该MDI子窗体，设为激活 并退出循环

frmyn = True

tempChild.BringToFront()

Exit For

Else

frmyn = False

End If

Next

If Not frmyn Then

'在打开的窗体中没检测到则新建

Dim MDIChildFrm As Windows.Forms.Form = MDIChildForm ' 定义MDI子窗体

MDIChildFrm.MdiParent = MDIForm '指定父窗体

MDIChildFrm.Show() '打开窗体

End If

End If

End Sub

如何创建vb.net窗体

dim 一个窗体 as new form

with 一个窗体

.location=...

.size=...'这里是设置窗体的位置等属性

end with

一个窗体.show