Question

VB字体还原的问题。

程序运行后，单击“放大”按钮，标签显示的文字放大3倍，单击“加粗”按钮，文字加粗，单击“下划线”，文字加下划线，单击“还原”，文字格式回到初始状态。
请问还原的命令怎么编写？？
Label1.font

Answer 1

private sub command1_click() '放大
label1.fontsize=label1.fontsize*3
end sub
private sub command2_click() '加粗
label1.FontBold=true
end sub
private sub command3_click() '下划线
label1.FontUnderline =true
end sub

private sub command4_click() '还原
label1.fontsize=label1.fontsize/3
label1.FontBold=false
label1.FontUnderline =false
end sub