VS2015如何在安装之后，添加功能。

1、首先按下win+R组合键打开运行窗口，输入control，点击确定。

2、确定后进入控制面板，点击”卸载程序“按钮。

3、然后进入到”卸载或更改程序“界面后，找到”visual studio 2015“选项，右键点击，选择”更改“。

4、在d出的”Visual Studio“窗口中，点击”跳过“，忽略更新。

5、然后在下方，点击”修改“按钮。

6、最后在功能选项卡中，勾选需要添加的功能，点击”下一步“后即可在安装之后，为vs2015添加功能。

'首先通过菜单[项目] -- [添加引用]，选择[COM]选项卡，选择“Microsoft Excel XX.0 Object Library”，[确定]。

添加一个按钮：

试试下面的代码：注意版本；先建立以个EXCEL文件保存到c:\下面，我的计算机是安装OFFICE 2010。

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim AppXls As Microsoft.Office.Interop.Excel.Application'声明Excel对象

Dim AppWokBook As Microsoft.Office.Interop.Excel.Workbook'声明工作簿对象

Dim AppSheet As New Microsoft.Office.Interop.Excel.Worksheet'声明工作表对象

AppXls = New Microsoft.Office.Interop.Excel.Application '实例化Excel对象

AppXls.Workbooks.Open("C:\工作簿1.xlsx")'打开已经存在的EXCEL文件

AppXls.Visible = False '使Excel不可见

'AppWokBook = New Microsoft.Office.Interop.Excel.Workbook'实例化工作簿对象

'AppSheet = New Microsoft.Office.Interop.Excel.Worksheet '实例化工作表对象

AppWokBook = AppXls.Workbooks(1)'AppWokBook对象指向工作簿"C:\学生成绩.xls"

AppSheet = AppWokBook.Sheets("Sheet1") 'AppSheet对象指向AppWokBook对象中的表“Sheet1”，即："C:\学生成绩.xls"中的表“Sheet1”

'下面举一些例子：

'1、如果不声明工作表对象 AppSheet ，那么应用AppWokBook对象中的表“Sheet1”的语句就是：AppWokBook.Sheets("Sheet1")

'2、如果不声明工作簿对象 AppWokBook ，那么应用"C:\学生成绩.xls"中的表“Sheet1”的语句就是：AppXls.Workbooks("C:\学生成绩.xls").Sheets("Sheet1")

'要读取数据表"Sheet1"中的单元格“A1”的值，到变量S1里

Dim S1 As String

'方法一

S1 = AppXls.Workbooks(1).Sheets("Sheet1").Range("A1").Value

MsgBox(S1)

'方法二

S1 = AppWokBook.Sheets("Sheet1").Range("A1").Value

MsgBox(S1)

'方法三

S1 = AppSheet.Range("A1").Value

MsgBox(S1)

'把数据写入到单元格“H2”，就是第2行第8个单元格

'方法一

AppXls.Workbooks(1).Sheets("Sheet1").Cells(2, 8).Value = "您好！"

S1 = AppXls.Workbooks(1).Sheets("Sheet1").Cells(2, 8).Value'为了验证，读取并显示它

MsgBox(S1)

'方法二

AppWokBook.Sheets("Sheet1").Cells(2, 8).Value = "你们好！"

S1 = AppWokBook.Sheets("Sheet1").Cells(2, 8).Value '为了验证，读取并显示它

MsgBox(S1)

'方法二

AppSheet.Cells(2, 8).Value = "大家好！"

S1 = AppSheet.Cells(2, 8).Value '为了验证，读取并显示它

MsgBox(S1)

'使用完毕必须关闭EXCEL，并退出

AppXls.ActiveWorkbook.Close(SaveChanges:=True)

AppXls.Quit()

'完成此程序，打开EXCEL检查，可以看到在“Sheet1”表的单元格“H2”里是文本“大家好！”

End Sub

End Class

<util:property-path id="property-path" path="helloWorld.hello"/>

/bin/arch = unknown

/usr/bin/arch -k = unknown

/usr/convex/getsysinfo = unknown

/usr/bin/hostinfo = Mach kernel version:

Darwin Kernel Version 11.4.0d1: Fri May 18 16:05:31 EDT 2012root:xnu-1699.26.8/BUILD/obj//RELEASE_I386

Kernel configured for up to 4 processors.

4 processors are physically available.

4 processors are logically available.

Processor type: i486 (Intel 80486)

Processors active: 0 1 2 3

---