Microsoft TS: Visual Studio Tools for 2007 MS Office System (VTSO) Sample Questions:

1. You are creating a document-level solution for Microsoft Office Word 2003 by using Visual Studio Tools for the Microsoft Office System (VSTO). The customization contains a predefined schema to validate the data that users add. The path to the schema is stored in a variable named filename. The Unique Resource Identifier (URI) for the schema is stored in a variable named uri. The alias for the schema is stored in a variable named alias.
You need to ensure that the schema that the user selects is applied to the solution document. Which code segment should you use?

A) Dim doc As ThisDocument = Globals.ThisDocument Me.Application.XMLNamespaces.Item(uri). _ AttachToDocument(doc)
B) Me.XMLSchemaReferences.Add ( uri , [alias], filename, True)
C) Me.Application.XMLNamespaces.Add (filename, uri , [alias], True)
D) Me.XMLNodes.Add (filename, "", uri )

2. You create a custom workbook for Microsoft Office Excel 2007 by using Visual Studio Tools for the Microsoft Office System (VSTO).
The workbook contains the following data:
Static data
Data that is imported from .xml files
The workbook displays the imported data by using mapped ranges.
You need to send only the imported data to a user.
What should you do?

A) Save the workbook as an .xml file, and then send the Workbook.xml file to the user.
B) From the Developer Ribbon user interface, export the XML data as an .xml file by using the Export command. Send the .xml file to the user.
C) Save the workbook as a .zip file, and then send the Workbook.xml file that is contained in the .zip file to the user.
D) From the Design Ribbon user interface, export the XML data to a Microsoft Windows SharePoint Services list by using the Export command. Send the link from the Microsoft Windows SharePoint Services list to the user.

3. You create a document-level solution for Microsoft Office Excel 2003 by using Visual Studio Tools for the Microsoft Office System (VSTO). The Excel workbook contains a worksheet object named Sheet1 that contains data in the range A1 through A5.
You write the following lines of code for the Sheet1 object. (Line numbers are included for reference only.)
01 Dim bMark As Word.Bookmark
02 Dim doc As Word.Document = New Word.Application() ...
03 Dim index As Object = 1
04 Dim bMark As Word.Bookmark = do c.Bookmarks.Item(index)
05 ...
You need to insert the data from the range A1 through A5 into a Microsoft Office Word document after bMark. Your solution must retain the sequence of the data that is inserted.
Which code segment should you insert at line 05?

A) Dim rng As Excel.Range = Me.Range("A2", "A5") bMark.Range.Text = Me.Range("A1").Value2.ToString() For Each r As Excel.Range In rng.Rows bMark.Range.InsertAfter(r.Value2.ToString()) Next
B) Dim rng As Excel.Range = Me.Range("A1", "A5") Dim temp As String = "" For Each r As Excel.Range In rng.Rows temp = temp & r.Text.ToString() Next bMark.Range.Text = temp
C) Dim rng As Excel.Range = Me.Range("A1", "A5") Dim temp As String = "" For Each r As Excel.Range In rng.Cells temp = temp & r.Value2.ToString() Next bMark.Range.InsertAfter(temp)
D) Dim rng As Excel.Range = Me.Range("A1", "A5") For Each r As Excel.Range In rng.Cells bMark.Range.InsertAfter(r.Value2.ToString()) Next

4. You are creating a document-level solution for Microsoft Office Excel 2003 by using Visual Studio Tools for the Microsoft Office System (VSTO). The customized workbook contains five worksheets. You add a LinkLabel control named Label to the first worksheet of the workbook. You need to create a LinkClicked event handler that displays the next worksheet in the workbook. Which code segment should you use?

A) Private Sub Label_LinkClicked(ByVal sender As Object, _ ByVal e As LinkLabelLinkClickedEventArgs) Dim book As Excel.Workbook = CType(Me.Parent, Excel.Workbook) Dim sheet As Excel.Worksheet = _ CType(book.Sheets((Me.Index + 1)), Excel.Worksheet) sheet.Activate() End Sub
B) Private Sub Label_LinkClicked(ByVal sender As Object, _ ByVal e As LinkLabelLinkClickedEventArgs) Dim book As Excel.Workbook = CType(Me.Site, Excel.Workbook) D im sheet As Excel.Worksheet = _ CType(book.Sheets((Me.Index + 1)), Excel.Worksheet) sheet.ShowAllData() End Sub
C) Private Sub Label_LinkClicked(ByVal sender As Object, _ ByVal e As LinkLabelLinkClickedEventArgs) Dim book As Excel.Workbook = CType(Me.Site, Excel.Workbook) Dim sheet As Excel.Worksheet = _ CType(book.Sheets((Me.Index + 1)), Excel.Worksheet) s heet.Activate() End Sub
D) Private Sub Label_LinkClicked(ByVal sender As Object, _ ByVal e As LinkLabelLinkClickedEventArgs) Dim book As Excel.Workbook = CType(Me.Parent, Excel.Workbook) Dim sheet As Excel.Worksheet = _ CType(book.Sheets((Me.Index + 1)), Excel.Worksheet) sheet.ShowAllData() End Sub

5. You are creating an add-in for Microsoft Office Excel by using Visual Studio Tools for the Microsoft Office System (VSTO). You write the following lines of code. (Line numbers are included for reference only.)
01 Private ws As Excel.Worksheet = CType _
(Globals.ThisAddIn.Application.ActiveSheet, Excel.Worksheet) 02 Private rng1 As Excel.Range = ws.Range("A1", "E5") 03 Private rng2 As Excel.Range = ws.Range("D4", "J7") 04 ...
You need to change the format of the cells that overlap between rng1 and rng2 to bold.
Which code segment should you insert at line 04?

A) rng1.Group(rng2) rng1.Font.Bold = True
B) Dim rng3 As Excel.Range = ws.Application.Intersect(rng1, rng2) rng3.Font.Bold = True
C) Dim rng3 As Excel.Range = ws.Application.Union(rng1, rng2) rng3.Font.Bold = True
D) rng1.Merge(rng2) rng1.Font.Bold = True

Solutions: