在考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“产品”“供应商”查询对象“按供应商查询”,窗体对象“characterS”和宏对象“打开产品表”“运行查询”“关闭窗口”。试按以下要求完成设计。 窗体“characterS

admin2017-07-04  35

问题 在考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“产品”“供应商”查询对象“按供应商查询”,窗体对象“characterS”和宏对象“打开产品表”“运行查询”“关闭窗口”。试按以下要求完成设计。
窗体“characterS”中有两个文本框,名称分别为“bTxt1”和“bTxt2”,还有一个命令按钮,名称为“bC”。窗体功能为:单击“bC”按钮将“bTxt1”文本框中已输入的字符串反向显示在“bTxt2”文本框中。请按照VBA代码中的指示将代码补充完整。
    注意:不允许修改数据库中的表对象“产品”“供应商”查询对象“按供应商查询”和宏对象“打开产品表”“运行查询”“关闭窗口”;不允许修改窗体对象“characters”中未涉及的控件和属性。程序代码只允许在“**Add*8”与“**Add**”之间的空行内补充一行语句完成设计,不允许增删和修改其它位置已存在的语句。

选项

答案步骤1:在对象导航窗格中右键单击“characterS”窗体,选择右键菜单“设计视图”,进入窗体的设计视图。 步骤2:在<属性表>对话框上方的对象选择器中选中“bC”按钮,单击“事件”选项卡,在“单击”行内选择“事件过程”,单击“代码生成器”按钮,进入到VBA代码编辑界面。 步骤3:在“****Add1****”之间输入: For i=Len(s1)To 1 Step-1 说明,FOR循环变量从s1长度开始,即利用MID函数从s1的最后一位截取,每次循环i-1,即每次截取前一位字符。 步骤4:在“**Add2**”之间输入:Me.bTxt2=s2 说明,使得bTxt2文本框的值为s2字符串,即在bTxt2中显示s2。 步骤5:单击快速访问工具栏中的“保存”按钮,关闭代码窗口。单击<窗体设计工具>选项卡中<视图>命令组的“窗体视图”命令运行窗体,在bTxt1中输入信息单击bC按钮结果如图6-14所示。 [*] 步骤6:关闭窗体,并关闭“samp3.accdb”窗口。

解析
转载请注明原文地址:https://kaotiyun.com/show/NKgp777K
0

最新回复(0)