电子文档交易市场
安卓APP | ios版本
电子文档交易市场
安卓APP | ios版本

19秋《VB程序设计》在线作业1答卷

7页
  • 卖家[上传人]:安静
  • 文档编号:113271421
  • 上传时间:2019-11-08
  • 文档格式:DOCX
  • 文档大小:327.88KB
  • / 7 举报 版权申诉 马上下载
  • 文本预览
  • 下载提示
  • 常见问题
    • 1、18秋VB程序设计在线作业1-0001试卷总分:100 得分:100一、单选题 (共 20 道试题,共 100 分)1.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim num As Integer num = 1 Do Until num 6 Print num; num = num + 2.4 Loop End Sub 程序运行后,单击命令按钮,则窗体上显示的内容是( )。A.无数据输出B.1 3.4 5.8C.1 4 7D.1 3 5答案:D2.当一个工程含有多个窗体时,其中的启动窗体是( )。A.第一个添加的窗体B.最后一个添加的窗体工程属性C.在“工程属性”对话框中指定的窗体D.启动Vosual Basic时建立的窗体答案:C3.设有如下程序: Option Base 0 Private Sub Form_Click() Dim a Dim I As Integer a=Array(1,2,3,4,5,6,7,8,9) For I=0 To 3 Print a(5 - I); Next I

      2、 End Sub 程序运行后,单击窗体,则在窗体上显示的是( )。A.7654B.6543C.5432D.4321答案:B4.DataCombo控件的RowSource属性是表示( )。A.给DataComebo控件提供列表项的字段B.给DataCombo控件提供列表项的数据源C.目的表的数据源D.更新目的表的字段答案:B5.如果要改变窗体的标题,则需要设置的属性是( )。A.NameB.CaptionC.BorderstyleD.BackColor答案:B6.在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a s = 0 a = Array (1,2,3,4) j = 1 For i = 4 To 1 Step - 1 s = s + a (i) * j j = j * 10 Next i Print s End Sub 运行上面的程序,单击命令按钮,其输出结果是( )。A.4321B.34C.1234D.12答案:C7.下列控件哪一个具有Align属性( )

      3、。A.标签B.图片框C.图像框D.列表框答案:B8.在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框,然后编写如下事件过程: Private Sub Command1_Click() n = Text1.Text Select Case n Case 1 To 20 x = 10 Case 2,4,6 x = 20 Case Is10 x = 30 Case 10 x = 40 End Select Text2.Text = x End Sub 程序运行后,如果在文本框Text1中输入10,然后单击命令按钮,则在Text2中显示的内容是( )。A.40B.30C.20D.10答案:D9.定义一个常量PI,可以使用下列语句中的( )。A.Set PI = 3.14159B.PI=3.14159C.Const PI = 3.14159D.Const PI答案:C10.在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim array1(

      4、10,10) As Integer Dim I, j As Integer For I=1 To 3 For j=2 To 4 array1(I, j)=I+j Next j Next I Text1.Text=array1(2,3)+array1(3,4) End Sub 程序运行后,单击命令按钮,在文本框中显示的值是( )。A.15B.14C.13D.12答案:D11.下列列表框属性中哪一项不是数组( )。A.SelectedB.ListCountC.ListD.Index答案:B12.如果要在菜单中添加一个分隔线,则应将其Caption属性设置为( )。A.=B.-C.*D.&答案:B13.在窗体中添加一个命令按钮,然后编写如下程序: Private Sub Command1_Click() Dim a As Integer, b As Integer a=InputBox(Enter the Firstinteger) b=InputBox(Enter the Secondinteger) Print b+a End Sub 程序运行后,单击命令按钮,先后在两个输入框中分别输入

      5、123和123,则输出结果是( )。A.456B.246C.123123D.123答案:B14.为了把一个记录型变量的内容写入文件中指定的位置,要使用语句( )。A.Put文件号,记录号,变量名B.Put文件号,变量名,记录号C.Get文件号,记录号,变量名D.Get文件号,变量名,记录号答案:A15.ADO控件的RecordSet对象表示( )。A.使用ADO控件连接的表B.使用ADO控件返回的查询结果C.使用ADO控件添加的数据D.使用ADO控件建立的筛选条件答案:B16.代码Command1.Caption=”退出”,其中Command1是( ),Caption是( ),“退出”是( )。请选择一个正确答案( )。A.方法,对象,值B.方法,事件,属性C.对象,方法,值D.对象,属性,值答案:D17.设有如下通用过程: Public Sub Fun(a(),ByVal x As Integer) For i = 1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下的事件过程 P

      6、rivate Sub Command1_Click() Dim arr(5) As Variant For i = 1 To 5 arr(i) = i Next n = 10 Call Fun(arr(), n) Text1.Text = n End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是( )。A.25B.24C.15D.10答案:D18.刚建立一个新的标准EXE工程后,不在工具箱中出现的控件是( )。A.通用对话框B.文本框C.图片框D.单选按钮答案:B19.图像框有一个属性,可以自动调整图形的大小,以适应图像框的尺寸,该属性是( )。A.StretchB.AutosizeC.AutoredrawD.Appearance答案:A20.窗体的MouseDown事件过程如下: Form_MouseDown(Button As Integer,Shift As Integer, X As Single, Y As Single) 其中有4个参数,关于这些参数,正确的描述是( )。A.通过Button参数判定当前按下的是哪一个鼠标键B.参数x、y用来设置鼠标当前位置的坐标C.Shift参数只能用来确定是否按下Shift键D.Shift参数只能用来确定是否按下Alt键和Ctrl键答案:A

      《19秋《VB程序设计》在线作业1答卷》由会员安静分享,可在线阅读,更多相关《19秋《VB程序设计》在线作业1答卷》请在金锄头文库上搜索。

      点击阅读更多内容
    最新标签
    监控施工 信息化课堂中的合作学习结业作业七年级语文 发车时刻表 长途客运 入党志愿书填写模板精品 庆祝建党101周年多体裁诗歌朗诵素材汇编10篇唯一微庆祝 智能家居系统本科论文 心得感悟 雁楠中学 20230513224122 2022 公安主题党日 部编版四年级第三单元综合性学习课件 机关事务中心2022年全面依法治区工作总结及来年工作安排 入党积极分子自我推荐 世界水日ppt 关于构建更高水平的全民健身公共服务体系的意见 空气单元分析 哈里德课件 2022年乡村振兴驻村工作计划 空气教材分析 五年级下册科学教材分析 退役军人事务局季度工作总结 集装箱房合同 2021年财务报表 2022年继续教育公需课 2022年公需课 2022年日历每月一张 名词性从句在写作中的应用 局域网技术与局域网组建 施工网格 薪资体系 运维实施方案 硫酸安全技术 柔韧训练 既有居住建筑节能改造技术规程 建筑工地疫情防控 大型工程技术风险 磷酸二氢钾 2022年小学三年级语文下册教学总结例文 少儿美术-小花 2022年环保倡议书模板六篇 2022年监理辞职报告精选 2022年畅想未来记叙文精品 企业信息化建设与管理课程实验指导书范本 草房子读后感-第1篇 小数乘整数教学PPT课件人教版五年级数学上册 2022年教师个人工作计划范本-工作计划 国学小名士经典诵读电视大赛观后感诵读经典传承美德 医疗质量管理制度 2
     
    收藏店铺
    关于金锄头网 - 版权申诉 - 免责声明 - 诚邀英才 - 联系我们
    手机版 | 川公网安备 51140202000112号 | 经营许可证(蜀ICP备13022795号)
    ©2008-2016 by Sichuan Goldhoe Inc. All Rights Reserved.