在IDE环境中,进行窗体和控件的属性设置,可以在()中进行操作。
A.解决方案资源管理器
B.属性窗口
C.工具箱
D.IDE菜单
A.解决方案资源管理器
B.属性窗口
C.工具箱
D.IDE菜单
A.添加CommandButton控件,并设置属性Font为“确定”
B.添加CommandButton控件,并设置属性Text为“确定”
C.添加CommandButton控件,并设置属性Caption为“确定”
D.添加Label控件,并设置属性Caption为“确定”
其他要求如下: (1)为表单建立数据环境,向数据环境添加S_T表(Cursor1)。 (2)当在“年度”标签微调控件(Spinner1)中选择年度并单击“查询”按钮(Command1)时,则会在下边的表格(Grid1)控件内显示该年度各部门的四个季度的“销售额”和“利润”。指定微调控件上箭头按钮(SpinnerHighValue属性)与下箭头按钮(SpinnerLowValue属性)值范围为2010~1999,缺省值(Value属性)为2003,增量(Imcrement属性)为1。 (3)单击“退出”按钮(Command2)时,关闭表单。 要求: 表格控件的RecordSourceType属性设置为“4-SQL说明”。
在窗体上利用菜单编辑器设计一个主菜单项“菜单控制”(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 【 】mnuDyn(InxID) mnuDyn(InxlD),Calption=mnuc mauDyn(InxID).Visible=True End Sub Private SubmnuDel_Click() Dim i As Integer If【 】Then MsgBox "菜单项已全部被删除" Else Unload mnuDyn(InxID) InxId=InxId-1 End If End Sub