[填空題] 在窗體上畫一個名為Text1的文本框，然后建立一個彈出式菜單，菜單名稱為 Textformat，包含“宋體”、“黑體”、“隸書”等3個菜單項，其名稱分別為font1、font2和font3，分別用來使Text1中的文字用相應的字體顯示。程序運行后，如果用鼠標右鍵單擊文本框，則彈出此菜單。要求：在彈出的菜單中只顯示與Text1中字體不同的其他兩種字體的菜單項。例如，假定文本框種顯示的字體是“宋體”，則彈出的菜單中只有“黑體”和“隸書”兩個菜單項(如下圖所示)。請?zhí)羁铡? 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 ______ ThenIf 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 =" ______ "ThenFont1. Visible = True Font2. Visible = True Font3. Visible = False End If ______ Textformat End If End Sub

Button=2 False 黑體 隸書 PopupMenu