Private Sub Command1_Click()
C.ommon Dialog1.Cancel Error=True
C.ommon Dialog1.Flags=3
On Error Resume Next
C.ommon Dialog1.ShowFont
Text1.Font.Name=CommonDialog1.FontName
Text1.Font.Size=CommonDialog1.FontSize
Text1.Font.Bold=CommonDialog1.FontBold
Text1.Font.Italic=CommonDialog1.FontItalic
Text1.Font.Underline=CommonDialog1.FontUndeline
Text1.FontStrikethru=CommonDialog1.FontStrikethru
Text1.ForeColor=CommonDialog1.Color
E.nd Sub
A.Text1的字体不发生变化
B.Text1的字体发生变化
C.Text1的字体和颜色发生变化
D.程序出错
[单选题](32)下列程序的功能是调用字体对话框来设置文本框中的字体,单击Command1按钮弹出对话框,进行相应的字体,字号等的设置,然后单击“确定”按钮退出对话框,则将发生哪些变化。 Private Sub Commandl_Click() CommandDialog1.CancelError=True CommandDialog1.Flags=3 On Error Resume Next CommandDialog1.ShowFout Txet1.Font.Name=CommandDialog1.F
[单选题]下列程序的功能是:调用字体对话框来设置文本框中的字体,单击C。mmand1按钮弹出对话框,进行相应的字体、字号等的设置,然后单击“确定”按钮退出对话框,则将发生哪些变化( )。 Private Sub Command1_Click() CommonDialog1.CancelError=True CommonDialog1.Flags=3 On Error Resume Next CommonDialog 1.ShowFont Text1.Font.Name=CommonDialog1.Font
[问答题] 用属性窗口中“字体”对话框设置文本框的字体,要求字体对话框内出现删除线、下划线,并可控制颜色元素。
[填空题] 在某文本框设置动作方法是:单击该文本框,选()菜单的()命令,在弹出的对话框中单击“单击鼠标”卡片,选中“超级链接到”项.并指定链接。
[单选题]如果要利用“设置文本框格式”对话框改变文本框大小,应在对话框中单击()标签。A . 大小B . 文本框C . 位置D . 图片
[单选题]将通用对话框Commondialog1的类型设置为"字体"对话框,可调用对话框的( )方法A.ShowOpenB.ShowSaveC.ShowColorD.ShowFont
[单选题]在字体对话框中不能设置( )A.字体B.字号C.字符间距D.文字样式
[单选题]已知通用对话框名为Cdlg,则执行下列的______语句,将弹出“字体”对话框。A.Cdlg. Action=6B.Cdlg. Action=5C.Cdlg. Action=4D.Cdlg.Action=3
[填空题] 在“页码”对话框中,单击()按钮,将弹出“页码格式”对话框,使用户可以设置起始页号和页码格式。
[单选题]在“字体”对话框中,选中要删除的字体,然后按()按钮。A .ADDB .CANCELC .REMOVED . D.HELP