在一个窗体上有两个命令按钮,cmdMax 和 cmdMin。单击cmdMax时,窗体上显示“字体由小变大”,字号每次增加2;单击cmdMin时,窗体上显示“字体由大变小”,字号每次减小2。请填空。   Private Sub Form_Load()    

admin2009-01-15  42

问题 在一个窗体上有两个命令按钮,cmdMax 和 cmdMin。单击cmdMax时,窗体上显示“字体由小变大”,字号每次增加2;单击cmdMin时,窗体上显示“字体由大变小”,字号每次减小2。请填空。
  Private Sub Form_Load()
    Forml.Caption =“字体变化示范”
    cmdMax.Caption=“字体变大”
    cmdMin.Caption=“字体变小”
  End Sub
  Private Sub cmdMax_Click()
  【  】
    Forml.Print”字体由小变大”
  End Sub
  Private Sub cmdMin_Click()
  【  】
     Forml.Print“字体由大变小”
  End Sub

选项

答案Form1.FontSize=Form1.FontSize + 2 , Form1.FontSize = Form1.FontSize - 2

解析 决定字体大小的是FontSize属性,所以要改变字体的大小需要改变FontSize的值。cradMax按钮的作用是单击cmdMax时,窗体上显示“字体由小变大”,字号每次增加2,所以第一个空应填入的是Form1.FontSize = Form1.FontSize + 2;cmdMin按钮的作用是单击cmdMin时,窗体上显示“字体由大变小”,字号每次减小2,所以第二个空填入的是Form1.FontSize = Form1.FontSize - 2。
转载请注明原文地址:https://jikaoti.com/ti/qu80FFFM
0

最新回复(0)