_ Partial Class Simple Inherits System.Windows.Forms.Form 'Form 重写 Dispose,以清理组件列表。 _ 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 窗体设计器修改它。 '不要使用代码编辑器修改它。 _ Private Sub InitializeComponent() Me.Button1 = New System.Windows.Forms.Button() Me.NumericUpDown1 = New System.Windows.Forms.NumericUpDown() Me.Label1 = New System.Windows.Forms.Label() Me.Button2 = New System.Windows.Forms.Button() Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() Me.FileToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.TestToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.BackToHomeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.QuitToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ModeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.SimpleToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.TimeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ExpectedBPMToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.HelpToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.AboutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() CType(Me.NumericUpDown1, System.ComponentModel.ISupportInitialize).BeginInit() Me.MenuStrip1.SuspendLayout() Me.SuspendLayout() ' 'Button1 ' Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Button1.Font = New System.Drawing.Font("微软雅黑", 15.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Button1.Location = New System.Drawing.Point(62, 161) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(176, 54) Me.Button1.TabIndex = 0 Me.Button1.Text = "Test!" Me.Button1.UseVisualStyleBackColor = True ' 'NumericUpDown1 ' Me.NumericUpDown1.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.NumericUpDown1.Font = New System.Drawing.Font("微软雅黑", 15.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.NumericUpDown1.Location = New System.Drawing.Point(62, 93) Me.NumericUpDown1.Name = "NumericUpDown1" Me.NumericUpDown1.Size = New System.Drawing.Size(176, 34) Me.NumericUpDown1.TabIndex = 2 Me.NumericUpDown1.Value = New Decimal(New Integer() {100, 0, 0, 0}) ' 'Label1 ' Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("微软雅黑", 15.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Label1.Location = New System.Drawing.Point(60, 41) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(146, 27) Me.Label1.TabIndex = 3 Me.Label1.Text = "Stream length" ' 'Button2 ' Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Button2.Font = New System.Drawing.Font("微软雅黑", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Button2.Location = New System.Drawing.Point(62, 252) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(176, 54) Me.Button2.TabIndex = 4 Me.Button2.Text = "Back to home" Me.Button2.UseVisualStyleBackColor = True ' 'MenuStrip1 ' Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.FileToolStripMenuItem, Me.ModeToolStripMenuItem, Me.HelpToolStripMenuItem, Me.AboutToolStripMenuItem}) Me.MenuStrip1.Location = New System.Drawing.Point(0, 0) Me.MenuStrip1.Name = "MenuStrip1" Me.MenuStrip1.Size = New System.Drawing.Size(299, 24) Me.MenuStrip1.TabIndex = 5 Me.MenuStrip1.Text = "MenuStrip1" ' 'FileToolStripMenuItem ' Me.FileToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TestToolStripMenuItem, Me.BackToHomeToolStripMenuItem, Me.QuitToolStripMenuItem}) Me.FileToolStripMenuItem.Name = "FileToolStripMenuItem" Me.FileToolStripMenuItem.Size = New System.Drawing.Size(38, 20) Me.FileToolStripMenuItem.Text = "File" ' 'TestToolStripMenuItem ' Me.TestToolStripMenuItem.Name = "TestToolStripMenuItem" Me.TestToolStripMenuItem.Size = New System.Drawing.Size(150, 22) Me.TestToolStripMenuItem.Text = "Start Test" ' 'BackToHomeToolStripMenuItem ' Me.BackToHomeToolStripMenuItem.Name = "BackToHomeToolStripMenuItem" Me.BackToHomeToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.BackToHomeToolStripMenuItem.Text = "Back to Home" ' 'QuitToolStripMenuItem ' Me.QuitToolStripMenuItem.Name = "QuitToolStripMenuItem" Me.QuitToolStripMenuItem.Size = New System.Drawing.Size(150, 22) Me.QuitToolStripMenuItem.Text = "Quit" ' 'ModeToolStripMenuItem ' Me.ModeToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.SimpleToolStripMenuItem, Me.TimeToolStripMenuItem, Me.ExpectedBPMToolStripMenuItem}) Me.ModeToolStripMenuItem.Name = "ModeToolStripMenuItem" Me.ModeToolStripMenuItem.Size = New System.Drawing.Size(51, 20) Me.ModeToolStripMenuItem.Text = "Mode" ' 'SimpleToolStripMenuItem ' Me.SimpleToolStripMenuItem.Enabled = False Me.SimpleToolStripMenuItem.Name = "SimpleToolStripMenuItem" Me.SimpleToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.SimpleToolStripMenuItem.Text = "Simple" ' 'TimeToolStripMenuItem ' Me.TimeToolStripMenuItem.Name = "TimeToolStripMenuItem" Me.TimeToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.TimeToolStripMenuItem.Text = "Time" ' 'ExpectedBPMToolStripMenuItem ' Me.ExpectedBPMToolStripMenuItem.Name = "ExpectedBPMToolStripMenuItem" Me.ExpectedBPMToolStripMenuItem.Size = New System.Drawing.Size(152, 22) Me.ExpectedBPMToolStripMenuItem.Text = "Expected BPM" ' 'HelpToolStripMenuItem ' Me.HelpToolStripMenuItem.Name = "HelpToolStripMenuItem" Me.HelpToolStripMenuItem.Size = New System.Drawing.Size(45, 20) Me.HelpToolStripMenuItem.Text = "Help" ' 'AboutToolStripMenuItem ' Me.AboutToolStripMenuItem.Name = "AboutToolStripMenuItem" Me.AboutToolStripMenuItem.Size = New System.Drawing.Size(53, 20) Me.AboutToolStripMenuItem.Text = "About" ' 'Simple ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(299, 335) Me.Controls.Add(Me.Button2) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.NumericUpDown1) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.MenuStrip1) Me.MainMenuStrip = Me.MenuStrip1 Me.MaximizeBox = False Me.Name = "Simple" Me.Text = "Simple Stream Test" CType(Me.NumericUpDown1, System.ComponentModel.ISupportInitialize).EndInit() Me.MenuStrip1.ResumeLayout(False) Me.MenuStrip1.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Button1 As System.Windows.Forms.Button Friend WithEvents NumericUpDown1 As System.Windows.Forms.NumericUpDown Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents Button2 As System.Windows.Forms.Button Friend WithEvents MenuStrip1 As System.Windows.Forms.MenuStrip Friend WithEvents FileToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents QuitToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ModeToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents SimpleToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents TimeToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ExpectedBPMToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents HelpToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents AboutToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents TestToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents BackToHomeToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem End Class