( 14 )窗体中有两个命令按钮: “ 显示 ” (控件名为 cmdDisplay )和 “ 测试 ” (控件名为 cmdTest ) 。 以下事件过程的功能是:单击 “ 测试 ” 按钮时,窗体上弹出一个消息框。如果单击消息框的 “ 确定 ” 按钮 ,隐藏窗体上的 “ 显示 ” 命令按钮;单击 “ 取消 ” 按钮关闭窗体。按照功能要求,将程序补充完整。Private Sub cmdTest_Click()Answer= 【 14 】 ( “ 隐藏按钮 ” , vbOKCancel )If Answer=vbOK ThencmdDisplay.Visible= 【 15 】ElseDocmd.CloseEnd IfEnd Sub

( 14 )窗体中有两个命令按钮: “ 显示 ” (控件名为 cmdDisplay )和 “ 测试 ” (控件名为 cmdTest ) 。 以下事件过程的功能是:单击 “ 测试 ” 按钮时,窗体上弹出一个消息框。如果单击消息框的 “ 确定 ” 按钮 ,隐藏窗体上的 “ 显示 ” 命令按钮;单击 “ 取消 ” 按钮关闭窗体。按照功能要求,将程序补充完整。

Private Sub cmdTest_Click()

Answer= 【 14 】 ( “ 隐藏按钮 ” , vbOKCancel )

If Answer=vbOK Then

cmdDisplay.Visible= 【 15 】

Else

Docmd.Close

End If

End Sub


相关考题:

