Initial Commit of the PDM project (ready for DWS migration)
This commit is contained in:
will
@@ -0,0 +1,420 @@
|
||||
<html>
|
||||
|
||||
<head>
|
||||
<title>Generate Configuration Values Example (VB.NET</title>
|
||||
<meta http-equiv="Content-Language" content="en-us">
|
||||
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
|
||||
<link rel="stylesheet" type="text/css" href="ApiHelp.css">
|
||||
</head>
|
||||
<meta name=MS-HKWD content="VB.NET examples,card variables">
|
||||
|
||||
<body>
|
||||
<h1><font size="1"><span style="font-weight: 400">SOLIDWORKS PDM Professional API Help</span></h1>
|
||||
<h1>Generate Configuration Values Example (VB.NET)</h1>
|
||||
<p><a name="top"></a>This example shows how to copy card control variable values from one
|
||||
configuration to another.</p>
|
||||
<p><b>NOTE</b>: If using the primary interop assembly
|
||||
provided with SOLIDWORKS PDM Professional, see
|
||||
<a href="Using_NET_Framework_in_Applications.htm">Using .NET Framework 4.0 in
|
||||
Stand-alone Applications</a>.</p>
|
||||
<p><img border="0" src="GenConfigValues.gif" width="590" height="327"></p>
|
||||
|
||||
<p style="font-family: Courier New; font-size: 13; color: black; background: white" class="APICODE">
|
||||
<span style="color:green;">
|
||||
'----------------------------------------------------------------------------</span><br>
|
||||
<span style="color:green;">' Preconditions:</span><br>
|
||||
<span style="color:green;">' 1. Start Microsoft Visual Studio.</span><br>
|
||||
<span style="color:green;">' a. Click <b>File > New > Project > Visual Basic > Windows Forms Application</b>.</span><br>
|
||||
<span style="color:green;">' b. Type <b>Files</b> in <b>Name</b>.</span><br>
|
||||
<span style="color:green;">' c. Click <b>Browse</b> and navigate to the folder where to create </span><br>
|
||||
<span style="color:green;">' the project.</span><br>
|
||||
<span style="color:green;">' d. Click <b>OK</b>. </span><br>
|
||||
<span style="color:green;">' e. Click <b>Show All Files</b> in the Solution Explorer toolbar and expand </span><br>
|
||||
<span style="color:green;">' <b>Form1.vb</b> in the Solution Explorer.</span><br>
|
||||
<span style="color:green;">' f. Replace the code in <b>Form1.vb</b> with <a href="#form1">this code</a>.</span><br>
|
||||
<span style="color:green;">' g. To create the form,
|
||||
replace the code in <b>Form1.Designer.vb</b> with <a href="#form1designer">this code</a>.</span><br>
|
||||
<span style="color:green;">' 2. Add <b>EPDM.Interop.epdm.dll</b> as a reference (right-click the project</span><br>
|
||||
<span style="color:green;">' name in the Solution Explorer, click <b>Add Reference</b>, click </span><br>
|
||||
<span style="color:green;">' <b>Assemblies > Framework</b> in the left-side panel, browse to the top folder of </span><br>
|
||||
<span style="color:green;">' your SOLIDWORKS PDM Professional installation, locate and click </span><br>
|
||||
<span style="color:green;">' <b>EPDM.Interop.epdm.dll</b>, click <b>Open</b>, click <b>Add</b>, and click <b>Close</b>).</span><br>
|
||||
<span style="color:green;">' 3. Right-click <b>EPDM.Interop.epdm</b> in References, click <b>Properties</b>, and set </span><br>
|
||||
<span style="color:green;">' <b>Embed Interop Types</b> to <b>False</b> to handle methods that pass arrays of </span><br>
|
||||
<span style="color:green;">' structures.<br>
|
||||
' 4. Check out a file that has a data card with two or more configurations.<br>
|
||||
' 5. Modify a control variable in the @ configuration.</span><br>
|
||||
<span style="color:green;">' 6. Click <b>Debug > Start Debugging</b> or press F5.</span><br>
|
||||
<span style="color:green;">'</span><br>
|
||||
<span style="color:green;">' Postconditions: </span><br>
|
||||
<span style="color:green;">' 1. Displays the Copy Control Values
|
||||
to Configurations dialog box.</span><br>
|
||||
<span style="color:green;">' a. Select a vault view.</span><br>
|
||||
<span style="color:green;">' Folder is set
|
||||
to the root folder. <br>
|
||||
' b. Select a file that has a data card with two or more
|
||||
configurations.<br>
|
||||
' c. Displays the data card.<br>
|
||||
' d. Click <b>Copy Control Values</b>.<br>
|
||||
' Copies the value set in Preconditions step
|
||||
5 to all configurations.</span><br>
|
||||
<span style="color:green;">
|
||||
' 2. Close the dialog box.<br>
|
||||
' 3. Inspect the control values in all of the configurations of the data card. </span><br>
|
||||
<span style="color:green;">
|
||||
'----------------------------------------------------------------------------</span><br>
|
||||
<br>
|
||||
<span style="color:green;"><a name="form1"></a>'Form1.vb</span><br>
|
||||
</p>
|
||||
<p style="font-family: Courier New; font-size: 13; color: black; background: white" class="APICODE">
|
||||
<span style="color:blue;">Imports</span> System<br>
|
||||
<span style="color:blue;">Imports</span> System.Collections.Generic<br>
|
||||
<span style="color:blue;">Imports</span> System.ComponentModel<br>
|
||||
<span style="color:blue;">Imports</span> System.Data<br>
|
||||
<span style="color:blue;">Imports</span> System.Drawing<br>
|
||||
<span style="color:blue;">Imports</span> System.Linq<br>
|
||||
<span style="color:blue;">Imports</span> System.Text<br>
|
||||
<span style="color:blue;">Imports</span> System.Threading.Tasks<br>
|
||||
<span style="color:blue;">Imports</span> System.Windows.Forms<br>
|
||||
<span style="color:blue;">Imports</span> EPDM.Interop.epdm<br>
|
||||
<br>
|
||||
<br>
|
||||
<span style="color:blue;">Partial</span> <span style="color:blue;">Public</span> <span style="color:blue;">Class</span> <span style="color:#2b91af;">MainForm</span><br>
|
||||
<span style="color:blue;">Inherits</span> <span style="color:#2b91af;">Form</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">Private</span> oFoldersArray <span style="color:blue;">As</span> <span style="color:#2b91af;">Dictionary</span>(<span style="color:blue;">Of</span> <span style="color:blue;">Integer</span>,<span style="color:#2b91af;">IEdmFolder5</span>) = <span style="color:blue;">New</span> <span style="color:#2b91af;">Dictionary</span>(<span style="color:blue;">Of</span> <span style="color:blue;">Integer</span>, <span style="color:#2b91af;">IEdmFolder5</span>)()<br>
|
||||
<span style="color:blue;">Private</span> oFileArray <span style="color:blue;">As</span> <span style="color:blue;">New</span> <span style="color:#2b91af;">Dictionary</span>(<span style="color:blue;">Of</span> <span style="color:blue;">Integer</span>, <span style="color:#2b91af;">IEdmFile5</span>)()<br>
|
||||
<span style="color:blue;">Private</span> edmCardView <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmCardView63</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">Public</span> <span style="color:blue;">Sub</span> <span style="color:blue;">New</span>()<br>
|
||||
InitializeComponent()<br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Sub</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">Private</span> <span style="color:blue;">Sub</span> MainForm_Load(<span style="color:blue;">ByVal</span> sender <span style="color:blue;">As</span> <span style="color:blue;">Object</span>, <span style="color:blue;">ByVal</span> e <span style="color:blue;">As</span> <span style="color:#2b91af;">EventArgs</span>) <span style="color:blue;">Handles</span> <span style="color:blue;">Me</span>.Load<br>
|
||||
<span style="color:blue;">Try</span><br>
|
||||
<span style="color:green;">
|
||||
'Declare and create an instance of IEdmVault5</span><br>
|
||||
<span style="color:blue;">Dim</span> vault1 <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmVault5</span> = <span style="color:blue;">New</span> <span style="color:#2b91af;">EdmVault5</span>()<br>
|
||||
<br>
|
||||
<span style="color:green;">'Cast IEdmVault5 to IEdmVault8</span><br>
|
||||
<span style="color:blue;">Dim</span> vault <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmVault8</span> = <span style="color:blue;">DirectCast</span>(vault1, <span style="color:#2b91af;">IEdmVault8</span>)<br>
|
||||
<br>
|
||||
<span style="color:blue;">Dim</span> Views() <span style="color:blue;">As</span> <span style="color:#2b91af;">EdmViewInfo</span> = <span style="color:blue;">Nothing</span><br>
|
||||
<br>
|
||||
<span style="color:green;">'Populate the form with the names of </span><br>
|
||||
<span style="color:green;">'the vaults on the computer</span><br>
|
||||
vault.<b>GetVaultViews</b>(Views, <span style="color:blue;">False</span>)<br>
|
||||
VaultsComboBox.Items.Clear()<br>
|
||||
<span style="color:blue;">For</span> <span style="color:blue;">Each</span> View <span style="color:blue;">As</span> <span style="color:#2b91af;">EdmViewInfo</span> <span style="color:blue;">In</span> Views<br>
|
||||
VaultsComboBox.Items.Add(View.<b>mbsVaultName</b>)<br>
|
||||
<span style="color:blue;">Next</span> View<br>
|
||||
<br>
|
||||
<br>
|
||||
<span style="color:blue;">Catch</span> ex <span style="color:blue;">As</span> System.Runtime.InteropServices.<span style="color:#2b91af;">COMException</span><br>
|
||||
<span style="color:#2b91af;">MessageBox</span>.Show(<span style="color:#a31515;">"HRESULT = 0x"</span> & ex.ErrorCode.ToString(<span style="color:#a31515;">"X"</span>) & ex.Message)<br>
|
||||
<span style="color:blue;">Catch</span> ex <span style="color:blue;">As</span> <span style="color:#2b91af;">Exception</span><br>
|
||||
<span style="color:#2b91af;">MessageBox</span>.Show(ex.Message)<br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Try</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Sub</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">Private</span> <span style="color:blue;">Sub</span> VaultsComboBox_SelectedIndexChanged(<span style="color:blue;">ByVal</span> sender <span style="color:blue;">As</span> <span style="color:blue;">Object</span>, <span style="color:blue;">ByVal</span> e <span style="color:blue;">As</span> <span style="color:#2b91af;">EventArgs</span>) <span style="color:blue;">Handles</span> VaultsComboBox.SelectedIndexChanged<br>
|
||||
<span style="color:blue;">Try</span><br>
|
||||
<span style="color:green;">
|
||||
'Declare and create an instance of IEdmVault5 </span><br>
|
||||
<span style="color:blue;">Dim</span> vault <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmVault5</span> = <span style="color:blue;">New</span> <span style="color:#2b91af;">EdmVault5</span>()<br>
|
||||
<br>
|
||||
<span style="color:green;">
|
||||
'Log into selected vault as the current user</span><br>
|
||||
vault.LoginAuto(VaultsComboBox.Text, <span style="color:blue;">Me</span>.Handle.ToInt32())<br>
|
||||
<br>
|
||||
<span style="color:blue;">Dim</span> folderPos <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmPos5</span> = vault.RootFolder.<b>GetFirstSubFolderPosition</b>()<br>
|
||||
<br>
|
||||
FoldersComboBox.Items.Clear()<br>
|
||||
oFoldersArray.Clear()<br>
|
||||
<br>
|
||||
<span style="color:blue;">Dim</span> i <span style="color:blue;">As</span> <span style="color:blue;">Integer</span> = FoldersComboBox.Items.Add(<span style="color:#a31515;">"\"</span>)<br>
|
||||
oFoldersArray(i) = vault.<b>RootFolder</b><br>
|
||||
<br>
|
||||
<span style="color:blue;">Do</span> <span style="color:blue;">While</span> <span style="color:blue;">Not</span> folderPos.<b>IsNull</b><br>
|
||||
<span style="color:blue;">Dim</span> edmFolder <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmFolder5</span> = vault.RootFolder.<b>GetNextSubFolder</b>(folderPos)<br>
|
||||
<br>
|
||||
i = FoldersComboBox.Items.Add(edmFolder.<b>Name</b>)<br>
|
||||
oFoldersArray(i) = edmFolder<br>
|
||||
<span style="color:blue;">Loop</span><br>
|
||||
<br>
|
||||
FoldersComboBox.Text = <span style="color:blue;">CStr</span>(FoldersComboBox.Items(0))<br>
|
||||
<span style="color:blue;">Catch</span> e1 <span style="color:blue;">As</span> <span style="color:#2b91af;">Exception</span><br>
|
||||
FoldersComboBox.Items.Clear()<br>
|
||||
oFoldersArray.Clear()<br>
|
||||
FoldersComboBox.Text = <span style="color:#a31515;">"Error"</span><br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Try</span><br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Sub</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">Private</span> <span style="color:blue;">Sub</span> FoldersComboBox_SelectedIndexChanged(<span style="color:blue;">ByVal</span> sender <span style="color:blue;">As</span> <span style="color:blue;">Object</span>, <span style="color:blue;">ByVal</span> e <span style="color:blue;">As</span> <span style="color:#2b91af;">EventArgs</span>) <span style="color:blue;">Handles</span> FoldersComboBox.SelectedIndexChanged<br>
|
||||
<span style="color:blue;">Try</span><br>
|
||||
<span style="color:blue;">Dim</span> i <span style="color:blue;">As</span> <span style="color:blue;">Integer</span> = FoldersComboBox.SelectedIndex<br>
|
||||
<span style="color:blue;">Dim</span> edmFolder <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmFolder5</span> = oFoldersArray(i)<br>
|
||||
<br>
|
||||
<span style="color:blue;">Dim</span> filePos <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmPos5</span> = edmFolder.<b>GetFirstFilePosition</b>()<br>
|
||||
<br>
|
||||
FilesComboBox.Items.Clear()<br>
|
||||
oFileArray.Clear()<br>
|
||||
<br>
|
||||
<span style="color:blue;">Do</span> <span style="color:blue;">While</span> <span style="color:blue;">Not</span> filePos.<b>IsNull</b><br>
|
||||
<span style="color:blue;">Dim</span> edmFile <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmFile5</span> = edmFolder.<b>GetNextFile</b>(filePos)<br>
|
||||
<br>
|
||||
i = FilesComboBox.Items.Add(edmFile.<b>Name</b>)<br>
|
||||
oFileArray(i) = edmFile<br>
|
||||
<span style="color:blue;">Loop</span><br>
|
||||
<br>
|
||||
FilesComboBox.Text = <span style="color:blue;">CStr</span>(FilesComboBox.Items(0))<br>
|
||||
<span style="color:blue;">Catch</span> ex <span style="color:blue;">As</span> <span style="color:#2b91af;">Exception</span><br>
|
||||
FilesComboBox.Items.Clear()<br>
|
||||
oFileArray.Clear()<br>
|
||||
FilesComboBox.Text = <span style="color:#a31515;">"Error"</span><br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Try</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Sub</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">Private</span> <span style="color:blue;">Sub</span> ShowDataCard()<br>
|
||||
<span style="color:blue;">If</span> edmCardView <span style="color:blue;">IsNot</span> <span style="color:blue;">Nothing</span> <span style="color:blue;">Then</span><br>
|
||||
edmCardView.<b>ShowWindow</b>(<span style="color:blue;">False</span>)<br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">If</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">Dim</span> i <span style="color:blue;">As</span> <span style="color:blue;">Integer</span> = FoldersComboBox.SelectedIndex<br>
|
||||
<span style="color:blue;">Dim</span> edmFolder <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmFolder5</span> = oFoldersArray(i)<br>
|
||||
<br>
|
||||
i = FilesComboBox.SelectedIndex<br>
|
||||
<span style="color:blue;">Dim</span> edmFile <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmFile5</span> = oFileArray(i)<br>
|
||||
<br>
|
||||
<span style="color:blue;">Dim</span> vault1 <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmVault10</span> = <span style="color:blue;">DirectCast</span>(edmFolder.<b>Vault</b>, <span style="color:#2b91af;">IEdmVault10</span>)<br>
|
||||
<br>
|
||||
<span style="color:blue;">Dim</span> params <span style="color:blue;">As</span> <span style="color:#2b91af;">EdmCardViewParams</span> = <span style="color:blue;">Nothing</span><br>
|
||||
params.mlFileID = edmFile.<b>ID</b><br>
|
||||
params.mlFolderID = edmFolder.<b>ID</b><br>
|
||||
params.mlCardID = 0<br>
|
||||
params.mlX = 10<br>
|
||||
params.mlY = 15<br>
|
||||
params.mhParentWindow = CardPanel.Handle.ToInt32()<br>
|
||||
params.mlEdmCardViewFlags = <span style="color:blue;">CInt</span>(<span style="color:#2b91af;">EdmCardViewFlag</span>.EdmCvf_Normal)<br>
|
||||
<br>
|
||||
edmCardView = vault1.<b>CreateCardViewEx2</b>(params, <span style="color:blue;">Me</span>)<br>
|
||||
<span style="color:blue;">If</span> edmCardView <span style="color:blue;">Is</span> <span style="color:blue;">Nothing</span> <span style="color:blue;">Then</span><br>
|
||||
<span style="color:#2b91af;">MessageBox</span>.Show(<span style="color:#a31515;">"The file does not have a card."</span>)<br>
|
||||
<span style="color:blue;">Return</span><br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">If</span><br>
|
||||
<br>
|
||||
edmCardView.<b>SetFocus</b>(0)<br>
|
||||
<br>
|
||||
<br>
|
||||
<span style="color:blue;">Dim</span> width_Renamed <span style="color:blue;">As</span> <span style="color:blue;">Integer</span> = 0<br>
|
||||
<span style="color:blue;">Dim</span> height_Renamed <span style="color:blue;">As</span> <span style="color:blue;">Integer</span> = 0<br>
|
||||
edmCardView.<b>GetCardSize</b>(width_Renamed, height_Renamed)<br>
|
||||
CardPanel.Width = width_Renamed+20<br>
|
||||
CardPanel.Height = height_Renamed+20<br>
|
||||
edmCardView.<b>ShowWindow</b>(<span style="color:blue;">True</span>)<br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Sub</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">Private</span> <span style="color:blue;">Sub</span> FilesComboBox_SelectedIndexChanged(<span style="color:blue;">ByVal</span> sender <span style="color:blue;">As</span> <span style="color:blue;">Object</span>, <span style="color:blue;">ByVal</span> e <span style="color:blue;">As</span> <span style="color:#2b91af;">EventArgs</span>) <span style="color:blue;">Handles</span> FilesComboBox.SelectedIndexChanged<br>
|
||||
ShowDataCard()<br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Sub</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">Private</span> <span style="color:blue;">Sub</span> DoBtn_Click(<span style="color:blue;">ByVal</span> sender <span style="color:blue;">As</span> <span style="color:blue;">Object</span>, <span style="color:blue;">ByVal</span> e <span style="color:blue;">As</span> <span style="color:#2b91af;">EventArgs</span>) <span style="color:blue;">Handles</span> DoBtn.Click<br>
|
||||
<span style="color:blue;">Dim</span> i <span style="color:blue;">As</span> <span style="color:blue;">Integer</span> = FoldersComboBox.SelectedIndex<br>
|
||||
<span style="color:blue;">Dim</span> edmFolder <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmFolder5</span> = oFoldersArray(i)<br>
|
||||
<br>
|
||||
i = FilesComboBox.SelectedIndex<br>
|
||||
<span style="color:blue;">Dim</span> edmFile <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmFile14</span> = <span style="color:blue;">DirectCast</span>(oFileArray(i), <span style="color:#2b91af;">IEdmFile14</span>)<br>
|
||||
<br>
|
||||
<span style="color:blue;">Dim</span> cfgList <span style="color:blue;">As</span> <span style="color:blue;">New</span> <span style="color:#2b91af;">List</span>(<span style="color:blue;">Of</span> <span style="color:blue;">String</span>)()<br>
|
||||
<span style="color:blue;">Dim</span> configLst <span style="color:blue;">As</span> <span style="color:#2b91af;">EdmStrLst5</span> = edmFile.<b>GetConfigurations</b>()<br>
|
||||
<span style="color:blue;">Dim</span> cfgPos <span style="color:blue;">As</span> <span style="color:#2b91af;">IEdmPos5</span> = configLst.<b>GetHeadPosition</b>()<br>
|
||||
<span style="color:blue;">Do</span> <span style="color:blue;">While</span> <span style="color:blue;">Not</span> cfgPos.<b>IsNull</b><br>
|
||||
<span style="color:blue;">Dim</span> configName <span style="color:blue;">As</span> <span style="color:blue;">String</span> = configLst.<b>GetNext</b>(cfgPos)<br>
|
||||
cfgList.Add(configName)<br>
|
||||
<span style="color:blue;">Loop</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">For</span> <span style="color:blue;">Each</span> configName <span style="color:blue;">As</span> <span style="color:blue;">String</span> <span style="color:blue;">In</span> cfgList<br>
|
||||
<span style="color:green;">' Move variable values from "@" to configName</span><br>
|
||||
edmFile.<b>GenerateDefaultConfigValues</b>(edmFile.<b>ID</b>, <span style="color:#a31515;">"@"</span>, configName, <span style="color:#a31515;">""</span>, <span style="color:blue;">False</span>)<br>
|
||||
<span style="color:blue;">Next</span> configName<br>
|
||||
<br>
|
||||
ShowDataCard()<br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Sub</span><br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Class</span><br>
|
||||
<br>
|
||||
</p>
|
||||
<p style="font-family: Courier New; font-size: 13; color: black; background: white" class="APICODE">
|
||||
</p>
|
||||
<p style="font-family: Courier New; font-size: 13; color: black; background: white" class="APICODE">
|
||||
</p>
|
||||
<p style="font-family: Courier New; font-size: 13; color: black; background: white" class="APICODE" align="center">
|
||||
<a href="#top">Back to top</a> </p>
|
||||
<p style="font-family: Courier New; font-size: 13; color: #008000; background: white" class="APICODE">
|
||||
<a name="form1designer"></a>'Form1.Designer.vb</p>
|
||||
<p style="font-family: Courier New; font-size: 13; color: black; background: white" class="APICODE">
|
||||
<br>
|
||||
<span style="color:blue;">Partial</span> <span style="color:blue;">Public</span> <span style="color:blue;">Class</span> <span style="color:#2b91af;">MainForm</span><br>
|
||||
<span style="color:gray;">'''</span><span style="color:green;"> </span><span style="color:gray;"><summary></span><br>
|
||||
<span style="color:gray;">'''</span><span style="color:green;"> Required designer variable.</span><br>
|
||||
<span style="color:gray;">'''</span><span style="color:green;"> </span><span style="color:gray;"></summary></span><br>
|
||||
<span style="color:blue;">Private</span> components <span style="color:blue;">As</span> System.ComponentModel.<span style="color:#2b91af;">IContainer</span> = <span style="color:blue;">Nothing</span><br>
|
||||
<br>
|
||||
<span style="color:gray;">'''</span><span style="color:green;"> </span><span style="color:gray;"><summary></span><br>
|
||||
<span style="color:gray;">'''</span><span style="color:green;"> Clean up any resources being used.</span><br>
|
||||
<span style="color:gray;">'''</span><span style="color:green;"> </span><span style="color:gray;"></summary></span><br>
|
||||
<span style="color:gray;">'''</span><span style="color:green;"> </span><span style="color:gray;"><param name="</span>disposing<span style="color:gray;">"></span><span style="color:green;">true if managed resources should be disposed; otherwise, false.</span><span style="color:gray;"></param></span><br>
|
||||
<span style="color:blue;">Protected</span> <span style="color:blue;">Overrides</span> <span style="color:blue;">Sub</span> Dispose(<span style="color:blue;">ByVal</span> disposing <span style="color:blue;">As</span> <span style="color:blue;">Boolean</span>)<br>
|
||||
<span style="color:blue;">If</span> disposing <span style="color:blue;">AndAlso</span> (components <span style="color:blue;">IsNot</span> <span style="color:blue;">Nothing</span>) <span style="color:blue;">Then</span><br>
|
||||
components.Dispose()<br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">If</span><br>
|
||||
<span style="color:blue;">MyBase</span>.Dispose(disposing)<br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Sub</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">#Region</span> <span style="color:#a31515;">"Windows Form Designer generated code"</span><br>
|
||||
<br>
|
||||
<span style="color:gray;">'''</span><span style="color:green;"> </span><span style="color:gray;"><summary></span><br>
|
||||
<span style="color:gray;">'''</span><span style="color:green;"> Required method for Designer support - do not modify</span><br>
|
||||
<span style="color:gray;">'''</span><span style="color:green;"> the contents of this method with the code editor.</span><br>
|
||||
<span style="color:gray;">'''</span><span style="color:green;"> </span><span style="color:gray;"></summary></span><br>
|
||||
<span style="color:blue;">Private</span> <span style="color:blue;">Sub</span> InitializeComponent()<br>
|
||||
<span style="color:blue;">Me</span>.DoBtn = <span style="color:blue;">New</span> System.Windows.Forms.<span style="color:#2b91af;">Button</span>()<br>
|
||||
<span style="color:blue;">Me</span>.CardPanel = <span style="color:blue;">New</span> System.Windows.Forms.<span style="color:#2b91af;">Panel</span>()<br>
|
||||
<span style="color:blue;">Me</span>.VaultsComboBox = <span style="color:blue;">New</span> System.Windows.Forms.<span style="color:#2b91af;">ComboBox</span>()<br>
|
||||
<span style="color:blue;">Me</span>.FoldersComboBox = <span style="color:blue;">New</span> System.Windows.Forms.<span style="color:#2b91af;">ComboBox</span>()<br>
|
||||
<span style="color:blue;">Me</span>.FilesComboBox = <span style="color:blue;">New</span> System.Windows.Forms.<span style="color:#2b91af;">ComboBox</span>()<br>
|
||||
<span style="color:blue;">Me</span>.label1 = <span style="color:blue;">New</span> System.Windows.Forms.<span style="color:#2b91af;">Label</span>()<br>
|
||||
<span style="color:blue;">Me</span>.label2 = <span style="color:blue;">New</span> System.Windows.Forms.<span style="color:#2b91af;">Label</span>()<br>
|
||||
<span style="color:blue;">Me</span>.label3 = <span style="color:blue;">New</span> System.Windows.Forms.<span style="color:#2b91af;">Label</span>()<br>
|
||||
<span style="color:blue;">Me</span>.label4 = <span style="color:blue;">New</span> System.Windows.Forms.<span style="color:#2b91af;">Label</span>()<br>
|
||||
<span style="color:blue;">Me</span>.SuspendLayout()<br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:green;">' DoBtn</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:blue;">Me</span>.DoBtn.Location = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Point</span>(223, 108)<br>
|
||||
<span style="color:blue;">Me</span>.DoBtn.Name = <span style="color:#a31515;">"DoBtn"</span><br>
|
||||
<span style="color:blue;">Me</span>.DoBtn.Size = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Size</span>(271, 23)<br>
|
||||
<span style="color:blue;">Me</span>.DoBtn.TabIndex = 0<br>
|
||||
<span style="color:blue;">Me</span>.DoBtn.Text = <span style="color:#a31515;">"Copy Control Values"</span><br>
|
||||
<span style="color:blue;">Me</span>.DoBtn.UseVisualStyleBackColor = <span style="color:blue;">True</span><br>
|
||||
<br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:green;">' CardPanel</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:blue;">Me</span>.CardPanel.AutoScroll = <span style="color:blue;">True</span><br>
|
||||
<span style="color:blue;">Me</span>.CardPanel.BackgroundImageLayout = System.Windows.Forms.<span style="color:#2b91af;">ImageLayout</span>.Center<br>
|
||||
<span style="color:blue;">Me</span>.CardPanel.BorderStyle = System.Windows.Forms.<span style="color:#2b91af;">BorderStyle</span>.Fixed3D<br>
|
||||
<span style="color:blue;">Me</span>.CardPanel.Location = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Point</span>(12, 162)<br>
|
||||
<span style="color:blue;">Me</span>.CardPanel.Name = <span style="color:#a31515;">"CardPanel"</span><br>
|
||||
<span style="color:blue;">Me</span>.CardPanel.Size = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Size</span>(841, 479)<br>
|
||||
<span style="color:blue;">Me</span>.CardPanel.TabIndex = 1<br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:green;">' VaultsComboBox</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:blue;">Me</span>.VaultsComboBox.FormattingEnabled = <span style="color:blue;">True</span><br>
|
||||
<span style="color:blue;">Me</span>.VaultsComboBox.Location = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Point</span>(108, 25)<br>
|
||||
<span style="color:blue;">Me</span>.VaultsComboBox.Name = <span style="color:#a31515;">"VaultsComboBox"</span><br>
|
||||
<span style="color:blue;">Me</span>.VaultsComboBox.Size = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Size</span>(273, 21)<br>
|
||||
<span style="color:blue;">Me</span>.VaultsComboBox.TabIndex = 2<br>
|
||||
<br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:green;">' FoldersComboBox</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:blue;">Me</span>.FoldersComboBox.FormattingEnabled = <span style="color:blue;">True</span><br>
|
||||
<span style="color:blue;">Me</span>.FoldersComboBox.Location = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Point</span>(108, 52)<br>
|
||||
<span style="color:blue;">Me</span>.FoldersComboBox.Name = <span style="color:#a31515;">"FoldersComboBox"</span><br>
|
||||
<span style="color:blue;">Me</span>.FoldersComboBox.Size = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Size</span>(434, 21)<br>
|
||||
<span style="color:blue;">Me</span>.FoldersComboBox.TabIndex = 3<br>
|
||||
<br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:green;">' FilesComboBox</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:blue;">Me</span>.FilesComboBox.FormattingEnabled = <span style="color:blue;">True</span><br>
|
||||
<span style="color:blue;">Me</span>.FilesComboBox.Location = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Point</span>(108, 79)<br>
|
||||
<span style="color:blue;">Me</span>.FilesComboBox.Name = <span style="color:#a31515;">"FilesComboBox"</span><br>
|
||||
<span style="color:blue;">Me</span>.FilesComboBox.Size = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Size</span>(434, 21)<br>
|
||||
<span style="color:blue;">Me</span>.FilesComboBox.TabIndex = 4<br>
|
||||
<br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:green;">' label1</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:blue;">Me</span>.label1.AutoSize = <span style="color:blue;">True</span><br>
|
||||
<span style="color:blue;">Me</span>.label1.Location = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Point</span>(9, 25)<br>
|
||||
<span style="color:blue;">Me</span>.label1.Name = <span style="color:#a31515;">"label1"</span><br>
|
||||
<span style="color:blue;">Me</span>.label1.Size = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Size</span>(31, 13)<br>
|
||||
<span style="color:blue;">Me</span>.label1.TabIndex = 5<br>
|
||||
<span style="color:blue;">Me</span>.label1.Text = <span style="color:#a31515;">"Vault"</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:green;">' label2</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:blue;">Me</span>.label2.AutoSize = <span style="color:blue;">True</span><br>
|
||||
<span style="color:blue;">Me</span>.label2.Location = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Point</span>(9, 52)<br>
|
||||
<span style="color:blue;">Me</span>.label2.Name = <span style="color:#a31515;">"label2"</span><br>
|
||||
<span style="color:blue;">Me</span>.label2.Size = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Size</span>(36, 13)<br>
|
||||
<span style="color:blue;">Me</span>.label2.TabIndex = 6<br>
|
||||
<span style="color:blue;">Me</span>.label2.Text = <span style="color:#a31515;">"Folder"</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:green;">' label3</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:blue;">Me</span>.label3.AutoSize = <span style="color:blue;">True</span><br>
|
||||
<span style="color:blue;">Me</span>.label3.Location = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Point</span>(9, 79)<br>
|
||||
<span style="color:blue;">Me</span>.label3.Name = <span style="color:#a31515;">"label3"</span><br>
|
||||
<span style="color:blue;">Me</span>.label3.Size = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Size</span>(23, 13)<br>
|
||||
<span style="color:blue;">Me</span>.label3.TabIndex = 7<br>
|
||||
<span style="color:blue;">Me</span>.label3.Text = <span style="color:#a31515;">"File"</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:green;">' label4</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:blue;">Me</span>.label4.AutoSize = <span style="color:blue;">True</span><br>
|
||||
<span style="color:blue;">Me</span>.label4.Location = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Point</span>(12, 143)<br>
|
||||
<span style="color:blue;">Me</span>.label4.Name = <span style="color:#a31515;">"label4"</span><br>
|
||||
<span style="color:blue;">Me</span>.label4.Size = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Size</span>(57, 13)<br>
|
||||
<span style="color:blue;">Me</span>.label4.TabIndex = 8<br>
|
||||
<span style="color:blue;">Me</span>.label4.Text = <span style="color:#a31515;">"Data card:"</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:green;">' MainForm</span><br>
|
||||
<span style="color:green;">' </span><br>
|
||||
<span style="color:blue;">Me</span>.AutoScaleDimensions = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">SizeF</span>(6F, 13F)<br>
|
||||
<span style="color:blue;">Me</span>.AutoScaleMode = System.Windows.Forms.<span style="color:#2b91af;">AutoScaleMode</span>.Font<br>
|
||||
<span style="color:blue;">Me</span>.ClientSize = <span style="color:blue;">New</span> System.Drawing.<span style="color:#2b91af;">Size</span>(913, 670)<br>
|
||||
<span style="color:blue;">Me</span>.Controls.Add(<span style="color:blue;">Me</span>.label4)<br>
|
||||
<span style="color:blue;">Me</span>.Controls.Add(<span style="color:blue;">Me</span>.label3)<br>
|
||||
<span style="color:blue;">Me</span>.Controls.Add(<span style="color:blue;">Me</span>.label2)<br>
|
||||
<span style="color:blue;">Me</span>.Controls.Add(<span style="color:blue;">Me</span>.label1)<br>
|
||||
<span style="color:blue;">Me</span>.Controls.Add(<span style="color:blue;">Me</span>.FilesComboBox)<br>
|
||||
<span style="color:blue;">Me</span>.Controls.Add(<span style="color:blue;">Me</span>.FoldersComboBox)<br>
|
||||
<span style="color:blue;">Me</span>.Controls.Add(<span style="color:blue;">Me</span>.VaultsComboBox)<br>
|
||||
<span style="color:blue;">Me</span>.Controls.Add(<span style="color:blue;">Me</span>.CardPanel)<br>
|
||||
<span style="color:blue;">Me</span>.Controls.Add(<span style="color:blue;">Me</span>.DoBtn)<br>
|
||||
<span style="color:blue;">Me</span>.Name = <span style="color:#a31515;">"MainForm"</span><br>
|
||||
<span style="color:blue;">Me</span>.Text = <span style="color:#a31515;">"Copy Control Values to Configurations"</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">Me</span>.ResumeLayout(<span style="color:blue;">False</span>)<br>
|
||||
<span style="color:blue;">Me</span>.PerformLayout()<br>
|
||||
<br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Sub</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">#End</span> <span style="color:blue;">Region</span><br>
|
||||
<br>
|
||||
<span style="color:blue;">Private</span> <span style="color:blue;">WithEvents</span> DoBtn <span style="color:blue;">As</span> System.Windows.Forms.<span style="color:#2b91af;">Button</span><br>
|
||||
<span style="color:blue;">Private</span> CardPanel <span style="color:blue;">As</span> System.Windows.Forms.<span style="color:#2b91af;">Panel</span><br>
|
||||
<span style="color:blue;">Private</span> <span style="color:blue;">WithEvents</span> VaultsComboBox <span style="color:blue;">As</span> System.Windows.Forms.<span style="color:#2b91af;">ComboBox</span><br>
|
||||
<span style="color:blue;">Private</span> <span style="color:blue;">WithEvents</span> FoldersComboBox <span style="color:blue;">As</span> System.Windows.Forms.<span style="color:#2b91af;">ComboBox</span><br>
|
||||
<span style="color:blue;">Private</span> <span style="color:blue;">WithEvents</span> FilesComboBox <span style="color:blue;">As</span> System.Windows.Forms.<span style="color:#2b91af;">ComboBox</span><br>
|
||||
<span style="color:blue;">Private</span> label1 <span style="color:blue;">As</span> System.Windows.Forms.<span style="color:#2b91af;">Label</span><br>
|
||||
<span style="color:blue;">Private</span> label2 <span style="color:blue;">As</span> System.Windows.Forms.<span style="color:#2b91af;">Label</span><br>
|
||||
<span style="color:blue;">Private</span> label3 <span style="color:blue;">As</span> System.Windows.Forms.<span style="color:#2b91af;">Label</span><br>
|
||||
<span style="color:blue;">Private</span> label4 <span style="color:blue;">As</span> System.Windows.Forms.<span style="color:#2b91af;">Label</span><br>
|
||||
<span style="color:blue;">End</span> <span style="color:blue;">Class</span><br>
|
||||
</p>
|
||||
<p style="font-family: Courier New; font-size: 13; color: black; background: white" class="APICODE">
|
||||
</p>
|
||||
<p style="font-family: Courier New; font-size: 13; color: black; background: white" class="APICODE">
|
||||
</p>
|
||||
</font>
|
||||
<p align="center"><a href="#top">Back to top</a></p>
|
||||
|
||||
</body>
|
||||
|
||||
</html>
|
||||
Reference in New Issue
Block a user