提示：对象未实例化
Static dropDownHost As Windows.Forms.ToolStripControlHost
Static dropDown As Windows.Forms.ToolStripDropDown
If dropDownHost Is Nothing Then
dropDownHost = New Windows.Forms.ToolStripControlHost(Forms("成品产品管理").Controls("Panel1").BaseControl)
dropDown = New Windows.Forms.ToolStripDropDown
dropDown.Items.Add(dropDownHost)
End If
Dim point As Point = Forms("成品产品管理").BaseForm.PointToScreen(Forms("成品产品管理").Controls("Button2").BaseControl.Bounds.Location)
point.Y += 36
'point.X += 500
dropDown.Show(point)
加好友 
发短信
Post By：2014/7/24 8:39:00 [显示全部帖子]
