欢迎来到麦多课文档分享! | 帮助中心 海量文档,免费浏览,给你所需,享你所想!
麦多课文档分享
全部分类
  • 标准规范>
  • 教学课件>
  • 考试资料>
  • 办公文档>
  • 学术论文>
  • 行业资料>
  • 易语言源码>
  • ImageVerifierCode 换一换
    首页 麦多课文档分享 > 资源分类 > DOC文档下载
    分享到微信 分享到微博 分享到QQ空间

    [计算机类试卷]VB笔试章节练习试卷18及答案与解析.doc

    • 资源ID:494299       资源大小:36.50KB        全文页数:9页
    • 资源格式: DOC        下载积分:2000积分
    快捷下载 游客一键下载
    账号登录下载
    微信登录下载
    二维码
    微信扫一扫登录
    下载资源需要2000积分(如需开发票,请勿充值!)
    邮箱/手机:
    温馨提示:
    如需开发票,请勿充值!快捷下载时,用户名和密码都是您填写的邮箱或者手机号,方便查询和重复下载(系统自动生成)。
    如需开发票,请勿充值!如填写123,账号就是123,密码也是123。
    支付方式: 支付宝扫码支付    微信扫码支付   
    验证码:   换一换

    加入VIP,交流精品资源
     
    账号:
    密码:
    验证码:   换一换
      忘记密码?
        
    友情提示
    2、PDF文件下载后,可能会被浏览器默认打开,此种情况可以点击浏览器菜单,保存网页到桌面,就可以正常下载了。
    3、本站不支持迅雷下载,请使用电脑自带的IE浏览器,或者360浏览器、谷歌浏览器下载即可。
    4、本站资源下载后的文档和图纸-无水印,预览文档经过压缩,下载后原文更清晰。
    5、试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓。

    [计算机类试卷]VB笔试章节练习试卷18及答案与解析.doc

    1、VB笔试章节练习试卷 18及答案与解析 1 以下叙述中正确的是 _。 ( A) KeyAscii 参数返回所按键的 ASCII码 ( B) KeyAscii 参数的数据类型为字符串 ( C) KeyAscii 参数与 KeyCode 参数的返回值相同 ( D)在 KeyPress事件过程中, KeyAscii参数可以省略 2 在 KeyUp 事件过程中,通过 KeyCode 参数判断用户的按键。假定键 “B”的 KeyCode值为 66,则以下正确的说法是 _。 ( A)按 Shift+ B键后的 KeyCode值为 66+1 ( B)按 Shift+ B、 Ctrl+ B、 Alt+ B键后

    2、的 KeyCode值均为 66 ( C)按 Ctrl+ B键后的 KeyCode值为 66+2 ( D)按 Alt+ B键后的 KeyCode值为 66+4 3 编写如下事件过程; Private Sub Form_ MouseDown (Button As Integer, Shift As Integer, X As Single, Y As SinglE)If Shift = 6 And Button = 1 Then Print “BBBB“ End If End Sub程序运行后,为了在窗体上输出 “BBBB”,应执行的操作为 _。 ( A)同时按下 Shift 键和鼠标左键 ( B

    3、)同时 Ctrl、 Alt 键和鼠标左键 ( C)同时按下 Shift 键和鼠标右键 ( D)同时按下 Ctrl、 Alt 键和鼠标左键 4 以下叙述中错误的是 _。 ( A)在 KeyUp和 KeyDown 事件过程中,从键盘上输入的 A和 a被视作相同的字母 (具有相同的 KeyCodE) ( B)在 KeyUp 和 KeyDown 事件过程中,将键盘上的 1和右侧小键盘上的 “1”视作不同的数字 (具有不同的 KeyCodE) ( C) KeyPress 事件中不能识别键盘上键的按下与释放 ( D) KeyPress 不能识别回车键 5 在窗体上画一个名称为 Text1的文本框,然后编写

    4、如下事件过程: Private Sub Text1_ KeyPress (KeyAscii As Integer) Dim ch As String ch = Chr (KeyAscii) KeyAscii = Asc (UCase(ch) TextText = String(1, KeyAscii) End Sub程序运行后,使文本框拥有焦点,然后按键盘上的 B键,则在文本框中显示的内容是 _。 ( A) b ( B) bb ( C) BB ( D) B 6 在窗体上画一个名称为 Text1的文本框,要求文本框只能接收大写字母的输入。以下能够正确实现该操作的事件过程是 _。 ( A) Pri

    5、vate Sub Text1_ KeyPress (KeyAscii As Integer) IfKeyAscii 65 Or KeyAscii 9t Then MsgBox “请输入大写字母 ” End If End sub ( B) Private Sub Text1_ KeyDown (KeyCode As Integer, Shift As Integer) IfKeyCode 65 Or KeyCode 91 Then MsgBox “请输入大写字母 ” End If End sub ( C) Private Sub Text1_ MouseDown (Button As Integ

    6、er, _ Shift As Integer, X As Single, YAs SinglE)IfAsc (Text1.Text) 65 Or Asc (Text1. Text) 91 Then MsgBox “请输入大写字母 ” End If End sub ( D) Private Sub Text1_ Change() IfAsc(Text 1.Text) 65 Or Asc(Text1. Text) 91 Then MsgBox “请输入大写字母 ” End If End sub 7 下列与拖放操作无关的是 _。 ( A) KeyPress 事件 ( B) Drag 方法 ( C)

    7、DragOver 事件 ( D) DragDrop 事件 8 下列与改变鼠标光标形状有关的是 _。 ( A) MouseMove 事件 ( B) MouseDown 事件 ( C) MousePointer 属性 ( D) MouseUp 事件 9 在窗体上画一个名为 Command1的命令按钮和一个名为 Text1的文本框,并把窗体的 KeyPreview 属性设置为 True,然后编写如下代码: Dim SaveAll As String Private Sub Form_ Load () Show Text1.Text = “ “ TextSetFocus End Sub Private

    8、 Sub Command1 Click() TextText= LCase(SaveAll) End Sub Private Sub Form_ KeyPress (KeyAscii As Integer) SaveAll = SaveAll + Chr(KeyAscii) End Sub程序运行后,在键盘上输入 ABCDEFG,单击命令按钮,则文本框中显示的内容为 _。 ( A) abodefg ( B)不显示任何信息 ( C) ABCDEFG ( D)出错 10 以下说法中正确的是 _。 ( A)当 MousePointer 属性为 1时,将把鼠标的形状设置为 Windows 的默认值 (

    9、 B) MouseIcon属性的设置要受到 KeyDown事件的影响 ( C)自定义鼠标光标通过 MouseIcon属性设置 ( D)为了定义用户自己的鼠标光标,必须把 MousePointer 属性设置为 99 11 表示 “x y小于 10,且 x-y要大于 0”的 VB表达式为【 】。 12 表示 “x和 y都是正数或都是负数 ”的 VB表达式为【 】。 13 表示 “A和 B之一为零但不同时为零 ”的 VB表达式为【 】。 14 表示 “A B C大于等于 255,或 A与 B分别大于 90,且 C大于 80”的 VB表达式为【 】。 15 数学表达式 3/5ex 2的 VB表达式是【

    10、 】。 16 已知 K=2, J=3, A=True,则 VB表达式 (K-J =K)AND(NOT A)OR(K J =J)的值为【 】。 17 不等式 A B C D的 VB表达式为【 】。 18 将高次方程 5x5 3x4-12x3 x-9写成 VB表达式为【 】。 19 请定 义一个用户自定义类型,类型名为 Teacher,有三个成员:教师名 (No,长整型 )、姓名 (name, 8个字符组成的字符串 )、年龄 (age,整型 )。类型定义形式为【 】。 20 下列程序运行时,单击窗体,执行结果为【 】。 说明:在窗体上有一 Label控件,名为 lblDate。 Dim Y As

    11、Integer,m As Integer,d As Integer,w1 As Integer Dim Rq As Date Dim W2 As String Private Sub Form_Click() Rq=Date Y=Year(Rq): m=Month(Rq) d=Day(Rq) w1=Weekday(x) Select Case w1 Case 1 W2=“日 “ Case 2 W2=“一 “ Case 3 W2=“二 “ Case 4 W2=“三 “ Case 5 W2=“四 “ Case 6 W2=“五 “ Case 7 W2=“六 “ End Select bldatE C

    12、aption=“今天是 “&Y&“年 “&m&“月 “&d&“日 “&“星期 “&W2 End SUb 21 下列语句的输出结果是【 】。 Print Int(12345.6789*100 0.5)/100 22 InputBox函数返回值的类型为【 】。 23 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim Y as String X=5 Y=X & Space(3) & X Print X; Print Trim(Y); Len(Trim(Y) End Sub 该程序的执行结果是【 】。 24 下列函数调用时弹出的对话框中按

    13、钮的个数为【 】。 MsgBox(“程序非法 !“, vbAbortRetryIgnore, “消息提示: “) 25 语句 Print 12; Tab; 24的执行结果是【 】。 26 下列语句的执行结果是【 】。 X=10 Print x 2; x 2; x 6 27 语句 Print“125 35“; 125 32的执行结果是【 】。 28 下列程序执行时,从键盘上依次输入 123和 234,则程序的输出结果是【 】。 a=InputBox(“请输入第一个整数 “) b=InputBox(“请输入第二整数 “) Print a b 29 下列程序执行时,从键盘上依次输入 123和 234

    14、,则程序的输出结果是【 】。 Dim a,b As Integer a=InputBox(“请输入第一个整数 “) b=InputBox(“请输入第二整数 “) Print a+b 30 以下程序的输出结果是【 】。 x=12.7 x=Int(x 0.5) Print X 31 假设有如下事件过程: Private Sub Command1_Click() msg1$=“Are You Continue to?“ msg2$=“Open The Books“ r=MsgBox(msg1$, 34, msg2$) End Sub 运行该程序后,所出现的对话框的标题是【 】。 VB笔试章节练习试卷

    15、 18答案与解析 1 【正确答案】 A 2 【正确答案】 B 3 【正确答案】 B 4 【正确答案】 D 5 【正确答案】 C 6 【正确答案】 A 7 【正确答案】 A 8 【正确答案】 C 9 【正确答案】 B 10 【正确答案】 D 11 【正确答案】 X Y0 12 【正确答案】 X*Y0 或 X0 And Y0 Or X0 Or A=255 or A90 And B90 And C80 15 【正确答案】 5 3/5*Exp(x 2) 16 【正确答案】 6 True 17 【正确答案】 A 18 【正确答案】 5*X5+3*X4-12*X3+X-9 19 【正确答案】 Type Teacher No AS Long Name As String*8 Age As Integer End Type 20 【正确答案】 今天是 *年 *月 */日星期 * 21 【正确答案】 12345.68 22 【正确答案】 字符串型 23 【正确答案】 5555 24 【正确答案】 3 25 【正确答案】 1224 26 【正确答案】 121216 27 【正确答案】 125 35157 28 【正确答案】 123234 29 【正确答案】 357 30 【正确答案】 13 31 【正确答案】 Open The Books


    注意事项

    本文([计算机类试卷]VB笔试章节练习试卷18及答案与解析.doc)为本站会员(sofeeling205)主动上传,麦多课文档分享仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。 若此文所含内容侵犯了您的版权或隐私,请立即通知麦多课文档分享(点击联系客服),我们立即给予删除!




    关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服 - 联系我们

    copyright@ 2008-2019 麦多课文库(www.mydoc123.com)网站版权所有
    备案/许可证编号:苏ICP备17064731号-1 

    收起
    展开