从下面的屏幕截图中可以看出,我的自动滚动功能不起作用。我在选项卡中有一个tablelayoutpanel,我在两者上都设置了autoscroll,但都不起作用。
正如这个问题建议的那样,我试图摆脱Dock.Fill(我的对接现在通过设计师设置为无),但这也没有用。 Winform autoscroll not working
有什么建议我可以做些什么来让它在添加新问题时向下滚动?
我在我的case语句中尝试了以下代码,当我对问题D回答是,它只显示0,0作为自动滚动的位置并且不会将其向下移动。
Case "DY"
Dim q As KeyValuePair(Of String, String)
For Each q In Questions
If q.Key = "E" Then
For Each c As Control In Appl1HealthQuestions.Controls
ShowControls(15, 16, 17, cbo)
Next
Appl1TabScrollLayout.AutoScroll = True
Appl1TabScrollLayout.AutoScrollPosition = New Point(Me.AutoScrollPosition.X, Me.AutoScrollPosition.Y - 20)
MessageBox.Show(Applicant1Tab.AutoScrollPosition.ToString)
MessageBox.Show(Appl1TabScrollLayout.AutoScrollPosition.ToString)
Exit For
End If
Next
答案 0 :(得分:0)
我能够找到解决方案:
Case "DY"
Dim q As KeyValuePair(Of String, String)
For Each q In Questions
If q.Key = "E" Then
For Each c As Control In Appl1HealthQuestions.Controls
ShowControls(15, 16, 17, cbo)
Next
Appl1TabScrollLayout.VerticalScroll.Value = Appl1TabScrollLayout.VerticalScroll.Maximum
Exit For
End If
Next
Vertical Scroll.Maximum将滚动移动到窗口底部,显示新控件,这就是我所追求的。