Skip to content

I
inventoraddin

leaky114 / inventoraddin
上一次同步 8 个月

通知 6
Star 1
Fork 1
I
inventoraddin

前往新版Gitcode，体验更适合开发者的 AI 搜索 >>

提交 fdb9e7d9 编写于 作者: leaky114's avatar leaky114
浏览文件
操作

21.11.26增加查询erp编码功能

上级 8a20095c
隐藏空白更改
内联 并排
Showing with 155 addition and 334 deletion
Form/ChangeIpro.vb
浏览文件 @ fdb9e7d9
......@@ -21,14 +21,14 @@ Public Class ChangeIproDialog
End Sub
Private Sub ChangeIpro_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim InventorDoc As Document
InventorDoc = ThisApplication.ActiveEditDocument
Dim oInventorDoc As Document
oInventorDoc = ThisApplication.ActiveEditDocument
Dim oPropSets As PropertySets
Dim oPropSet As PropertySet
Dim propitem As [Property]
oPropSets = InventorDoc.PropertySets
oPropSets = oInventorDoc.PropertySets
oPropSet = oPropSets.Item(3)
'获取iproperty
......
Form/OptionDialog.Designer.vb
浏览文件 @ fdb9e7d9
......@@ -65,6 +65,16 @@ Partial Class OptionDialog
Me.TextBox7 = New System.Windows.Forms.TextBox
Me.Label11 = New System.Windows.Forms.Label
Me.CheckBox5 = New System.Windows.Forms.CheckBox
Me.GroupBox8 = New System.Windows.Forms.GroupBox
Me.Label13 = New System.Windows.Forms.Label
Me.TextBox8 = New System.Windows.Forms.TextBox
Me.Button1 = New System.Windows.Forms.Button
Me.Label14 = New System.Windows.Forms.Label
Me.TextBox9 = New System.Windows.Forms.TextBox
Me.TextBox10 = New System.Windows.Forms.TextBox
Me.Label15 = New System.Windows.Forms.Label
Me.TextBox11 = New System.Windows.Forms.TextBox
Me.Label16 = New System.Windows.Forms.Label
Me.TableLayoutPanel1.SuspendLayout()
Me.GroupBox1.SuspendLayout()
Me.GroupBox2.SuspendLayout()
......@@ -73,6 +83,7 @@ Partial Class OptionDialog
Me.GroupBox3.SuspendLayout()
Me.GroupBox6.SuspendLayout()
Me.GroupBox7.SuspendLayout()
Me.GroupBox8.SuspendLayout()
Me.SuspendLayout()
'
'TableLayoutPanel1
......@@ -83,7 +94,7 @@ Partial Class OptionDialog
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.Controls.Add(Me.OK_Button, 0, 0)
Me.TableLayoutPanel1.Controls.Add(Me.Cancel_Button, 1, 0)
Me.TableLayoutPanel1.Location = New System.Drawing.Point(328, 406)
Me.TableLayoutPanel1.Location = New System.Drawing.Point(413, 392)
Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
Me.TableLayoutPanel1.RowCount = 1
Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
......@@ -116,7 +127,7 @@ Partial Class OptionDialog
Me.ComboBox1.Items.AddRange(New Object() {"零件代号", "库存编号", "描述"})
Me.ComboBox1.Location = New System.Drawing.Point(85, 20)
Me.ComboBox1.Name = "ComboBox1"
Me.ComboBox1.Size = New System.Drawing.Size(140, 20)
Me.ComboBox1.Size = New System.Drawing.Size(87, 20)
Me.ComboBox1.TabIndex = 1
'
'ComboBox2
......@@ -126,7 +137,7 @@ Partial Class OptionDialog
Me.ComboBox2.Items.AddRange(New Object() {"零件代号", "库存编号", "描述"})
Me.ComboBox2.Location = New System.Drawing.Point(85, 49)
Me.ComboBox2.Name = "ComboBox2"
Me.ComboBox2.Size = New System.Drawing.Size(140, 20)
Me.ComboBox2.Size = New System.Drawing.Size(87, 20)
Me.ComboBox2.TabIndex = 2
'
'Label1
......@@ -148,7 +159,7 @@ Partial Class OptionDialog
Me.GroupBox1.Controls.Add(Me.ComboBox1)
Me.GroupBox1.Location = New System.Drawing.Point(16, 14)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(241, 101)
Me.GroupBox1.Size = New System.Drawing.Size(191, 101)
Me.GroupBox1.TabIndex = 4
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "IPro映射"
......@@ -160,7 +171,7 @@ Partial Class OptionDialog
Me.ComboBox6.Items.AddRange(New Object() {"成本中心", "描述"})
Me.ComboBox6.Location = New System.Drawing.Point(86, 75)
Me.ComboBox6.Name = "ComboBox6"
Me.ComboBox6.Size = New System.Drawing.Size(140, 20)
Me.ComboBox6.Size = New System.Drawing.Size(86, 20)
Me.ComboBox6.TabIndex = 6
'
'Label12
......@@ -187,9 +198,9 @@ Partial Class OptionDialog
Me.GroupBox2.Controls.Add(Me.TextBox1)
Me.GroupBox2.Controls.Add(Me.Label3)
Me.GroupBox2.Controls.Add(Me.Label4)
Me.GroupBox2.Location = New System.Drawing.Point(273, 14)
Me.GroupBox2.Location = New System.Drawing.Point(16, 129)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(241, 75)
Me.GroupBox2.Size = New System.Drawing.Size(191, 75)
Me.GroupBox2.TabIndex = 5
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "对称零件IPro映射"
......@@ -198,14 +209,14 @@ Partial Class OptionDialog
'
Me.TextBox2.Location = New System.Drawing.Point(77, 45)
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Size = New System.Drawing.Size(147, 21)
Me.TextBox2.Size = New System.Drawing.Size(95, 21)
Me.TextBox2.TabIndex = 6
'
'TextBox1
'
Me.TextBox1.Location = New System.Drawing.Point(77, 18)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(147, 21)
Me.TextBox1.Size = New System.Drawing.Size(95, 21)
Me.TextBox1.TabIndex = 5
'
'Label3
......@@ -234,9 +245,9 @@ Partial Class OptionDialog
Me.GroupBox4.Controls.Add(Me.CheckBox1)
Me.GroupBox4.Controls.Add(Me.TextBox4)
Me.GroupBox4.Controls.Add(Me.Label6)
Me.GroupBox4.Location = New System.Drawing.Point(273, 119)
Me.GroupBox4.Location = New System.Drawing.Point(217, 14)
Me.GroupBox4.Name = "GroupBox4"
Me.GroupBox4.Size = New System.Drawing.Size(241, 98)
Me.GroupBox4.Size = New System.Drawing.Size(207, 98)
Me.GroupBox4.TabIndex = 7
Me.GroupBox4.TabStop = False
Me.GroupBox4.Text = "签字："
......@@ -244,7 +255,7 @@ Partial Class OptionDialog
'CheckBox2
'
Me.CheckBox2.AutoSize = True
Me.CheckBox2.Location = New System.Drawing.Point(137, 77)
Me.CheckBox2.Location = New System.Drawing.Point(128, 77)
Me.CheckBox2.Name = "CheckBox2"
Me.CheckBox2.Size = New System.Drawing.Size(72, 16)
Me.CheckBox2.TabIndex = 10
......@@ -256,7 +267,7 @@ Partial Class OptionDialog
'
Me.TextBox5.Location = New System.Drawing.Point(83, 47)
Me.TextBox5.Name = "TextBox5"
Me.TextBox5.Size = New System.Drawing.Size(147, 21)
Me.TextBox5.Size = New System.Drawing.Size(98, 21)
Me.TextBox5.TabIndex = 9
'
'Label7
......@@ -282,7 +293,7 @@ Partial Class OptionDialog
'
Me.TextBox4.Location = New System.Drawing.Point(83, 20)
Me.TextBox4.Name = "TextBox4"
Me.TextBox4.Size = New System.Drawing.Size(147, 21)
Me.TextBox4.Size = New System.Drawing.Size(98, 21)
Me.TextBox4.TabIndex = 6
'
'Label6
......@@ -302,9 +313,9 @@ Partial Class OptionDialog
Me.GroupBox5.Controls.Add(Me.ComboBox3)
Me.GroupBox5.Controls.Add(Me.TextBox6)
Me.GroupBox5.Controls.Add(Me.Label8)
Me.GroupBox5.Location = New System.Drawing.Point(16, 306)
Me.GroupBox5.Location = New System.Drawing.Point(16, 214)
Me.GroupBox5.Name = "GroupBox5"
Me.GroupBox5.Size = New System.Drawing.Size(498, 84)
Me.GroupBox5.Size = New System.Drawing.Size(584, 84)
Me.GroupBox5.TabIndex = 8
Me.GroupBox5.TabStop = False
Me.GroupBox5.Text = "BOM导出项目："
......@@ -329,7 +340,7 @@ Partial Class OptionDialog
'
'Button添加
'
Me.Button添加.Location = New System.Drawing.Point(434, 47)
Me.Button添加.Location = New System.Drawing.Point(466, 45)
Me.Button添加.Name = "Button添加"
Me.Button添加.Size = New System.Drawing.Size(53, 25)
Me.Button添加.TabIndex = 8
......@@ -341,7 +352,7 @@ Partial Class OptionDialog
Me.ComboBox3.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox3.FormattingEnabled = True
Me.ComboBox3.Items.AddRange(New Object() {"材料", "空格", "存货编号", "零件代号", "成本中心", "描述", "数量", "所属装配", "所属装配代号", "文件路径", "文件名", "质量", "面积", "总数量"})
Me.ComboBox3.Location = New System.Drawing.Point(254, 51)
Me.ComboBox3.Location = New System.Drawing.Point(272, 50)
Me.ComboBox3.Name = "ComboBox3"
Me.ComboBox3.Size = New System.Drawing.Size(170, 20)
Me.ComboBox3.TabIndex = 7
......@@ -350,7 +361,7 @@ Partial Class OptionDialog
'
Me.TextBox6.Location = New System.Drawing.Point(86, 19)
Me.TextBox6.Name = "TextBox6"
Me.TextBox6.Size = New System.Drawing.Size(401, 21)
Me.TextBox6.Size = New System.Drawing.Size(433, 21)
Me.TextBox6.TabIndex = 6
Me.TextBox6.Text = "库存编号|空格|零件代号|材料|质量|所属装配代号|数量|总数量|描述"
'
......@@ -379,14 +390,14 @@ Partial Class OptionDialog
Me.ComboBox4.Items.AddRange(New Object() {"0", "0.1", "0.01", "0.001"})
Me.ComboBox4.Location = New System.Drawing.Point(80, 20)
Me.ComboBox4.Name = "ComboBox4"
Me.ComboBox4.Size = New System.Drawing.Size(104, 20)
Me.ComboBox4.Size = New System.Drawing.Size(66, 20)
Me.ComboBox4.TabIndex = 10
'
'Label5
'
Me.Label5.Location = New System.Drawing.Point(12, 22)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(215, 40)
Me.Label5.Size = New System.Drawing.Size(151, 40)
Me.Label5.TabIndex = 4
Me.Label5.Text = "比例："
'
......@@ -394,7 +405,7 @@ Partial Class OptionDialog
'
Me.TextBox3.Location = New System.Drawing.Point(80, 17)
Me.TextBox3.Name = "TextBox3"
Me.TextBox3.Size = New System.Drawing.Size(137, 21)
Me.TextBox3.Size = New System.Drawing.Size(64, 21)
Me.TextBox3.TabIndex = 6
'
'GroupBox3
......@@ -402,9 +413,9 @@ Partial Class OptionDialog
Me.GroupBox3.Controls.Add(Me.CheckBox3)
Me.GroupBox3.Controls.Add(Me.TextBox3)
Me.GroupBox3.Controls.Add(Me.Label5)
Me.GroupBox3.Location = New System.Drawing.Point(24, 221)
Me.GroupBox3.Location = New System.Drawing.Point(435, 129)
Me.GroupBox3.Name = "GroupBox3"
Me.GroupBox3.Size = New System.Drawing.Size(232, 68)
Me.GroupBox3.Size = New System.Drawing.Size(163, 68)
Me.GroupBox3.TabIndex = 6
Me.GroupBox3.TabStop = False
Me.GroupBox3.Text = "比例映射："
......@@ -428,9 +439,9 @@ Partial Class OptionDialog
Me.GroupBox6.Controls.Add(Me.Label10)
Me.GroupBox6.Controls.Add(Me.ComboBox4)
Me.GroupBox6.Controls.Add(Me.Label9)
Me.GroupBox6.Location = New System.Drawing.Point(21, 121)
Me.GroupBox6.Location = New System.Drawing.Point(435, 14)
Me.GroupBox6.Name = "GroupBox6"
Me.GroupBox6.Size = New System.Drawing.Size(235, 96)
Me.GroupBox6.Size = New System.Drawing.Size(165, 96)
Me.GroupBox6.TabIndex = 11
Me.GroupBox6.TabStop = False
Me.GroupBox6.Text = "精度设置"
......@@ -442,7 +453,7 @@ Partial Class OptionDialog
Me.ComboBox5.Items.AddRange(New Object() {"0", "0.1", "0.01", "0.001", "0.0001", "0.00001"})
Me.ComboBox5.Location = New System.Drawing.Point(80, 50)
Me.ComboBox5.Name = "ComboBox5"
Me.ComboBox5.Size = New System.Drawing.Size(104, 20)
Me.ComboBox5.Size = New System.Drawing.Size(66, 20)
Me.ComboBox5.TabIndex = 12
'
'Label10
......@@ -459,9 +470,9 @@ Partial Class OptionDialog
Me.GroupBox7.Controls.Add(Me.CheckBox4)
Me.GroupBox7.Controls.Add(Me.TextBox7)
Me.GroupBox7.Controls.Add(Me.Label11)
Me.GroupBox7.Location = New System.Drawing.Point(273, 223)
Me.GroupBox7.Location = New System.Drawing.Point(217, 129)
Me.GroupBox7.Name = "GroupBox7"
Me.GroupBox7.Size = New System.Drawing.Size(232, 68)
Me.GroupBox7.Size = New System.Drawing.Size(204, 68)
Me.GroupBox7.TabIndex = 12
Me.GroupBox7.TabStop = False
Me.GroupBox7.Text = "质量映射："
......@@ -481,9 +492,9 @@ Partial Class OptionDialog
'
'TextBox7
'
Me.TextBox7.Location = New System.Drawing.Point(80, 17)
Me.TextBox7.Location = New System.Drawing.Point(66, 17)
Me.TextBox7.Name = "TextBox7"
Me.TextBox7.Size = New System.Drawing.Size(137, 21)
Me.TextBox7.Size = New System.Drawing.Size(112, 21)
Me.TextBox7.TabIndex = 6
'
'Label11
......@@ -499,20 +510,115 @@ Partial Class OptionDialog
Me.CheckBox5.AutoSize = True
Me.CheckBox5.Checked = True
Me.CheckBox5.CheckState = System.Windows.Forms.CheckState.Checked
Me.CheckBox5.Location = New System.Drawing.Point(25, 413)
Me.CheckBox5.Location = New System.Drawing.Point(25, 406)
Me.CheckBox5.Name = "CheckBox5"
Me.CheckBox5.Size = New System.Drawing.Size(108, 16)
Me.CheckBox5.TabIndex = 13
Me.CheckBox5.Text = "启动时检查更新"
Me.CheckBox5.UseVisualStyleBackColor = True
'
'GroupBox8
'
Me.GroupBox8.Controls.Add(Me.TextBox11)
Me.GroupBox8.Controls.Add(Me.Label16)
Me.GroupBox8.Controls.Add(Me.TextBox10)
Me.GroupBox8.Controls.Add(Me.Label15)
Me.GroupBox8.Controls.Add(Me.TextBox9)
Me.GroupBox8.Controls.Add(Me.Label14)
Me.GroupBox8.Controls.Add(Me.Button1)
Me.GroupBox8.Controls.Add(Me.TextBox8)
Me.GroupBox8.Controls.Add(Me.Label13)
Me.GroupBox8.Location = New System.Drawing.Point(16, 308)
Me.GroupBox8.Name = "GroupBox8"
Me.GroupBox8.Size = New System.Drawing.Size(582, 76)
Me.GroupBox8.TabIndex = 14
Me.GroupBox8.TabStop = False
Me.GroupBox8.Text = "ERP查询"
'
'Label13
'
Me.Label13.AutoSize = True
Me.Label13.Location = New System.Drawing.Point(7, 23)
Me.Label13.Name = "Label13"
Me.Label13.Size = New System.Drawing.Size(71, 12)
Me.Label13.TabIndex = 7
Me.Label13.Text = "Excel文件："
'
'TextBox8
'
Me.TextBox8.Location = New System.Drawing.Point(77, 19)
Me.TextBox8.Name = "TextBox8"
Me.TextBox8.Size = New System.Drawing.Size(433, 21)
Me.TextBox8.TabIndex = 8
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(532, 19)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(33, 20)
Me.Button1.TabIndex = 9
Me.Button1.Text = "..."
Me.Button1.UseVisualStyleBackColor = True
'
'Label14
'
Me.Label14.AutoSize = True
Me.Label14.Location = New System.Drawing.Point(8, 52)
Me.Label14.Name = "Label14"
Me.Label14.Size = New System.Drawing.Size(65, 12)
Me.Label14.TabIndex = 10
Me.Label14.Text = "数 据 表："
'
'TextBox9
'
Me.TextBox9.Location = New System.Drawing.Point(75, 48)
Me.TextBox9.Name = "TextBox9"
Me.TextBox9.Size = New System.Drawing.Size(69, 21)
Me.TextBox9.TabIndex = 11
Me.TextBox9.Text = "物料"
'
'TextBox10
'
Me.TextBox10.Location = New System.Drawing.Point(234, 48)
Me.TextBox10.Name = "TextBox10"
Me.TextBox10.Size = New System.Drawing.Size(89, 21)
Me.TextBox10.TabIndex = 13
Me.TextBox10.Text = "A:G"
'
'Label15
'
Me.Label15.AutoSize = True
Me.Label15.Location = New System.Drawing.Point(167, 52)
Me.Label15.Name = "Label15"
Me.Label15.Size = New System.Drawing.Size(65, 12)
Me.Label15.TabIndex = 12
Me.Label15.Text = "查询范围："
'
'TextBox11
'
Me.TextBox11.Location = New System.Drawing.Point(401, 50)
Me.TextBox11.Name = "TextBox11"
Me.TextBox11.Size = New System.Drawing.Size(89, 21)
Me.TextBox11.TabIndex = 15
Me.TextBox11.Text = "2,4"
'
'Label16
'
Me.Label16.AutoSize = True
Me.Label16.Location = New System.Drawing.Point(346, 54)
Me.Label16.Name = "Label16"
Me.Label16.Size = New System.Drawing.Size(53, 12)
Me.Label16.TabIndex = 14
Me.Label16.Text = "查询列："
'
'OptionDialog
'
Me.AcceptButton = Me.OK_Button
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.CancelButton = Me.Cancel_Button
Me.ClientSize = New System.Drawing.Size(533, 458)
Me.ClientSize = New System.Drawing.Size(618, 444)
Me.Controls.Add(Me.GroupBox8)
Me.Controls.Add(Me.CheckBox5)
Me.Controls.Add(Me.GroupBox7)
Me.Controls.Add(Me.GroupBox6)
......@@ -544,6 +650,8 @@ Partial Class OptionDialog
Me.GroupBox6.PerformLayout()
Me.GroupBox7.ResumeLayout(False)
Me.GroupBox7.PerformLayout()
Me.GroupBox8.ResumeLayout(False)
Me.GroupBox8.PerformLayout()
Me.ResumeLayout(False)
Me.PerformLayout()
......@@ -591,5 +699,15 @@ Partial Class OptionDialog
Friend WithEvents ComboBox6 As System.Windows.Forms.ComboBox
Friend WithEvents Label12 As System.Windows.Forms.Label
Friend WithEvents CheckBox5 As System.Windows.Forms.CheckBox
Friend WithEvents GroupBox8 As System.Windows.Forms.GroupBox
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents TextBox8 As System.Windows.Forms.TextBox
Friend WithEvents Label13 As System.Windows.Forms.Label
Friend WithEvents Label14 As System.Windows.Forms.Label
Friend WithEvents TextBox10 As System.Windows.Forms.TextBox
Friend WithEvents Label15 As System.Windows.Forms.Label
Friend WithEvents TextBox9 As System.Windows.Forms.TextBox
Friend WithEvents TextBox11 As System.Windows.Forms.TextBox
Friend WithEvents Label16 As System.Windows.Forms.Label
End Class
Form/SearchERP.Designer.vb 已删除 100644 → 0
浏览文件 @ 8a20095c
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class SearchERP
Inherits System.Windows.Forms.Form
'Form 重写 Dispose，以清理组件列表。
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Windows 窗体设计器所必需的
Private components As System.ComponentModel.IContainer
'注意: 以下过程是 Windows 窗体设计器所必需的
'可以使用 Windows 窗体设计器修改它。
'不要使用代码编辑器修改它。
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel
Me.OK_Button = New System.Windows.Forms.Button
Me.Cancel_Button = New System.Windows.Forms.Button
Me.Label1 = New System.Windows.Forms.Label
Me.TextBox1 = New System.Windows.Forms.TextBox
Me.ComboBox1 = New System.Windows.Forms.ComboBox
Me.TextBox2 = New System.Windows.Forms.TextBox
Me.TextBox3 = New System.Windows.Forms.TextBox
Me.TextBox4 = New System.Windows.Forms.TextBox
Me.TextBox5 = New System.Windows.Forms.TextBox
Me.TableLayoutPanel1.SuspendLayout()
Me.SuspendLayout()
'
'TableLayoutPanel1
'
Me.TableLayoutPanel1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.TableLayoutPanel1.ColumnCount = 2
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.Controls.Add(Me.OK_Button, 0, 0)
Me.TableLayoutPanel1.Controls.Add(Me.Cancel_Button, 1, 0)
Me.TableLayoutPanel1.Location = New System.Drawing.Point(261, 223)
Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
Me.TableLayoutPanel1.RowCount = 1
Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.Size = New System.Drawing.Size(146, 27)
Me.TableLayoutPanel1.TabIndex = 0
'
'OK_Button
'
Me.OK_Button.Anchor = System.Windows.Forms.AnchorStyles.None
Me.OK_Button.Location = New System.Drawing.Point(3, 3)
Me.OK_Button.Name = "OK_Button"
Me.OK_Button.Size = New System.Drawing.Size(67, 21)
Me.OK_Button.TabIndex = 0
Me.OK_Button.Text = "确定"
'
'Cancel_Button
'
Me.Cancel_Button.Anchor = System.Windows.Forms.AnchorStyles.None
Me.Cancel_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.Cancel_Button.Location = New System.Drawing.Point(76, 3)
Me.Cancel_Button.Name = "Cancel_Button"
Me.Cancel_Button.Size = New System.Drawing.Size(67, 21)
Me.Cancel_Button.TabIndex = 1
Me.Cancel_Button.Text = "取消"
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(19, 18)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(65, 192)
Me.Label1.TabIndex = 1
Me.Label1.Text = "数据文件：" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "数 据 表：" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "查询范围：" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "查询列：" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "查 询 值：" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "ERP编码："
'
'TextBox1
'
Me.TextBox1.Location = New System.Drawing.Point(94, 15)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(315, 21)
Me.TextBox1.TabIndex = 2
'
'ComboBox1
'
Me.ComboBox1.FormattingEnabled = True
Me.ComboBox1.Location = New System.Drawing.Point(94, 49)
Me.ComboBox1.Name = "ComboBox1"
Me.ComboBox1.Size = New System.Drawing.Size(181, 20)
Me.ComboBox1.TabIndex = 3
'
'TextBox2
'
Me.TextBox2.Location = New System.Drawing.Point(94, 90)
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Size = New System.Drawing.Size(181, 21)
Me.TextBox2.TabIndex = 4
'
'TextBox3
'
Me.TextBox3.Location = New System.Drawing.Point(94, 126)
Me.TextBox3.Name = "TextBox3"
Me.TextBox3.Size = New System.Drawing.Size(181, 21)
Me.TextBox3.TabIndex = 5
'
'TextBox4
'
Me.TextBox4.Location = New System.Drawing.Point(94, 157)
Me.TextBox4.Name = "TextBox4"
Me.TextBox4.Size = New System.Drawing.Size(181, 21)
Me.TextBox4.TabIndex = 6
'
'TextBox5
'
Me.TextBox5.Location = New System.Drawing.Point(94, 193)
Me.TextBox5.Name = "TextBox5"
Me.TextBox5.Size = New System.Drawing.Size(181, 21)
Me.TextBox5.TabIndex = 7
'
'SearchERP
'
Me.AcceptButton = Me.OK_Button
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.CancelButton = Me.Cancel_Button
Me.ClientSize = New System.Drawing.Size(419, 261)
Me.Controls.Add(Me.TextBox5)
Me.Controls.Add(Me.TextBox4)
Me.Controls.Add(Me.TextBox3)
Me.Controls.Add(Me.TextBox2)
Me.Controls.Add(Me.ComboBox1)
Me.Controls.Add(Me.TextBox1)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.TableLayoutPanel1)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "SearchERP"
Me.ShowInTaskbar = False
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
Me.Text = "查询ERP编码"
Me.TableLayoutPanel1.ResumeLayout(False)
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents TableLayoutPanel1 As System.Windows.Forms.TableLayoutPanel
Friend WithEvents OK_Button As System.Windows.Forms.Button
Friend WithEvents Cancel_Button As System.Windows.Forms.Button
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox
Friend WithEvents TextBox2 As System.Windows.Forms.TextBox
Friend WithEvents TextBox3 As System.Windows.Forms.TextBox
Friend WithEvents TextBox4 As System.Windows.Forms.TextBox
Friend WithEvents TextBox5 As System.Windows.Forms.TextBox
End Class
Form/SearchERP.resx 已删除 100644 → 0
浏览文件 @ 8a20095c
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>
\ No newline at end of file
Form/SearchERP.vb 已删除 100644 → 0
浏览文件 @ 8a20095c
Imports System.Windows.Forms
Public Class SearchERP
Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
Me.DialogResult = System.Windows.Forms.DialogResult.OK
Me.Close()
End Sub
Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click
Me.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.Close()
End Sub
End Class
InventorAddIn.vbproj.user
浏览文件 @ fdb9e7d9
......@@ -12,7 +12,7 @@
</BootstrapperUrlHistory>
<FallbackCulture>zh-CN</FallbackCulture>
<VerifyUploadedFiles>false</VerifyUploadedFiles>
<ProjectView>ProjectFiles</ProjectView>
<ProjectView>ShowAllFiles</ProjectView>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<StartAction>Program</StartAction>
......
StandardAddInServer.vb
浏览文件 @ fdb9e7d9
B'设置为一个动作，可一次撤销
......
Markdown is supported
0% 或 .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑！
想要评论请 注册 或