在一个窗体上有两个命令按钮 cmdMax 和 cmdMin。单击cmdMax时 窗体上显示“字体由小
在一个窗体上有两个命令按钮,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。
相似问题
在Visual Basic 的立即窗口内输人以下语句 X=97 ? Chr$ (X) 在窗门中显示的
在Visual Basic 的立即窗口内输人以下语句 X=97 ? Chr$ (X) 在窗门中显示的结果是【 】。请帮忙给出正确答案和分析,谢谢!
下面程序运行后 单击命令按钮 输出的结果是【 】 Private Sub Commandl_Clic
下面程序运行后,单击命令按钮,输出的结果是【 】 Private Sub Commandl_Click( ) Dim a%(1 To 4) ,b%(2 To 6) ,i%,strl,str2 For
运行下列程序 单击Command1命令按钮后 则在窗体上显示第一行和第二行的结果分别是【 】和【 】
运行下列程序,单击Command1命令按钮后,则在窗体上显示第一行和第二行的结果分别是【 】和【 】。 Private Sub Command1_Click() t=1:x=2:y=3:z=4
为了在运行时将“d:/pic”文件夹下的图形文件“a.jpg”装入图片框Picture1 所使用的语
为了在运行时将“d: pic”文件夹下的图形文件“a jpg”装入图片框Picture1,所使用的语句为【 】。请帮忙给出正确答案和分析,谢谢!
以下程序的功能是在程序运行后 单击命令按钮 输出如下结果: 1 4 7 2 5 8 3 6 9 请完
以下程序的功能是在程序运行后,单击命令按钮,输出如下结果: 1 4 7 2 5 8 3 6 9 请完善以下程序。 Private Sub Command1_Click() Dim A
