在一个窗体上有一个命令按钮 CmdMax。单击CmdMax时 窗体上显示“字体由小变大” 字号每次增
在一个窗体上有一个命令按钮,CmdMax。单击CmdMax时,窗体上显示“字体由小变大”,字号每次增加2。请填空。 Private Sub Form_Load() Form1.Caption=“字体变化示范” CmdMax.Caption=“字体变大” End Sub Private Sub CmdMax_Click() 【 】 Form1.Print“字体由小变大” End Sub
请帮忙给出正确答案和分析,谢谢!
参考解答
正确答案:Form1.FontSize=Form1.FontSize+2
决定字体大小的是FontSize属性,所以要改变字体的大小需要改变FomSize的值。emdMax按钮的作用是单击cmdMax时,窗体上显示“字体由小变大”,字号每次增加2,所以第1个空应填入的是Furm1.FontSize=Form1.FontSize+2;cmdMin按钮的作用是单击cmdMin时,窗体上显示“字体由大变小”,字号每次减小2,所以第2个空填入的是Form1.FontSize=Form1.FontSize=2。
相似问题
要求打开随机文件“c:/Example.txt”文件 文件号为1 实现的语句是【 】。请帮忙给出正确
要求打开随机文件“c: Example txt”文件,文件号为1,实现的语句是【 】。请帮忙给出正确答案和分析,谢谢!
程序如下: Private Sub Form_Click() Const PI=14159 Dim
程序如下: Private Sub Form_Click() Const PI=14159 Dim r As Single,S As Single R=InputBox("请输入圆的半径","输入数据","50") S
下列语句的输出结果是【 】。 Print Format$(1258.6 '000 000.00')请
下列语句的输出结果是【 】。 Print Format$(1258 6, "000,000 00 ")请帮忙给出正确答案和分析,谢谢!
为了使标签能自动调整大小以显示全部文本内容 应将标签的【 】属性设置为True。请帮忙给出正确答案和
为了使标签能自动调整大小以显示全部文本内容,应将标签的【 】属性设置为True。请帮忙给出正确答案和分析,谢谢!
在窗体上有一个名称为Laell的标签和一个名称List1的列表框。程序运行后 在列表框中添加若干列表
在窗体上有一个名称为Laell的标签和一个名称List1的列表框。程序运行后,在列表框中添加若干列表项。当双击列表框中的某个项目时,在标签Label中显示所选
