填空题 请在下列程序的空格处填入正确的代码,使之实现对标签添加滚动条的功能。在窗体上放置一个图形框,图形框内放置一个标签、一个垂直滚动条。当标签中的文本内容大于图形框显示区域时,可使用垂直滚动标签中的文本内容。要求滚动条最小变化为50,最大变化为100。 Private Sub Form_Load 1 Label1.Top=0 Label1.Left=0 Vscroll1.Max=Label1.Height-Picture1.Height Vscroll1.SmallChange=50 2 If (Label1.Height-Picture1.Height)<=0 Then 3 End Sub Private Sub Vscroll1_Change 4 5 = -Vscroll1.Value End Sub Private Sub Vscroll1_Scroll 6 7 End Sub
  • 1、
【正确答案】 1、Vscroll1.LargeChange=100 VScrolll.Visible=False Label1.Top Label1.Top=-Vscroll1.Value    
【答案解析】