当前位置:首页 >> 学科竞赛 >> 福建信息技术会考操作题(上机)

福建信息技术会考操作题(上机)


第 12 题: 打开“Z:\VB\85”文件夹中的文件:“d4.vbp”,进行以下操作后并保存! 在 VB 代码窗口指定位置修改完善程序代码,实现求 1*2*3*4*5*??*9*10 的积。值是 3628800 Private Sub Command1_Click() '注释:以下为求 1*2*3*4*5*??*9*10 的积的代码,请不要删除(1)和(2)以外的任何代

码 Dim s As Long Dim n As Integer Dim i As Integer n = 10 '注释:删除(1),在(1)处写上正确的代码 s=1 For i = 1 To n '注释:删除(2),在(2)处写上正确的代码 s=s*i Next i Print "S="; s End Sub 第 11 题: 打开“Z:\VB\90”文件夹中的文件: “k4.vbp” ,进行以下操作后并保存! 在窗体“Form1.frm”的“Command1_Click”事件中编写代码(请不要随便更改其它代码), 使之能够实现如下功能: 在 text1 文本框中输入一个整数 a(不为零) ,判断其是否为正数, 如果该数大于零,则在 text3 文本框中输出“正数” ,如果小于零,则输出“负数” 。 测试数据 在 text1 文本框中输入 9,在 text3 文本框中输出:正数。 在 text1 文本框中输入-6,在 text3 文本框中输出:负数。 Private Sub Command1_Click() Dim a As long a = Val(Text1.Text) If a <> 0 Then If a > 0 Then Text3.Text = "正数" Else Text3.Text = "负数" End If End If

End Sub 第 12 题: 打开“Z:\VB\82”文件夹中的文件:“d1.vbp”,进行以下操作后并保存! 在 VB 代码窗口指定位置修改完善程序代码,实现求 1 到 50 之间的奇数和。 Private Sub Command1_Click()

'注释:以下为求 1 到 50 之间奇数和的代码,请不要删除(1)和(2)以外的任何代码 Dim s As Integer Dim n As Integer Dim i As Integer n = 50 '注释:删除(1),在(1)处写上正确的代码 s=0 '注释:删除(2),在(2)处写上正确的代码 For i = 1 To n Step 2 s=s+i Next i Print "S="; s End Sub 625

第 13 题: 打开“Z:\VB\87”文件夹中的文件:“k1.vbp”,进行以下操作后并保存! 在窗体“Form1.frm”的“Command1_Click”事件中编写代码(请不要随便更改其它代码),使之 能够实现如下功能: 分别在 text1 和 text2 文本框中输入 a 和 b 两个整数,比较 a 和 b 的大 小,并在 text3 文本框中输出较大的数。 测试数据 在 text1 文本框中输入 3,在 text2 文本框中输入 2,text3 文本框输出 3; 在 text1 文本框中输入 4,在 text2 文本框中输入 5,text3 文本框输出 5。 Private Sub Command1_Click() Dim a As Long, b As Long a = Text1.Text b = Text2.Text If a > b Then Text3.Text = a Else Text3.Text = b End If End Sub 第 11 题: 新建一个 VB 文件,保存在“Z:\VB\81”文件夹下,工程文件名为:“工程 1.vbp”,窗体文件名 为:“Form1.frm”, 进行如下操作后保存! 按下表的要求添加控件,并设置其属性: 第 12 题: 打开“Z:\VB\86”文件夹中的文件:“d5.vbp”,进行以下操作后并保存! 在 VB 代码窗口指定位置修改完善程序代码,实现求 的积。

Private Sub Command1_Click() '注释:以下为求 1*1/2*1/3*??*1/9*1/10 的积的代码,请不要删除(1)和(2)以外的任何 代码 Dim s As Single Dim n As Integer Dim i As Integer n = 10 '注释:删除(1),在(1)处写上正确的代码 s=1 For i = 1 To n '注释:删除(2),在(2)处写上正确的代码 s=s*1/i Next i Print "S="; s End Sub S=2.755732E-07 第 13 题: 打开“Z:\VB\91”文件夹中的文件:“k5.vbp”,进行以下操作后并保存! 在窗体“Form1.frm”的“Command1_Click”事件中编写代码(请不要随便更改其它代码),使之 能够实现如下功能: 在 text1 文本框中输入一个正整数 a(不为零) ,如果此数小于 10,则 将此数乘以 10 后再加上此数输出。 例如, 该数为 9, 则在 text3 文本框中输出 99。 否则在 text3 文本框中输出“a 大于或等于 10”。 测试数据 在 text1 文本框中输入 9,在 text3 文本框中输出:99。 在 text1 文本框中输入 11,在 text3 文本框中输出:a 大于或等于 10。 Dim a As Long a = Text1.Text If a <> 0 Then If a < 10 Then Text3.Text = a + a* 10 Else Text3.Text = "a 大于或等于 10" End If End If 第 1 题: 代数式 对应的 VB 表达式是 A.a+b /(2*c) B.(a+b)/(2*c) C.a+b /2c D.(a+b)/2*c 第 2 题:

在 VB 语言中,下列合法的变量名是 A.ABC2 B.$BB C.B$B D.B+A 第 3 题: 如图所示的流程图为计算正方体体积 V 的算法。根据算法,流程图中①处的内容是 A.输出 V 的值 B.输入 A 的值 C.输出 A 的值 D.输入 V 的值 第 4 题: 以下程序段执行后,整型变量 a 和 b 的值分别为 a=2 b=7 a=a + b b=a-b a=a-b A.2,7 B.7,5 C.12,5 D.7,2 第 5 题: 在 VB 语言中,下列属于日期型常量的是 A."2011.6.20" B.#2011-06-20# C.2011/6/20 D.2011.6.20 第 6 题: 下列关于算法的描述,正确的是 A.算法可以没有输出 B.算法是一种数学方法 C.算法要有一个或多个输入 D.一个算法执行有穷步骤之后必须结束 第 7 题: 函数 int(2.5)返回的值是 A.2.5 B.-2 C.2

D.3 第 8 题: 下列关于程序设计语言的描述,正确的是 A.机器语言又称为汇编语言 B.C 语言是一种机器语言 C.机器语言要通过汇编才能被计算机接受 D.机器语言是由二进制代码组成 第 9 题: VB 程序一般包含数据输入部分、数据处理部分、数据输出部分和 A.输入窗口部分 B.文字说明部分 C.数据说明部分 D.控件部分 第 10 题: 设 a=2,b=3,c=6,d=4。下列表达式中值为“真”的是 A.a+c>b+d B.a+d>b and d+c<a C.b+c<a+d D.a+b>c or a+d>c 第 11 题: 打开“Z:\VB\88”文件夹中的文件:“k2.vbp”,进行以下操作后并保存! 在窗体“Form1.frm”的“Command1_Click”事件中编写代码(请不要随便更改其它代码),使之 能够实现如下功能: 在 text1 文本框中输入一个整数 a,判断该数能否被 3 整除,如果该数 能被 3 整除,则在 text3 文本框中输出"能",否则输出"不能"。 测试数据 在 text1 文本框中输入 9,在 text3 文本框中输出:能。 在 text1 文本框中输入 7,在 text3 文本框中输出:不能。 Private Sub Command1_Click() Dim a As Long a = Text1.Text If a Mod 3 = 0 Then Text3.Text = "能" Else Text3.Text = "不能" End If End Sub 第 12 题: 打开“Z:\VB\83”文件夹中的文件:“d2.vbp” ,进行以下操作后并保存! 在 VB 代码窗口指定位置修改完善程序代码,实现求 1 到 50 之间的偶数和。

650

Private Sub Command1_Click() '注释:以下为求 1 到 50 之间偶数和的代码,请不要删除(1)和(2)以外的任何代码 Dim s As Integer Dim n As Integer Dim i As Integer n = 50 '注释:删除(1),在(1)处写上正确的代码 s=0 '注释:删除(2),在(2)处写上正确的代码 For i = 2 To n Step 2 s=s+i Next i Print "S="; s End Sub 第 13 题: 新建一个 VB 文件,保存在“Z:\VB\78”文件夹下,工程文件名为:“工程 1.vbp”,窗体文件名 为:“Form1.frm”, 进行如下操作后保存! 按下表的要求添加控件,并设置其属性: 第 1 题: 下列关于算法的描述,正确的是 A.算法可以有无限次步骤 B.算法一定要有输入 C.算法是用数学求解某一问题的方法 D.算法有一个或多个输出 第 2 题: 以下程序段执行后,整型变量 a 和 b 的值分别为 a=5 b=6 a= a * b b=a\b a=a\b A.30,6 B.30,5 C.5,6 D.6,5 第 3 题: 代数式 对应的 VB 表达式是 A.a+b /(2+c) B.(a+b)/(2+c) C.a+b /2+c

D.(a+b)/2+c 第 4 题: 设 a=2,b=3,c=6,d=4。下列表达式中值为“真”的是 A.a+b>d and a+d<=c B.a+d>b+c C.a+b>a+d D.a+b>c and a+c>d 第 5 题: 在 VB 语言中,下列属于字符型常量的是 A.字符型 B."String" C.#字符型# D.String 第 6 题: VB 程序一般包含数据输入部分、数据处理部分、数据说明部分和 A.赋值语句部分 B.文本框部分 C.数据输出部分 D.按钮部分 第 7 题: 函数 abs(-25)返回的值是 A.-25 B.5 C.25 D.1 第 8 题: 如图所示的流程图为计算长方体体积 V 的算法。根据算法,流程图中①处的内容是 A.输出 V 的值 B.输入 A、B、C 的值 C.输出 A、B、C 的值 D.输入 V 的值 第 9 题: 在 VB 语言中,下列合法的变量名是 A.abc3 B.?a C.b$b D.c+c a

第 10 题: 下列关于程序设计语言的描述,正确的是 A.汇编语言可以被机器直接接受 B.C 语言是一种汇编语言 C.汇编语言由二进制代码组成 D.汇编语言的指令和操作数都采用符号形式 第 11 题: 打开“Z:\VB\89”文件夹中的文件:“k3.vbp”,进行以下操作后并保存! 在窗体“Form1.frm”的“Command1_Click”事件中编写代码(请不要随便更改其它代码),使之 能够实现如下功能: 在 text1 文本框中输入一个整数 a,判断其奇偶性,如果该数为偶数, 则在 text3 文本框中输出“偶数”,否则输出“奇数”。 测试数据 在 text1 文本框中输入 9,在 text3 文本框中输出:奇数。 在 text1 文本框中输入 6,在 text3 文本框中输出:偶数。 Private Sub Command1_Click() Dim a As Long a = Text1.Text If a Mod 2 = 0 Then Text3.Text = "偶数" Else Text3.Text = "奇数" End If End Sub 第 12 题: 新建一个 VB 文件,保存在“Z:\VB\79”文件夹下,工程文件名为:“工程 1.vbp”,窗体文件名 为:“Form1.frm”, 进行如下操作后保存! 按下表的要求添加控件,并设置其属性: 第 13 题: 打开“Z:\VB\84”文件夹中的文件:“d3.vbp”,进行以下操作后并保存! 在 VB 代码窗口指定位置修改完善程序代码,实现求 1 到 50 之间所有数的和。 1275 Private Sub Command1_Click() '注释:以下为求 1 到 50 之间所有数的和的代码,请不要删除(1)和(2)以外的任何代码 Dim s As Integer Dim n As Integer Dim i As Integer n = 50 '注释:删除(1),在(1)处写上正确的代码 s=0 '注释:删除(2),在(2)处写上正确的代码 For i = 1 To n Step 1 s=s+i Next i

Print "S="; s End Sub


更多相关文档:

福建信息技术会考操作题(上机)

福建信息技术会考操作题(上机)_学科竞赛_高中教育_教育专区。第 12 题: 打开“Z:\VB\85”文件夹中的文件:“d4.vbp”,进行以下操作后并保存! 在 VB 代码...

2012年01月福建信息技术会考上机操作题 答案

2012年01月福建信息技术会考上机操作题 答案_其它课程_高中教育_教育专区。2012年01月福建信息技术会考上机操作题 答案龙海市港尾中学 算法与程序设计 (第1套) 第...

福建信息技术会考ACCESS上机操作要点1

福建信息技术会考ACCESS上机操作要点1_其它课程_高中教育_教育专区。福建高中信息技术会考access上机操作要点 ACCESS 上机操作要点考试有三大类题目: 1、新建指定位置及...

福建省信息技术会考 操作练习

福建省信息技术会考 操作练习_其它课程_高中教育_教育专区。一、在“考生文件夹\ ACCESS \01”下,新建一个名称为“摄影比赛.mdb”的 Access 数据 库,进行以下...

高中信息技术会考(上机操作题要点)

高中信息技术会考(上机操作题要点)_其它课程_高中教育_教育专区 暂无评价|0人阅读|0次下载|举报文档 高中信息技术会考(上机操作题要点)_其它课程_高中教育_教育...

2014年6月信息技术模拟会考上机操作题

2014年6月信息技术模拟会考上机操作题_其它课程_高中教育_教育专区。2014年6月...2014年山东信息技术会考... 5页 免费 2014年1月福建省信息技术... 91页 ...

福建信息技术会考历年试题(含答案)

福建信息技术会考历年试题(含答案)_其它课程_高中教育_教育专区。07年-10年,完整!老师精心整理,复习必备。福建省普通高中信息技术学科学业基础会考 《信息技术基础(...

信息技术会考操作题大全

信息技术会考操作题大全_其它课程_高中教育_教育专区。信息技术高中会考操作题WORD...(1+2009 年比 2008 年增长) 操作步骤:选中 B3 单元格(即福建右边的单元格)...

2015年1月福建省信息技术会考必修

2015年1月福建省信息技术会考必修_其它课程_高中教育_教育专区。1、下列关于信息...标题的操作方法是 单击“插入/图片/艺术字”命令 单击“插入/图片/来自文件”...

福建省信息会考网络技术应用上机考题含选择题和操作题1301

福建省信息会考网络技术应用上机考题含选择题和操作题1301_其它课程_高中教育_教育专区。2013.01 2013.06福建省信息会考网络技术应用上机考题含选择题和操作题1301 13...
更多相关标签:
福建计算机会考操作题 | 福建高中会考 | 2016年福建省高中会考 | 福建物理会考2016 | 福建会考 | 2016福建会考物理试卷 | 2016福建省化学会考 | 福建省化学会考试卷 |
网站地图

文档资料共享网 nexoncn.com copyright ©right 2010-2020。
文档资料共享网内容来自网络,如有侵犯请联系客服。email:zhit325@126.com