📄 form1.designer.vb
字号:
Me.Button1.Text = "打开文件"
Me.Button1.UseVisualStyleBackColor = True
'
'dataGrid1
'
Me.dataGrid1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.dataGrid1.DataMember = ""
Me.dataGrid1.HeaderForeColor = System.Drawing.SystemColors.ControlText
Me.dataGrid1.Location = New System.Drawing.Point(144, 43)
Me.dataGrid1.Name = "dataGrid1"
Me.dataGrid1.Size = New System.Drawing.Size(543, 336)
Me.dataGrid1.TabIndex = 15
'
'tabPage2
'
Me.tabPage2.Controls.Add(Me.Panel1)
Me.tabPage2.Controls.Add(Me.textBox2)
Me.tabPage2.Controls.Add(Me.button11)
Me.tabPage2.Controls.Add(Me.label3)
Me.tabPage2.Controls.Add(Me.label4)
Me.tabPage2.Controls.Add(Me.label5)
Me.tabPage2.Controls.Add(Me.label6)
Me.tabPage2.Controls.Add(Me.textBox3)
Me.tabPage2.Controls.Add(Me.textBox4)
Me.tabPage2.Controls.Add(Me.textBox5)
Me.tabPage2.Location = New System.Drawing.Point(4, 22)
Me.tabPage2.Name = "tabPage2"
Me.tabPage2.Size = New System.Drawing.Size(755, 439)
Me.tabPage2.TabIndex = 1
Me.tabPage2.Text = "谱系图"
Me.tabPage2.Visible = False
'
'Panel1
'
Me.Panel1.AutoScroll = True
Me.Panel1.Controls.Add(Me.Button12)
Me.Panel1.Controls.Add(Me.label1)
Me.Panel1.Location = New System.Drawing.Point(3, 3)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(692, 386)
Me.Panel1.TabIndex = 7
'
'Button12
'
Me.Button12.Location = New System.Drawing.Point(602, 350)
Me.Button12.Name = "Button12"
Me.Button12.Size = New System.Drawing.Size(75, 23)
Me.Button12.TabIndex = 1
Me.Button12.Text = "画图"
Me.Button12.UseVisualStyleBackColor = True
'
'label1
'
Me.label1.Location = New System.Drawing.Point(7, 11)
Me.label1.Name = "label1"
Me.label1.Size = New System.Drawing.Size(62, 25)
Me.label1.TabIndex = 0
Me.label1.Text = "谱系图"
'
'textBox2
'
Me.textBox2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.textBox2.BackColor = System.Drawing.SystemColors.Info
Me.textBox2.Location = New System.Drawing.Point(77, 404)
Me.textBox2.Name = "textBox2"
Me.textBox2.Size = New System.Drawing.Size(72, 21)
Me.textBox2.TabIndex = 4
Me.textBox2.Text = "50"
'
'button11
'
Me.button11.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.button11.Location = New System.Drawing.Point(691, 404)
Me.button11.Name = "button11"
Me.button11.Size = New System.Drawing.Size(90, 25)
Me.button11.TabIndex = 3
Me.button11.Text = "确定"
'
'label3
'
Me.label3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.label3.AutoSize = True
Me.label3.Location = New System.Drawing.Point(10, 404)
Me.label3.Name = "label3"
Me.label3.Size = New System.Drawing.Size(53, 12)
Me.label3.TabIndex = 1
Me.label3.Text = "左边宽:"
'
'label4
'
Me.label4.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.label4.AutoSize = True
Me.label4.Location = New System.Drawing.Point(163, 404)
Me.label4.Name = "label4"
Me.label4.Size = New System.Drawing.Size(53, 12)
Me.label4.TabIndex = 2
Me.label4.Text = "上边宽:"
'
'label5
'
Me.label5.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.label5.AutoSize = True
Me.label5.Location = New System.Drawing.Point(326, 404)
Me.label5.Name = "label5"
Me.label5.Size = New System.Drawing.Size(65, 12)
Me.label5.TabIndex = 2
Me.label5.Text = "间距倍数:"
'
'label6
'
Me.label6.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.label6.AutoSize = True
Me.label6.Location = New System.Drawing.Point(509, 404)
Me.label6.Name = "label6"
Me.label6.Size = New System.Drawing.Size(65, 12)
Me.label6.TabIndex = 2
Me.label6.Text = "距离倍数:"
'
'textBox3
'
Me.textBox3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.textBox3.BackColor = System.Drawing.SystemColors.Info
Me.textBox3.Location = New System.Drawing.Point(240, 404)
Me.textBox3.Name = "textBox3"
Me.textBox3.Size = New System.Drawing.Size(72, 21)
Me.textBox3.TabIndex = 5
Me.textBox3.Text = "15"
'
'textBox4
'
Me.textBox4.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.textBox4.BackColor = System.Drawing.SystemColors.Info
Me.textBox4.Location = New System.Drawing.Point(422, 404)
Me.textBox4.Name = "textBox4"
Me.textBox4.Size = New System.Drawing.Size(72, 21)
Me.textBox4.TabIndex = 5
Me.textBox4.Text = "15"
'
'textBox5
'
Me.textBox5.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.textBox5.BackColor = System.Drawing.SystemColors.Info
Me.textBox5.Location = New System.Drawing.Point(605, 404)
Me.textBox5.Name = "textBox5"
Me.textBox5.Size = New System.Drawing.Size(72, 21)
Me.textBox5.TabIndex = 6
Me.textBox5.Text = "100"
'
'tabPage3
'
Me.tabPage3.Controls.Add(Me.richTextBox1)
Me.tabPage3.Location = New System.Drawing.Point(4, 22)
Me.tabPage3.Name = "tabPage3"
Me.tabPage3.Size = New System.Drawing.Size(755, 439)
Me.tabPage3.TabIndex = 2
Me.tabPage3.Text = "聚类描述"
'
'richTextBox1
'
Me.richTextBox1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.richTextBox1.BackColor = System.Drawing.Color.WhiteSmoke
Me.richTextBox1.Location = New System.Drawing.Point(0, 0)
Me.richTextBox1.Name = "richTextBox1"
Me.richTextBox1.Size = New System.Drawing.Size(696, 439)
Me.richTextBox1.TabIndex = 0
Me.richTextBox1.Text = ""
'
'saveFileDialog1
'
Me.saveFileDialog1.DefaultExt = "xml"
Me.saveFileDialog1.Filter = "XML文件 (*.xml)|*.xml|文本文件 (*.txt)|*.txt|所有文件 (*.*)|*.*"""
Me.saveFileDialog1.RestoreDirectory = True
'
'openFileDialog1
'
Me.openFileDialog1.AddExtension = False
Me.openFileDialog1.DefaultExt = "xml"
Me.openFileDialog1.Filter = "XML文件 (*.xml)|*.xml|文本文件 (*.txt)|*.txt|所有文件 (*.*)|*.*"
Me.openFileDialog1.RestoreDirectory = True
'
'jlfx2
'
Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
Me.ClientSize = New System.Drawing.Size(696, 461)
Me.Controls.Add(Me.tabControl1)
Me.Name = "jlfx2"
Me.Text = "聚类分析法"
Me.tabControl1.ResumeLayout(False)
Me.tabPage1.ResumeLayout(False)
Me.tabPage1.PerformLayout()
CType(Me.dataGrid1, System.ComponentModel.ISupportInitialize).EndInit()
Me.tabPage2.ResumeLayout(False)
Me.tabPage2.PerformLayout()
Me.Panel1.ResumeLayout(False)
Me.tabPage3.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
Friend WithEvents Button12 As System.Windows.Forms.Button
Friend WithEvents Label9 As System.Windows.Forms.Label
Friend WithEvents Label8 As System.Windows.Forms.Label
Friend WithEvents Label7 As System.Windows.Forms.Label
End Class
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -