计算机二级Access选择题考点—代码篇

2024-06-16 00:20
文章标签 代码 计算机 access 二级 考点 选择题

本文主要是介绍计算机二级Access选择题考点—代码篇，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

第1题

窗体的事件过程如下:

Private Sub Form MouseDown(Button As Integer ,Shift As integer,X As Single,Y As Single)If Shift = 6 And Button = 2 Then MsgBox "Hello World."End lf
End Sub

程序运行后，要在窗体消息框中显示"Hello World."，在窗体上应执行的操作是(同时按下 Ctr、Alt 键和鼠标右键)。

鼠标事件MouseDown中的Button参数用于判断鼠标操作的是左中右哪个键，可以分别用符号常量acLeftButton(左键1)、acRightButon(右键2)和acMiddleButton(中键4)来比较，本题中的if语句中条件语句Button=2，如果条件成立，那么应该按下鼠标右键；Shift参数用于判断鼠标操作的同时，键盘控制键的操作，可以分别用符号常量acAltMask (Shift键1)、acAItMask(ctrl键2)和acAItMask(AIt键4)来比较，本题中的if语句中条件语句Shift=6，如果条件成立，那么应该按下acAltMask(ctrl键2)和acAItMask(Alt键4)

第2题

假设有选课成绩表score(学号，课程号，成绩等)，查询所选课程在两门以上(含两门)并且所选的课程成绩都在90分以上(含90分)的学号列表，正确的是

SELECT score.学号
FROM score WHERE score.学号 Not In(select 学号 from score where 成绩 < 90)
GROUP BY score.学号
HAVING Count(score.[学号]) >= 2

SELECT语句的一般格式为：

SELECT[ALL | DISTINCT | TOP n]*|<字段列表>[,<表达式>AS<标识符>]
FROM<表名1>[,<表名2>]...
[WHERE<条件表达式>]
[GROUP BY<字段名>[HAVING<条件表达式>]]
[ORDER BY<字段名>[ASC | DESC]];

第3题

假设数据库中有学生信息表 stud(sno，sname，ssex)其中 ssex 字段已建索引，要输出最后一名男同学的信息，程序空白处应填写的语句是

Private Sub Form Load()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.ActiveConnection ="Provider=Microsoft.Jet.OLEDB.4.0;"&"Data Source= e:\考试中心教程\教学管理.mdb;"
rs.CursorType = adOpenKeysetrs
rs.LockType = adLockOptimistic
rs.Index="ssex"
rs.Open "stud",,,,adCmdTableDirect__________Debug.Print rs("sno "), rs("sname "), rs("ssex ")rs.CloseSet rs = Nothing
End Sub

DAO的Seek成员函数是在表类型记录集中基于表索引进行搜索记录，Find成员函数是在动态集类型或快照类型记录集中进行搜索记录。因为本题中性别ssex字段已建索引，因此采用Seek成员函数。AdSeekfirstEQ查找等于关键值的第一个关键字，AdseekLastEQ查找等于关键值的最后一个关键字。

第4题

窗体中有文本框Text1、Text2和Text3。运行程序时，输入整数m和n(n>0)，单击按钮Command1计算下列表达式的值：SUM=m-(m+1)/2+(m+2)/3-(m+3)/4+…+(-1)^(n+1)(m+n-1)/n在Text3给出结果，事件代码如下：

Private Sub Command1_Click()Dim sum As Doublem = Val(me!Text1)n = Val(me!Text2)sum = 0For k = 1 to nsum = sum +【】/ kNext kMe!text3 = sum
End Sub

程序【】处应填写的语句是：llf(kMod2 = 0 , -(m + k - 1) , (m + k - 1))

第5题

窗体中有文本框Text1、Text2和Text3。运行程序时，输入整数m和n(n>0)，单击按钮Command1计算下列表达式的值：SUM=m+(m-1)/2+(m+2)/3+(m-3)/4+…+(m+(-1)^(n+1)(n-1))/n在Text3给出结果，事件代码如下：

Private Sub Command1_Click()Dim sum As Doublem = Val(me!Text1)n = Val(me!Text2)sum = 0For k = 1 to nsum = sum + (【】)/ kNext k
Me!text3 = sum
End Sub

程序【】处应填写的语句是：m + llf(kMod2 = 0 , -k + 1 , k - 1)

第6题

窗体中有文本框Text1。运行程序，输入大于0的整数m，单击按钮Command1，程序显示由星号组成的高度和上底均为m的等腰梯形。事件代码如下：

Private Sub Command1_Click()m= Val(Me!Text1)result = ""For k=1 To mFor n=1 To【】if n< m - k + 1 Thenresult = result & " "Elseresult = result & "*"End lfNext nresult = result + Chr(13)Next kMsgBox result,，"运行结果”
End Sub

程序【 】处应填写的语句是：k + 2 * m - 2

