本文共 214 字,大约阅读时间需要 1 分钟。
Private Sub HScroll1_Change()Label1.Caption = "滚动条值为:" & HScroll1.ValueEnd Sub
转载地址:http://isugn.baihongyu.com/