上机难点类型题汇总和VBA代码

类型题: 1 、要求引用窗体对象"fTest" 上控件"tSex" 的值。条件行中输入: [Forms]![fTest]![tSex] 2 、查找并显示有书法或绘画爱好学生。条件行中输入: Like "* 书法*" Or Like "* 绘画*" 3 、查找姓"王" 病人的基本信息。条件行中输入: Like "王*" 4 、姓名含有"红" 字的记录。条件行中输入: Like "*红*" 5 、姓"李" 且名字第三字为"明" 的记录。条件行中输入: L ike "李?明" 6 、查找并显示入校时间非空的。条件行中输入: Is Not Null 7 、查找并显示简历信息为空的。条件行中输入: Is Null 8 、年龄为偶数的。条件行中输入: [ 年龄] Mod 2 =0 9 、年龄为奇数的。条件行中输入: [ 年龄] Mod 2 <>0 或[ 年龄] Mod 2 =1 10 、当运行该查询时,应显示参数提示信息" 请输入爱好" ,输入爱好后,在简历字段中查找具有指定爱好的学生。条件行中输入: Like "*"+[ 请输入爱好]+"*" 11 、当运行该查询时,屏幕上显示提示信息: " 请输入要比较的分数: ",输入要比较的分数后, 该查询查找学生选课成绩的平均分大于输入值的学生信息。条件行中输入: >[ 请输入要比较的分数: ] 12、" 编号" 字段值均在前面增加"05" 两个字符。更新到中输入: "05" &[ 编号] 13 、将所有记录的" 年龄" 字段加 1。更新到中输入: [ 年龄]+1 14 、将其中的" 编号"与" 姓名" 两个字段合二为一,字段标题为" 管理人员"。字段行中输入:管理人员:[ 编号]+[ 姓名] 15 、添加一个计算字段" 优惠后价格" ,计算公式为:优惠后价格= 费用*( 1-10% ) 字段行中输入:优惠后价格:[ 费用]* (1-0.1)