[试题]

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

Private Sub Form_Load()

F.orm1.Caption="字体变化示范"

cmdMax.Caption="字体变大"

cmdMin.Caption="字体变小"

E.nd Sub

Private Sub cmdMax_Click()

(9)

F.orm1.Print "字体由小变大"

E.nd Sub

Private Sub cmdMin_Click()

(10)

F.orm1.Print "字体由大变小"

E.nd Sub

参考答案与解析:

相关试题

在一个工程中有两个窗体,窗体Form1上有一个命令按钮Disp,单击该按钮,Fo

[主观题]在一个工程中有两个窗体,窗体Form1上有一个命令按钮Disp,单击该按钮,Form1窗体隐藏,显示Form2窗体,程序如下,请补充完整。Private Sub Disp_Click ()Me.HideF.orm2. (10)E.nd Sub

  • 查看答案
  • 新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击

    [试题]新建一个工程,内有两个窗体,窗体Form1上有一个命令按钮Command1,单击该按钮,Form1窗体消失,显示Form2窗体,程序如下:Private Sub Command1_Click()(6)F.orm2. (7)E.nd Sub试补充完整。

  • 查看答案
  • 在窗体上有个命令按钮,然后编写如下事件过程程序运行后,单击命令按钮,先后在两个输

    [单选题]在窗体上有个命令按钮,然后编写如下事件过程程序运行后,单击命令按钮,先后在两个输入框中分别输入”1”和”5”,则输出结果为A.1B.51C.6D.15

  • 查看答案
  • 窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出

    [单选题]窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4,5) Fork=1 To 4 s=s+a(k) Next k Print s End Sub A.10 B.14 C.15 D.120

  • 查看答案
  • 窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出

    [单选题]窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。Private Sub Command1_Click()D.im aa=Array(1,2,3,4,5)F.or k=1 To 4S=s+a(k)Next kPrint sE.nd SubA.10B.14C.15D.120

  • 查看答案
  • 窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出

    [单选题]窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是( )。 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4, 5) Fork= 1 To 4 s=s+a(k) Next k Print s End SubA.10B.14C.15D.120

  • 查看答案
  • 窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出

    [单选题]窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是。Private Sub Command1_Click()Dim aa = Array(1,2,3,4,5)For K = 1 To 4 S = S + a(K)Next K Print SEnd SubA. 10 B. 14 C. 15 D. 120

  • 查看答案
  • 窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出

    [单选题]窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 Private Sub Command1_Click( ) Dim a a = Array(1,2,3,4,5) For k = 1 To4 s=s+a(k) Next Print S End SubA.10B.14C.15D.120

  • 查看答案
  • 窗体上有一个命令按钮,命令按钮的单击事件过程如下:Private Sub Com

    [单选题]窗体上有一个命令按钮,命令按钮的单击事件过程如下: Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 s=s+a(k) Next Print S End Sub 运行程序后,单击命令按钮,输出结果是A.10B.14C.15D.120

  • 查看答案
  • (19)窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按

    [单选题](19)窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是 。 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 S=S+a(k) Next k Print S End SubA.10 B.14 C.15 D.120

  • 查看答案
  • (9)在一个窗体上有两个命令按钮,cmdMax和cmdMin。单击cmdMax时