在窗体上画一个名为Text1的文本框，然后建立一个弹出式菜单，菜单名称为 Textformat，包含“宋体”、“黑体”、“隶书”等3个菜单项，其名称分别为font1、font2和font3，分别用来使Text1中的文字用相应的字体显示。程序运行后，如果用鼠标右键单击文本框，则弹出此菜单。要求：在弹出的菜单中只显示与Text1中字体不同的其他两种字体的菜单项。例如，假定文本框种显示的字体是“宋体”，则弹出的菜单中只有“黑体”和“隶书”两个菜单项(如下图所示)。请填空。 Private Sub font1_ Click（　） Text1. FontName = “宋体” End Sub Private Sub font2 Click（　） Text1. FontName = “黑体” End Sub Private Sub font3 Click（　） Text1. FontName = “隶书” End Sub Private Sub Form_ MouseDown (Button As Integer, Shift As Integer, _ X As Single, Y As Single) If ______ Then If Text1. FontName =“宋体” Then Font1. Visible = Font2. Visible = True Font3. Visible = True ElseIf Text1. FontName= "______ "Then Font1. Visible = True Font2. Visible = False Font3. visible = True ElseIf Text1. FontName =" ______ "Then Font1. Visible = True Font2. Visible = True Font3. Visible = False End If ______ Textformat End If End Sub

题库:计算机等级考试 类型:填空题 时间:2021-06-06 14:32:19 免费下载:《填空》Word试卷

在窗体上画一个名为Text1的文本框，然后建立一个弹出式菜单，菜单名称为 Textformat，包含“宋体”、“黑体”、“隶书”等3个菜单项，其名称分别为font1、font2和font3，分别用来使Text1中的文字用相应的字体显示。程序运行后，如果用鼠标右键单击文本框，则弹出此菜单。要求：在弹出的菜单中只显示与Text1中字体不同的其他两种字体的菜单项。例如，假定文本框种显示的字体是“宋体”，则弹出的菜单中只有“黑体”和“隶书”两个菜单项(如下图所示)。请填空。 Private Sub font1_ Click（　） Text1. FontName = “宋体” End Sub Private Sub font2 Click（　） Text1. FontName = “黑体” End Sub Private Sub font3 Click（　） Text1. FontName = “隶书” End Sub Private Sub Form_ MouseDown (Button As Integer, Shift As Integer, _ X As Single, Y As Single) If ______ Then If Text1. FontName =“宋体” Then Font1. Visible = Font2. Visible = True Font3. Visible = True ElseIf Text1. FontName= "______ "Then Font1. Visible = True Font2. Visible = False Font3. visible = True ElseIf Text1. FontName =" ______ "Then Font1. Visible = True Font2. Visible = True Font3. Visible = False End If ______ Textformat End If End Sub

本题关键词:行为客体,行为主体,个体性,单体文物,单体,核内包含体,个体指数,个体内部,参考个体,个体教育;