借这个帖子 再问版主个问题
Private Sub Heater_Flex_ CellButtonClick(sender As Object, e As RowColEventArgs) Handles Heater_Flex.CellButtonClick
MessageBox.Show("3")
If e.Col = 3 And e.Row > 0 Then
CurrentHeater = Heater_Flex(e.Row, 0)
Dim SetPIDWin As PID = New PID()
SetPIDWin.Location = New Point(965 * WidthScale, 30 * HeightScale)
SetPIDWin.Visible = True
Me.Controls.Add(SetPIDWin)
SetPIDWin.tbP.Text = "3"
SetPIDWin.GroupBoxParam.Text = CurrentHeater
If BlnUpPara Then 'update P\I\D\setpoint
RaiseEvent ParaChange()
End If
End If
flexgrid的CellButtonClick事件在新版本中还存在吗，我现在用的是vs2010老版本 |
陕公网安备：61019002000258 |
隐私政策 |
网站地图