PageRenderTime 49ms CodeModel.GetById 21ms RepoModel.GetById 0ms app.codeStats 0ms

/Visual Studio 2008/VBVstoExcelWorkbook/ThisWorkbook.Designer.vb

#
Visual Basic | 212 lines | 154 code | 29 blank | 29 comment | 0 complexity | fa0a7845abc782acfbaad5890c79b2c0 MD5 | raw file
  1. '------------------------------------------------------------------------------
  2. ' <auto-generated>
  3. ' This code was generated by a tool.
  4. ' Runtime Version:2.0.50727.1873
  5. '
  6. ' Changes to this file may cause incorrect behavior and will be lost if
  7. ' the code is regenerated.
  8. ' </auto-generated>
  9. '------------------------------------------------------------------------------
  10. Option Strict Off
  11. Option Explicit On
  12. '''
  13. <Microsoft.VisualStudio.Tools.Applications.Runtime.StartupObjectAttribute(0), _
  14. Global.System.Security.Permissions.PermissionSetAttribute(Global.System.Security.Permissions.SecurityAction.Demand, Name:="FullTrust")> _
  15. Partial Public NotInheritable Class ThisWorkbook
  16. Inherits Microsoft.Office.Tools.Excel.Workbook
  17. Implements Microsoft.VisualStudio.Tools.Office.IOfficeEntryPoint
  18. Friend WithEvents ActionsPane As Microsoft.Office.Tools.ActionsPane
  19. <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0")> _
  20. Friend WithEvents ThisApplication As Microsoft.Office.Interop.Excel.Application
  21. '''
  22. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  23. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  24. Public Sub New()
  25. MyBase.New("ThisWorkbook", "ThisWorkbook")
  26. End Sub
  27. '''
  28. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  29. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  30. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  31. Protected Overrides Sub Initialize()
  32. MyBase.Initialize
  33. Me.ThisApplication = Me.GetHostItem(Of Microsoft.Office.Interop.Excel.Application)(GetType(Microsoft.Office.Interop.Excel.Application), "Application")
  34. Globals.ThisWorkbook = Me
  35. Global.System.Windows.Forms.Application.EnableVisualStyles
  36. Me.InitializeCachedData
  37. Me.InitializeControls
  38. Me.InitializeComponents
  39. Me.InitializeData
  40. End Sub
  41. '''
  42. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  43. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  44. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  45. Protected Overrides Sub FinishInitialization()
  46. Me.OnStartup
  47. End Sub
  48. '''
  49. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  50. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  51. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  52. Protected Overrides Sub InitializeDataBindings()
  53. Me.BeginInitialization
  54. Me.BindToData
  55. Me.EndInitialization
  56. End Sub
  57. '''
  58. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  59. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  60. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  61. Private Sub InitializeCachedData()
  62. If (Me.DataHost Is Nothing) Then
  63. Return
  64. End If
  65. If Me.DataHost.IsCacheInitialized Then
  66. Me.DataHost.FillCachedData(Me)
  67. End If
  68. End Sub
  69. '''
  70. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  71. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  72. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  73. Private Sub InitializeData()
  74. End Sub
  75. '''
  76. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  77. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  78. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  79. Private Sub BindToData()
  80. End Sub
  81. '''
  82. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  83. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  84. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
  85. Private Sub StartCaching(ByVal MemberName As String)
  86. Me.DataHost.StartCaching(Me, MemberName)
  87. End Sub
  88. '''
  89. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  90. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  91. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
  92. Private Sub StopCaching(ByVal MemberName As String)
  93. Me.DataHost.StopCaching(Me, MemberName)
  94. End Sub
  95. '''
  96. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  97. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  98. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
  99. Private Function IsCached(ByVal MemberName As String) As Boolean
  100. Return Me.DataHost.IsCached(Me, MemberName)
  101. End Function
  102. '''
  103. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  104. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  105. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  106. Private Sub BeginInitialization()
  107. Me.BeginInit
  108. Me.ActionsPane.BeginInit
  109. End Sub
  110. '''
  111. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  112. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  113. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  114. Private Sub EndInitialization()
  115. Me.ActionsPane.EndInit
  116. Me.EndInit
  117. End Sub
  118. '''
  119. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  120. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  121. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  122. Private Sub InitializeControls()
  123. Me.ActionsPane = New Microsoft.Office.Tools.ActionsPane(Me.ItemProvider, Me.HostContext, "ActionsPane", Me, "ActionsPane")
  124. End Sub
  125. '''
  126. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  127. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  128. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  129. Private Sub InitializeComponents()
  130. End Sub
  131. '''
  132. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  133. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  134. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
  135. Private Function NeedsFill(ByVal MemberName As String) As Boolean
  136. Return Me.DataHost.NeedsFill(Me, MemberName)
  137. End Function
  138. '''
  139. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  140. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0"), _
  141. Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Never)> _
  142. Protected Overrides Sub OnShutdown()
  143. Me.ActionsPane.Dispose
  144. MyBase.OnShutdown
  145. End Sub
  146. End Class
  147. '''
  148. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  149. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0")> _
  150. Partial Friend NotInheritable Class Globals
  151. '''
  152. Private Sub New()
  153. MyBase.New
  154. End Sub
  155. Private Shared _ThisWorkbook As ThisWorkbook
  156. Private Shared _ThisRibbonCollection As ThisRibbonCollection
  157. Friend Shared Property ThisWorkbook() As ThisWorkbook
  158. Get
  159. Return _ThisWorkbook
  160. End Get
  161. Set
  162. If (_ThisWorkbook Is Nothing) Then
  163. _ThisWorkbook = value
  164. Else
  165. Throw New System.NotSupportedException
  166. End If
  167. End Set
  168. End Property
  169. Friend Shared ReadOnly Property Ribbons() As ThisRibbonCollection
  170. Get
  171. If (_ThisRibbonCollection Is Nothing) Then
  172. _ThisRibbonCollection = New ThisRibbonCollection
  173. End If
  174. Return _ThisRibbonCollection
  175. End Get
  176. End Property
  177. End Class
  178. '''
  179. <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
  180. Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Tools.Office.ProgrammingModel.dll", "9.0.0.0")> _
  181. Partial Friend NotInheritable Class ThisRibbonCollection
  182. Inherits Microsoft.Office.Tools.Ribbon.RibbonReadOnlyCollection
  183. End Class