Private Sub HScroll1_Change() Label1.FontSize = HScroll1.Value End Sub
补充:VB , 基础类
上一个:求 毕业设计之仓储管理下一个:VB:mschart画条形图X轴显示数据问题