红泥屋

实现环境：Visual Studio 2010, OpenXml SDK 2.0.5022 这个代码实现了向一个已有的xlsx文件中添加一个新的Worksheet，并在这个Sheet中写入三行字符串“ObjectA1"~"ObjectC5" Imports DocumentFormat.OpenXml.Packaging Imports DocumentFormat.OpenXml.Spr

实现环境：Visual Studio 2010, Outlook 2010, VSTO runtime 4.0 C# using System; using System.Collections.Generic; using System.Linq; using System.Text; using Microsoft.Office.Tools.Ribbon; using Outlook =

实现环境：Visual Studio 2010,Excel 2010, VSTO 4.0 Imports Microsoft.Office.Tools.Ribbon Imports VBE = Microsoft.Vbe.Interop Imports Forms = Microsoft.Vbe.Interop.Forms Public Class Ribbon1 Private

Excel表必须是97-2003格式的。否则无法查询。 Imports System.Data.OleDb Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _ System.EventArgs) H

Imports Outlook = Microsoft.Office.Interop.Outlook Public Class Form1 Private OLApp As Outlook.Application Private OlExplorer As Outlook.Explorer Private OlNavigationPan As Outlook.Naviga

以下示例用来展示在放映幻灯片的过程中动态插入内容。 Public Class ThisAddIn Private WithEvents PPApp As PowerPoint.Application Private Sub ThisAddIn_Startup() Handles Me.Startup PPApp = Application End Sub

在一般的application中我们是这样读取configuration文件的 Dim DBconfig As System.Configuration.Configuration = System.Configuration.ConfigurationManager.OpenExeConfiguration(System.Configuration.ConfigurationUserLev

Dim reportWebBrowser As New WebBrowser reportWebBrowser.CreateControl() reportWebBrowser.DocumentText = sbHTMLDoc.ToString While reportWebBrowser.DocumentText <> sbHTMLDoc.ToString

在实际工作中我注意到在Office 2007中，当RibbonXml装载完成以后私有属性ribbon仍然是存在的，而在Office 2010中ribbon在装载完成以后就被销毁了。

app.config %m%n"> %m%n"> Module1.vb Imports System.

在VB.NET中可以用两种方式调用Access数据库：ADO.NET或者自动化(Automation)。 如果你是要操纵Access下的数据那么ADO.NET必然是首选。如果你要操纵Access下的Form,Report就必须使用自动化。 以下是一个示例： 新建一个Window Forms Application.引用”Microsoft.Office.Interop.Access” 1

【要点】：在Word中添加两个表时中间必须空出一行，否则这两个表会合并成一个表。另外，当用代码添加完第一个表后必须将光标移出表格，否则第二个表格会套嵌在第一个表格中。 以下是代码： Public Class ThisDocument Private Sub ThisDocument_Startup() Handles Me.Startup Dim R1 As

在PIA中Microsoft 似乎没有给出移除Header的方法。在实践中我发现下面代码能做到这一点： Dim wdApp As Word.Application Dim wdDoc As Word.Document Dim wdSection As Word.Section wdApp = Globals.ThisDocument.

在Word我们通常在VBA或VB.NET环境下以如下方式查找Wingdings符号： Dim wdApp As Word.Application = Globals.ThisDocument.Application Dim wdDoc As Word.Document = wdApp.ActiveDocument Dim wdRange As Wo