在窗体上画一个Text1文本框和一个CD1通用对话框控件,并编写下面程序: Private Sub Command1_Click() CD1.Flags = 1 Or 256 CD1.Action = 4 If CD1.Color

admin2018-07-11  27

问题 在窗体上画一个Text1文本框和一个CD1通用对话框控件,并编写下面程序:
Private Sub Command1_Click()
    CD1.Flags = 1 Or 256
    CD1.Action = 4
    If CD1.Color >= 0 Then
        Text1.ForeColor = CD1.Color
    End If
End Sub
运行程序并单击命令按钮,下面叙述中正确的是

选项 A、弹出的是颜色对话框
B、弹出的是打开文件对话框
C、把代码 CD1.Action = 4 改为 CD1.ShowColor 效果是一样的
D、在弹出的对话框中选了一个颜色并单击"确定" 按钮后,会改变文本框中文本的颜色

答案D

解析 通用对话框的Action属性值为4或者ShowFont方法,则弹出对话框为字体对话框,用ShowColor则弹出颜色对话框,故选项A、B、C错误,D项正确。
转载请注明原文地址:https://kaotiyun.com/show/5sFp777K
0

最新回复(0)