窗体中有文本框Text1。运行程序，输入大于0的整数m，单击按钮Command1，程序显示由星号组成的高度为m的等腰三角形。事件代码如下：

Private Sub Command1_Click()Dim result As Stringm = Val(Me!Text1)result = ""For k = 1 To mFor n = 1 To k + m - 1if n < m - k + 1 Thenresult = result & " "Elseresult = result & "*"End lfNext nresult = result + Chr(13)Next kMsgBox result,，"运行结果
End Sub

第7题

窗体中有文本框为Text1和Text2。运行程序，在Text1中输入整数m(m>0)，单击"运行"按钮Command1，将m分解为质因子之积，并在Text2中给出结果。例如，18=233，输出结果为"2,3,3,“；28=227，输出结果为"2,2,7,”。事件代码如下：

Private Sub Command1_Click()m=  Val(Me!Text1)resule = ""k = 2Do While m > 1if m Mod k = 0 Thenresult = result & k & ","m = m / kElse【】End lfLoopMe!Text2 = result
End Sub

程序【 】处应填写的语句是：k = k + 1

第8题

窗体中有文本框Text1、Text2和Text3。运行时在Text1中输入整数m，在Text2中输入整数n(m<n)，单击按钮Command1，计算m到n之间(含m和n)全部奇数之和，然后在Text3中输出结果。事件代码如下：

Private Sub Command1_Click()m = Val(Me!Text1)n = Val(Me!Text2)sum = 0For【 】To n Step 2sum = sum + kNext kMe!Text3 = sum
End Sub

程序【 】处应填写的语句是：k = llf(mMod 2 = 1 , m , m + 1)

窗体中有文本框Text1、Text2和Text3。运行时在Text1中输入整数m，在Text2中输入整数n(m<n)，单击按钮Command1，计算m到n之间(含m和n)全部偶数之和，然后在Text3中输出结果。事件代码如下：

Private Sub Command1_Click()m = Val(Me!Text1)n = Val(Me!Text2)sum = 0For【 】To n Step 2sum = sum + kNext kMe!Text3 = sum
End Sub

程序【 】处应填写的语句是：k = llf(mMod 2 = 0 , m , m + 1)

第9题

在窗体中有文本框Text1和Text2。运行程序时，在Text1中输入整数m(m>0)，单击Command1"运行“按钮，程序能够求出m的全部除1之外的因子，并使用Text2显示结果，例如，18的全部因子有2,3,6,9,18，输出结果为"2,3,6,9,18,“；28的全部因子为2,4,7,14,28，输出结果为"2,4,7,14,28”。事件代码如下：

Private Sub Command1_Click()m = Val(Me!Text1)result = ""k=2Doif m Mod k = 0 Then result = result & k & ","K=k+1Loop Until【】Me!Text2 = result
End Sub

程序【 】处应填写的语句是：k > m

在窗体中有文本框Text1和Text2。运行程序时，在Text1中输入整数m(m>0)，单击Command1"运行“按钮，程序能够求出m的全部除1和自身之外的因子，例如，例如，20的因子有2,4,5,10，输出结果为"2,4,5,10,"；16的因子为2,4,8，输出结果为"2,4,8,”。事件代码如下：

Private Sub Command1 Click()m = Val(Me!Text1)resule = ""k = 2Doif m Mod k = 0 Then result = result & k & ","k = k + 1 Loop While【】Me!Text2 = result
End Sub

程序【 】处应填写的语句是：k < m

区别：Loop While和Loop Until
Do While当判断条件为真时，执行循环体，而Do Until是当判断为假时，执行循环体。

第10题

窗体中有文本框Text1和标签Label1，运行程序，输入大于0的整数m，单击按钮Command1，程序判断m是否为素数，若是素数，则Label1显示"m 是素数"，否则显示”m 是合数"。事件代码如下：

Private Sub Command1_Click()m = Val(Me!Text1)result = m & "是素数"k = 2Do While k <= m / 2 if m Mod k = 0 Thenresult = m & "是合数"End lfk = k + 1LoopMe!lLabel1.Caption = result
End Sub

程序【 】处应填写的语句是：Exit Do

DO…while退出时，用Exit Do。

这篇关于计算机二级Access选择题考点—代码篇的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！


http://www.chinasem.cn/article/1065000。

相关文章

活用c4d官方开发文档查询代码

活用c4d官方开发文档查询代码

当你问AI助手比如豆包，如何用python禁止掉xpresso标签时候，它会提示到 这时候要用到两个东西。https://developers.maxon.net/论坛搜索和开发文档 比如这里我就在官方找到正确的id描述 然后我就把参数标签换过来
阅读更多...
poj 1258 Agri-Net（最小生成树模板代码）

poj 1258 Agri-Net（最小生成树模板代码）

