更多"设已经在菜单编辑器中设计了窗体的快捷菜单,其顶级菜单为Bt,取消其“可"的相关试题:
[单项选择]下面是窗体Forml的Crick事件过程,实现运行时每次单击窗体,窗体均向右移动100的是( )。
PrivateSub______
Static Intleft As Integer
Infiefi=Intleft+100
Forml.Left=Intleft
End Sub
A. Forml_Click()
B. Form_Click()
C. Commanl_Click()
D. Commandl_Click()
[单项选择]为了在运行时能显示窗体左上角的控制菜单框(系统菜单),必须______ 。
A. 把窗体的ControlBox属性设置为False
B. 把窗体的ControlBox属性设置为True
C. 把窗体的MaxButton属性设置为False
D. 把窗体的MaxButton属性设置为True
[单项选择]为了在运行时能显示窗体左上角的控制框(系统菜单),必须 ______。
A. 把窗体的ControlBox属性设置为False,其他属性任意
B. 把窗体的ConlrolBox属性设置为True,并且把BorderStyle属性设置为1~3
C. 把窗体的ConlroiBox属性设置为False,同时把BorderStyle属性设置为非0值
D. 把窗体的ControlBox属性设置为True,同时把BorderStyle属性设置为0值
[单项选择]为了在运行时能显示窗体左上角的控制框(系统菜单),可以设置以下哪个属性的值为True( )。
A. ControlBox
B. MinButton
C. MaxButton
D. BorderStyle
[单项选择]当程序运行时,在窗体上单击鼠标,以下哪个事件是窗体不能响应的事件
A. MouseDown
B. MouseUP
C. Load
D. Click
[填空题]在窗体上利用菜单编辑器设计一个主菜单项“菜单控制”(Name属性值为mnuMenu),然后为其设计两个子菜单项“增加菜单”(Name属性值为mnuAdd) 和“减少菜单”(Name属性值为mnuDel),另外设置一个标题为空的菜单项<控件数组),其Name属性值为mnuDyn,Index值为0,Visible属性值为False;然后编写以下程序来实现增加和减少菜单项的功能,完成程序。
Dim Inxld As Integer
Private Sub mnuAdd_Click( )
Dim mnuc As String
mnuc=InputBox("input caption")
InxId;InxId+1
【6】 mnuDyn(InxId)
mnuDyn(Inxld) ,Calption=mnuc
mauDyn(InxId) .Visible=True
End Sub
Private SubmnuDel_Click( )
Dim i As Integer
If 【7】 Then
MsgBox "菜单项已全部被删除"
Else
Unload mnuDyn(InxId)
InxId=InxId-1
End If
End Sub
[单项选择]当程序运行时,在窗体上单击鼠标,以下______ 事件是窗体不会接收到的。
A. MouseDown
B. MouseUp
C. Load
D. Click
[填空题]在窗体上有一个文本框控件,名称为Text1。同时,窗体加载时将设置计时器间隔为1秒,计时器触发事件过程实现在Text1文本框中动态显示当前日期和时间。请将以下程序补充完整。
Private Sub Form_Load( )
Me.TimerInterval=1000
End Sub
Private Sub______
Me! texl=Now( )
End Sub
[单项选择]设在菜单编辑器中定义了一个菜单项,名为menu1。为了在运行时隐藏该菜单项,应在程序中使用的语句是________。
A. menu1.Enabled = True
B. menu1.Enabled = False
C. menu1.Visible = True
D. menu1.Visible = False
[单项选择]假定有一个菜单项,名为Menuhem,为了在运行时使该菜单项失效(变灰),应使用的语句为
A. MenuItem.Enabled=False
B. MenuItem.Enabled=True
C. MenuItem.Visible=True
D. MenuItem.Visible=Flase
[单项选择]假定有一个菜单项,名为Menultem,为了在运行时使该菜单项失效(变灰),应使用的语句为
A. Menultem.Enabled=False
B. Menultem.Enabled=True
C. Menultem.Visible=True
D. Menultem.Visible=False
[单项选择]假定有一个菜单项,名为MenuItem,为了在运行时使该菜单项不可见,应使用的语句为( )。
A. Menultem.Enabled=False
B. MenuItem.Enabled=Trme
C. Menultem.Visible=True
D. MenuItem.Visible=Flase
[单项选择]下列语句用来设置窗体Forml的属性,其中在运行时不能正确操作的语句是
A. Form1.Caption="Form Test"
B. Form1.Name="Form Test"
C. Form1.MaxButton=False
D. Form1.MinButton=False
[单项选择]新建一个窗体,其BorderStyle属性设置为Fixed Single,但运行时却没有“最大化”和“最小化”按钮,可能的原因是
A. Border Style的值设为Fixed.Sinde,此项设置值的作用即禁止“最大化”和“最小化”按钮
B. 窗体的MaxButton和MinButton值设为False
C. 正常情况下新建的窗体都没有“最大化”和“最小化”按钮
D. 该窗体可用鼠标拖动边框的方法改变窗体的大小
[单项选择]假定有一个菜单项,名为MenuItem,为了在运行时使该菜单项失效(变灰),应使用的语句为______。
A. MenuItem. Enabled=False
B. MenuItem. Enabled=True
C. MenuItem. Visible=True
D. MenuItem. Visible=False
[单项选择]设在菜单编辑器中定义了—个菜单项,名为menul。为了在运行时隐藏该菜单项,应使用的语句是 ______。
A. menul.Enabled=True
B. menul.Enabled=False
C. menul.Visible=True
D. menul.Visible=False
[单项选择]在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写
如下事件过程:
Private Sub Command1_Click( )
Text1.Text ="Visual"
Me.Text1 = "Basic"
Text1 = "Program"
End Sub
程序运行后,如果单击命令按钮,则在文本框中显示的是
A. Visual
B. Basic
C. Program
D. 出错
[单项选择]下列语句用来设置窗体Form1的属性,其中在运行时不能正确操作的语句是______。
A. Form1.Captin="Form Test"
B. Form1.Name="Form Test"
C. Form1.MaxButton=False
D. Form1.MinButton=False