( 12 )窗体中有两个命令按钮: “ 显示 ” (控件名为 cmdDisplay )和 “ 测试 ” (控件名为 cmdTest ) 。 当单击 “ 测试 ” 按钮时 , 执行的事件功能是 : 首先弹出消息框 , 若单击其中的 “ 确定 ” 按钮 , 则隐藏窗体上的 “ 显示 ” 按钮:否则直接返回到窗体中。请在空白处填入适当的语句,使程序可以完成指定的功能。Private Sub cmdTest Click ( )Answer= 【 12 】( “ 隐藏按钮? ” , vbOKCancel+vbQuestion, “ Msg ” )If Answer=vbOK ThenMe{cmdDisplay.Visible= 【 13 】End IfEnd Sub

考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计好表对象“。tSmd”,同时还设计出窗体对象“fStud”和子窗体对象“fDetail”。请在此基础上按照以下要求补充“fStud”窗体的设计:(1)将窗体标题改为“学生查询”。(2)将窗体的边框样式改为“细边框”,取消窗体中的水平和垂直滚动条、记录选定器、浏览按钮(导航按钮)和分隔线;将子窗体边框样式改为“细边框”,取消子窗体中的记录选定器、浏览按钮(导航按钮)和分隔线。(3)在窗体中有两个标签控件,名称分别为“Label1”和“Label2”,将这两个标签上的文字颜色改为白色,背景颜色改为紫蓝色(紫蓝色代码为8388608)。(4)将窗体主体节中控件的Tab键次序改为:“Cltem”→“TxtDctail”→“CmdRefer”→“CmdList”→“CmdClear”→“tDetail”→“简单查询”→“Framel8”。(5)按照以下窗体功能,补充事件代码设计。在窗体中有一个组合框控件和一个文本框控件,名称分别为“CItem”和”TxtDetail”;有两个标签控件,名称分别为“Label3”和“Ldetail”;还有三个命令按钮,名称分别为“CmdList”、“CmdRefer”和“CmdClear”。在“CItem”组合框中选择某一项目后,“Ldetail”标签控件将显示出所选项目名加上“内容:”。在“TxtDetail”文本框中输入具体项目值后,单击“CmdRefer”命令按钮,如果“CItem”和“TxtDetail”两个控件中均有值,则在子窗体中显示找出的相应记录,如果两个控件中不全有值,显示消息框,消息框标题为“注意”,提示文字为“查询项目和查询内容不能为空!!!”,消息框中只有一个“确定”按钮;单击“CmdList”命令按钮,在子窗体中显示“tStud”表中的全部记录;单击“CmdClear”命令按钮,将“Cltem”和“TxtDetail”两个控件中的值清空。注意:不允许修改窗体对象“fSmd”和子窗体对象“fDetail”中未涉及的控件、属性和任何VBA代码;不允许修改表对象“tStud”。代码设计只允许在“****Add*****”与“*****Add*****”之间的空行内补充一条语句、完成设计,不允许增删和修改其他位置已存在的语句。

考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计好窗体对象“fStaff”。试在此基础上按照以下要求补充窗体设计:(1)在窗体的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显示为“员工信息输出”。(2)在主体节区位置添加一个选项组控件,将其命名为“opt”,选项组标签显示内容为“性别”,名称为“bopt”。(3)在选项组内放置2个单选按钮控件,选项按钮分别命名为"opt1”和"opt2”,选项按钮标签显示内容分别为“男”和“女”,名称分别为“boptl”和“bopt2”。(4)在窗体页脚节区位置添加两个命令按钮,分别命名为“bOk”和“bQuit”,按钮标题分别为“确定”和“退出”。(5)将窗体标题设置为“员工信息输出”。注意:不允许修改窗体对象“fStaff”中已设置好的属性。

设计名为“mysupply”的表单。表单的标题为“零件供应情况”。表单中有一个表格控件和两个命令按钮“查询”和“退出”。 运行表单时,单击“查询”命令按钮后,表格控件中显示工程号“J1”所使用的零件的零件名、颜色和重量。单击“退出”按钮关闭表单。

窗体中有两个命令按钮:“显示”(控件名为cmdDisplay)和“测试”(控件名为cmdTest)。以下事件过程的功能是:单击“测试”按钮时,窗体上弹出一个消息框。如果单击消息框的“确定”按钮,隐藏窗体上的“显示”命令按钮;单击“取消”按钮关闭窗体。按照功能要求,将程序补充完整。 Private Sub cmdTest_Click()Answer= (“隐藏按钮”,vbOKCancel)If Answer=vbOK ThencmdDisplay.Visible=ElseDocmd.CloseEnd IfEnd Sub

设计名为mysupply的表单(表单的控件名和文件名均为mysupply)。表单的标题为“零件供应情况”。表单中有一个表格控件和两个命令按钮“查询”(名称为Command1)和“退出” (名称为Command2)。运行表单时,单击“查询”命令按钮后,表格控件(名称grid1)中显示了工程号“J4”所使用的零件的零件名、颜色和重量。单击“退出”按钮关闭表单。

窗体上有两个按钮:显示(cmdshow)按钮和测试按钮(cmdtest),显示按钮初始状态不可见,当单击测试按钮,弹出一个消息框,包括“确定”和“取消”按钮,若单击“确定”则显示“显示”按钮,若单击“取消”则关闭窗体。试将程序补充完整。Private sub cmdtest_click( )answer = msgbox ( "显示按钮", vbOkCancel)If answer = vbOK thencmdshow. visible = 【 】Elsedocmd. closeEnd IfEnd sub

设计一个文件名和表单名均为“bdl”的表单。表单的标题为“外汇持有情况”。表单中有一个选项按钮组控件、一个表格控件及两个命令按钮“查询”和“关闭”。其中,选项按钮组控件有3个按钮“美元”、“英镑”和“港币”。运行表单时,在选项组控件中选择“美元”、“英镑”和“港币”,单击“查询”命令按钮后,根据选项组控件的选择将“外汇账户”表的情况显示在表格控件中。单击“关闭”按钮,关闭并释放表单。

对考生文件夹下的“产品”数据库及其中的“产品”表和“零件”表建立如下表单:设计名为“bd2”的表单。表单的标题为“零件装配情况”。表单中有一个表格控件和两个命令按钮“查询”和“关闭”。运行表单时,单击“查询”命令按钮后,表格控件中显示了使用零件编号为“000005”的产品的所有信息。单击“关闭”按钮关闭表单。

设计名为“bd1”的表单。表单标题为“学习情况浏览”。表单中有一个选项组控件、一个表格、两个命令按钮“成绩查询”和“关闭”。其中,选项组控件有两个按钮“升序”和“降序”。根据选择的选项组控件,将选修了“VFP入门”的学生的“学号”、“姓名”和“成绩”按成绩排序显示到表格中并存入“result.dbf”文件中。

设计名为my的表单。表单标题为“学习情况浏览”。表单中有1个选项组控件(名为myop)、2个命令按钮“成绩查询”和“关闭”。其中,选项组控件有两个按钮“升序”和“降序”。根据选择的选项组控件,将选修了“数据结构”的学生的“学号”和“成绩”分别存入new1. dbf和new2.dhf文件中。

在名为From1的窗体上绘制一个名为Drive1的DriveListBox控件,一个名为Dir1的 DirListBox控件和一个名为File1的FileListBox控件。编写适当的事件过程,使程序运行时,可以对系统中的文件进行浏览;当双击File1中的文件名时,用MsgBox显示文件名(不显示路径名)。如下图所示。注意:程序中不得使用任何变量;文件必须存放在考生文件夹中, 窗体文件名为 execise11.frm,工程文件名为execise11.vbp。

在窗体中有一个名为(Command1的命令按钮,Click事件的代码如下:单击命令按钮后,标签显示的结果是( )。

窗体中有两个命令铵钮:“显示”(控件名为cmdDisplay)和“测试”(控件名为cmdTest)。当单击“测试”按钮时,执行的事件功能是:首先弹出消息框,若单击其中的“确定”按钮,则隐藏窗体上的“显示”按钮;否则直接返回到窗体中。请在空白处填入适当的语句,使程序可以完成指定的功能。Private Sub cmdTest_Click()Answer=【 】 ("隐藏按钮?",vbOKCancel+vbQuestion,"Msg")If Answer=vbOK ThenMe!cmdDisplay.Visible=【 】End IfEnd Sub

某窗体中有如图所示的各种控件:该窗体上没有______ 控件。A.文本框B.框架C.命令按钮D.复选框

考生文件夹下存在一个数据库文件“samp3.mdb”,里面已经设计好窗体对象“frest”及宏对象“ml”。试在此基础上按照以下要求补充窗体设计:(1)在窗体的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显示为“窗体测试样例”。(2)在窗体主体节区内添加2个复选框控件,复选框选项按钮分别命名为“optl”和“opt2”,对应的复选框标签显示内容分别为“类型a”和“类型b”,标签名称分别为“boptl”和“bopt2”。(3)分别设置复选框选项按钮optl和opt2的“默认值”属性为假值。(4)在窗体页脚节区位置添加一个命令按钮,命名为“bTest”,按钮标题为“测试”。(5)设置命令按钮bTest的单击事件属性为给定的宏对象ml。(6)将窗体标题设置为“测试窗体”。注意:不允许修改窗体对象iTest中未涉及的属性;不允许修改宏对象ml。

在名为Form1的窗体上建立两个命令按钮,名称分别为Cmd1和Cmd2,标题分别为“命令按钮1”和“命令按钮2”。要求程序运行后,若单击“命令按钮2”按钮,则把“命令按钮1”按钮移到“命令按钮2”按钮上,使两个按钮重合。运行结果如下图所示。注意:在程序中不得使用任何变量(必须通过属性设置来移动控件);文件必须存放在考生文件夹中,窗体文件名为execise102.frm,工程文件名为execise102.vbp。

设计一个名为“bd2”的表单,表单的标题为“零件装配情况”。表单中有一个表格控件和两个命令按钮“查询”和“关闭”。运行表单时,单击“查询”命令按钮后,要求表格中显示产品编号“0003”所使用的零件的零件名称、规格和数量。单击“关闭”按钮关闭表单。

在窗体上画3个单选按钮,组成一个名为chkOption的控件数组。用于标识各个控件数组元素的参数是______。A.TagB.IndexC.ListIndexD.Name

在窗体中添加一个命令按钮(名为Commandl)和一个文本框(名为textl),编写如下事件过程:打开窗体运行后,单击命令按钮,文本框中显示的内容是__________。

在窗体中有一个命令按钮控件,当用户单击命令按钮时,将进入另一个窗体,则应设置该控件的()属性。

假设窗体中有1个命令按钮控件,当单击该命令按钮时,将弹出另一个窗体,则应设置该控件的()A、格式属性B、数据属性C、事件属性D、其它属性

下列对象中没有焦点属性的是()A、命令按钮控件B、窗体控件C、单选框控件D、文本框控件

可以在窗体中进行数据输入的控件是()A、标签控件B、文本框控件C、命令按钮控件D、图像控件

单选题在窗体上画三个单选按钮,组成一个名为chkOption的控件数组。用于标识各个控件数组元素的参数是()。ATagBIndexCListIndexDName

填空题在窗体中有一个命令按钮控件,当用户单击命令按钮时,将进入另一个窗体,则应设置该控件的()属性。

单选题假设窗体中有1个命令按钮控件,当单击该命令按钮时,将弹出另一个窗体,则应设置该控件的()A格式属性B数据属性C事件属性D其它属性