感觉用这题来当模板更适合。 题意就是给你邻接矩阵求最小生成树啦。~ prim代码：效率很高。172k...0ms。 #include<stdio.h>#include<algorithm>using namespace std;const int MaxN = 101;const int INF = 0x3f3f3f3f;int g[MaxN][MaxN];int n
阅读更多...
计算机毕业设计 大学志愿填报系统 Java+SpringBoot+Vue 前后端分离 文档报告 代码讲解 安装调试

计算机毕业设计 大学志愿填报系统 Java+SpringBoot+Vue 前后端分离 文档报告 代码讲解 安装调试

🍊作者：计算机编程-吉哥 🍊简介：专业从事JavaWeb程序开发，微信小程序开发，定制化项目、 源码、代码讲解、文档撰写、ppt制作。做自己喜欢的事，生活就是快乐的。 🍊心愿：点赞 👍 收藏 ⭐评论 📝 🍅 文末获取源码联系 👇🏻 精彩专栏推荐订阅 👇🏻 不然下次找不到哟~Java毕业设计项目~热门选题推荐《1000套》 目录 1.技术选型 2.开发工具 3.功能
阅读更多...
代码随想录冲冲冲 Day39 动态规划Part7

代码随想录冲冲冲 Day39 动态规划Part7

198. 打家劫舍 dp数组的意义是在第i位的时候偷的最大钱数是多少 如果nums的size为0 总价值当然就是0 如果nums的size为1 总价值是nums[0] 遍历顺序就是从小到大遍历 之后是递推公式 对于dp[i]的最大价值来说有两种可能 1.偷第i个 那么最大价值就是dp[i-2]+nums[i] 2.不偷第i个 那么价值就是dp[i-1] 之后取这两个的最大值就是d
阅读更多...
pip-tools：打造可重复、可控的 Python 开发环境，解决依赖关系，让代码更稳定

pip-tools：打造可重复、可控的 Python 开发环境，解决依赖关系，让代码更稳定

在 Python 开发中，管理依赖关系是一项繁琐且容易出错的任务。手动更新依赖版本、处理冲突、确保一致性等等，都可能让开发者感到头疼。而 pip-tools 为开发者提供了一套稳定可靠的解决方案。 什么是 pip-tools？ pip-tools 是一组命令行工具，旨在简化 Python 依赖关系的管理，确保项目环境的稳定性和可重复性。它主要包含两个核心工具：pip-compile 和 pip
阅读更多...
D4代码AC集

D4代码AC集

贪心问题解决的步骤： （局部贪心能导致全局贪心）    1.确定贪心策略    2.验证贪心策略是否正确 排队接水 #include<bits/stdc++.h>using namespace std;int main(){int w,n,a[32000];cin>>w>>n;for(int i=1;i<=n;i++){cin>>a[i];}sort(a+1,a+n+1);int i=1
阅读更多...
html css jquery选项卡 代码练习小项目

html css jquery选项卡 代码练习小项目

在学习 html 和 css jquery 结合使用的时候 做好是能尝试做一些简单的小功能，来提高自己的 逻辑能力，熟悉代码的编写语法 下面分享一段代码 使用html css jquery选项卡 代码练习 <div class="box"><dl class="tab"><dd class="active">手机</dd><dd>家电</dd><dd>服装</dd><dd>数码</dd><dd
阅读更多...
生信代码入门：从零开始掌握生物信息学编程技能

生信代码入门：从零开始掌握生物信息学编程技能

少走弯路,高效分析;了解生信云,访问 【生信圆桌x生信专用云服务器】 : www.tebteb.cc 介绍 生物信息学是一个高度跨学科的领域，结合了生物学、计算机科学和统计学。随着高通量测序技术的发展，海量的生物数据需要通过编程来进行处理和分析。因此，掌握生信编程技能，成为每一个生物信息学研究者的必备能力。 生信代码入门，旨在帮助初学者从零开始学习生物信息学中的编程基础。通过学习常用
阅读更多...
husky 工具配置代码检查工作流：提交代码至仓库前做代码检查

husky 工具配置代码检查工作流：提交代码至仓库前做代码检查

提示：这篇博客以我前两篇博客作为先修知识，请大家先去看看我前两篇博客 博客指路：前端 ESlint 代码规范及修复代码规范错误-CSDN博客前端 Vue3 项目开发—— ESLint & prettier 配置代码风格-CSDN博客 husky 工具配置代码检查工作流的作用 在工作中，我们经常需要将写好的代码提交至代码仓库 但是由于程序员疏忽而将不规范的代码提交至仓库，显然是不合理的 所
阅读更多...
Unity3D自带Mouse Look鼠标视角代码解析。

Unity3D自带Mouse Look鼠标视角代码解析。

Unity3D自带Mouse Look鼠标视角代码解析。 代码块 代码块语法遵循标准markdown代码，例如： using UnityEngine;using System.Collections;/// MouseLook rotates the transform based on the mouse delta./// Minimum and Maximum values can
阅读更多...

Copyright China编程 23002807@qq.com

沪ICP备2023033072号-2