怎么更改这个字体呢？
我想要将我这个表决结果上的票数的字体改的大一些，怎么改代码呢？
'绘制直方图
'CurrentX = 2 + 2: CurrentY = Text1.Text '找到绘制“赞同”直方图的起始位置
Line (6240 + 940, 4560 - 0)-(6240 + 1880, 4560 - 100 * 36), Me.BackColor, BF '清除上次同意的直方图
Line (6240 + 940, 4560 - 0)-(6240 + 1880, 4560 - tongyi * 36), vbGreen, BF '绘制“赞同”直方图，如果想要改每次增长的高度可以改36这个值，例：如果要是10人，可将36改为360
CurrentX = 6240 + 1410: CurrentY = 4560 - tongyi * 36 - 200: Print tongyi
Line (6240 + 2820, 4560 - 0)-(6240 + 3760, 4560 - 100 * 36), Me.BackColor, BF '清除上次反对的直方图
Line (6240 + 2820, 4560 - 0)-(6240 + 3760, 4560 - fandui * 36), vbYellow, BF '绘制“反对”直方图
CurrentX = 6240 + 3290: CurrentY = 4560 - fandui * 36 - 200: Print fandui
Line (6240 + 4700, 4560 - 0)-(6240 + 5640, 4560 - 100 * 36), Me.BackColor, BF '清除上次弃权的直方图
Line (6240 + 4700, 4560 - 0)-(6240 + 5640, 4560 - qiquan * 36), vbRed, BF '绘制“弃权”直方图
CurrentX = 6240 + 5170: CurrentY = 4560 - qiquan * 36 - 200: Print qiquan
End Sub
[解决办法]
Form1.Font.Size = 24:Print "大字体"
