For X=1 to 2 a=0 For y=1 to X+1 a=a+1 Next y Print a Next X
3个回答
下列程序运行后,输出的结果是（ 2,3）
For X=1 To 2
a =0
For y=1 To x+1
a =a+1
Next y
Print a
Next x
Private Sub Check1_Click()
If Check1.Value = 1 Then
____text1. FontName=“宋体”______________________ (将字体改为宋体)
Else
Text1.Visible = False
End If
End Sub
Private Sub Check2_Click()
___text1.FontiTalic=true_____________ (设置选中斜体,不选则取消斜体设置)
End Sub
Private Sub Check3_Click()
If Check3.Value = 1 Then
____text1._FontSize=16_________________ (设置字号为16)
Else
____text1._FontSize=_12_________________ (设置字号为12)
End If
End Sub
Private Sub Check4_Click()
If Check4.Value = 1 Then
____text1.ForeColor =vbpurple___________________ (设置字体为紫色)
Else
__________text1.ForeColor =vbblack________________ (设置字体为黑色)
End If
End Sub
太湖的?我都找到了...
相关问题
