vb题求答案 任意改变文本的字号。要求利用滚动条和标签控件实现对标签字体大小的任意改变,如图2.4.8所示。提示:  ①

vb题求答案

任意改变文本的字号。要求利用滚动条和标签控件实现对标签字体大小的任意改变,如图2.4.8所示。
提示:
  ①将滚动条的Min、Max分别设置为字号的最小值和最大值;
  ②当拖动滑块时,字体取原来值,字号跟着变化。
 


七月忧伤 1年前 已收到1个回答 举报

oiomailzjw 幼苗

共回答了18个问题采纳率:94.4% 举报

Private Sub HScrollBar1_Scroll(sender As Object, e As ScrollEventArgs) Handles HScrollBar1.Scroll
Label1.Text = Str(HScrollBar1.Value) + " 号字"
Label1.Font = New System.Drawing.Font(Label1.Font.Name, HScrollBar1.Value)
End Su

1年前

24
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 0.092 s. - webmaster@yulucn.com