窗体上有两个按钮:显示(cmdshow)按钮和测试按钮(cmdtest),显示按钮初始状态不可见,当单击测试按钮,弹出一个消息框,包括“确定”和“取消”按钮,若单击“确定”则显示“显示”按钮,若单击“取消”则关闭窗体。试将程序补充完整。Private sub cmdtest_click( )answer = msgbox ( "显示按钮", vbOkCancel)If answer = vbOK thencmdshow. visible = 【 】Elsedocmd. closeEnd IfEnd sub
窗体上有两个按钮:显示(cmdshow)按钮和测试按钮(cmdtest),显示按钮初始状态不可见,当单击测试按钮,弹出一个消息框,包括“确定”和“取消”按钮,若单击“确定”则显示“显示”按钮,若单击“取消”则关闭窗体。试将程序补充完整。
Private sub cmdtest_click( )
answer = msgbox ( "显示按钮", vbOkCancel)
If answer = vbOK then
cmdshow. visible = 【 】
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
窗体中有两个命令按钮:“显示”(控件名为cmdDisplay)和“测试”(控件名为cmdTest)。以下事件过程的功能是:单击“测试”按钮时,窗体上弹出一个消息框。如果单击消息框的“确定”按钮,隐藏窗体上的“显示”命令按钮;单击“取消”按钮关闭窗体。按照功能要求,将程序补充完整。 Private Sub cmdTest_Click()Answer= (“隐藏按钮”,vbOKCancel)If Answer=vbOK ThencmdDisplay.Visible=ElseDocmd.CloseEnd IfEnd Sub
窗体上有退出(cmdexit)按钮和测试按钮(cmdtest)以及一个文本框txt,当单击测试按钮时,弹出一个消息框,消息框中包括“确定”和“取消”按钮,若单击“确定”按钮则在文本框中显示“显示”,若单击“取消”按钮则在文本框中显示“取消”。单击退出按钮关闭窗体。试将程序补充完整。Private sub cmdtest_click()answer=msgbox("显示钮按", vbOkCancel)If 【 】 thentxt="显示"Elsetxt="取消"End IfEnd subPrivate sub cmdexit_click()【 】End sub
窗体上有三个按钮Command1、Command2和Command3,如以下代码所示,该程序的功能是______。Private Sub Command1_ Click() CommandEnabled=False CommandVisible =FalseEnd SubA.当单击按钮Command1时,按钮2和按钮3都不可用B.当单击按钮Command1时,按钮2和按钮3都不可见C.当单击按钮Command1时,按钮2不可用和按钮3不可见D.当单击按钮Command1时,按钮2不可见和按钮3不可用
窗体上有3个按钮Commandl、Command2和Command3,如以下代码: Private Sub Commandl Click() Command2.Enabled:Fal3e Command3.Vi3ible=Fal3e End Sub 该程序的功能是 ( )A.当单击按钮Command1时, Command2和Command3按钮不可用B.当单击按钮Command1时, Command2和Command3按钮不可见C.当单击按钮Command1时, Cammand2按钮不可用和Command3按钮不可见D.当单击按钮Command1时, Command2按钮不可见和Command3按钮不可用
窗体中有两个命令铵钮:“显示”(控件名为cmdDisplay)和“测试”(控件名为cmdTest)。当单击“测试”按钮时,执行的事件功能是:首先弹出消息框,若单击其中的“确定”按钮,则隐藏窗体上的“显示”按钮;否则直接返回到窗体中。请在空白处填入适当的语句,使程序可以完成指定的功能。Private Sub cmdTest_Click()Answer=【 】 ("隐藏按钮?",vbOKCancel+vbQuestion,"Msg")If Answer=vbOK ThenMe!cmdDisplay.Visible=【 】End IfEnd Sub
对考生目录下的数据库“school”建立文件名为“bd2”的表单。表单含有一个表格控件,用于显示用户查询的信息;表单上有一个按钮选项组,含有“课程信息”、“学生信息”和“成绩信息”3个选项按钮;表单上有两个命令按钮,标题为“浏览”和“关闭”。选择“课程信息”选项按钮并单击“浏览”按钮时,在表格中显示“course”表的“课程编号”、“课程名称”字段;选择“学生信息”选项按钮并单击“浏览”按钮时,表格中显示“student”表的“学号”、“姓名”、“性别”和“出生日期”字段;选择“成绩信息”选项按钮并单击“浏览”按钮时,表格中显示“姓名”、“课程名称”及该生该门课的“成绩”。单击“关闭”按钮退出表单。
( 14 )窗体中有两个命令按钮: “ 显示 ” (控件名为 cmdDisplay )和 “ 测试 ” (控件名为 cmdTest ) 。 以下事件过程的功能是:单击 “ 测试 ” 按钮时,窗体上弹出一个消息框。如果单击消息框的 “ 确定 ” 按钮 ,隐藏窗体上的 “ 显示 ” 命令按钮;单击 “ 取消 ” 按钮关闭窗体。按照功能要求,将程序补充完整。Private Sub cmdTest_Click()Answer= 【 14 】 ( “ 隐藏按钮 ” , vbOKCancel )If Answer=vbOK ThencmdDisplay.Visible= 【 15 】ElseDocmd.CloseEnd IfEnd Sub
在窗体上添加2个按钮。单击 按钮1,可使该按钮移动到窗体左上角,再次单击,则“按钮1”回到初始位置。单击按钮2,可使该按钮长度和宽度扩大到原来2倍,再次单击则恢复到初始值。界面见题1附件