a我考网

 找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 67|回复: 0

[考试试题] 2012年计算机二级VB考试试题及答案解析2

[复制链接]
发表于 2012-7-31 22:15:04 | 显示全部楼层 |阅读模式
 1. 基本操作(2小题,每小题15分,共计30分)
3 T1 n6 \* q* X8 N5 T+ U7 c  注意:下面出现的“考生文件夹”均为%USER% ( @& V3 I6 S9 S+ q1 {) ~) j# I
  **********************************************************************
, S: _' F$ b+ D# [  请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
7 ~( K* [$ G% v6 t6 H8 f  (1)在名称为Form1 的窗体上画一个名称check1的复选框数组(Index属性从0开始),含三个复选框,其标题分别为“语文”、“数学”、“体育”,利用属性窗口设置适当的属性,使“语文”未选,“数学”被选中,“体育”为灰色,再把窗体的标题设置为“选课”,如图所示。 6 m( M# ~& e5 Q/ e
  注意: ; {/ U* x/ @' c2 ^+ T
  存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
+ S, P% P+ ?0 }: G  ^  }  解题思路:
& t: B; K9 l! ]) m: K, ]0 d  启动Visual Basic系统,创建一个Form1窗体。
8 W* t; b/ b5 Q2 Q  在该窗体上画一个复选框控件,通过对复选框控件的复制产生复选框控件数组,共有三个复选框,标题(Caption属性)分别设为“语文”、“数学”、“体育”,“数学”的Value属性设为1,“体育”的Value属性设为2。激活Form1窗体,通过其属性窗口将标题(Caption属性)设为“选课”。
- P* _5 `, {; Y; C8 `0 X  参考文件:c:\wexam\26990001\hlpsys\参考答案\sjt1.vbp、sjt1.frm、sjt1.vbw
/ N: G4 i6 E/ E  请把这些文件复制到c:\wexam\26990001中,然后打开sjt1.vbp文件并运行。
9 X% J9 U' s& ^  p9 k$ _7 r  **********************************************************************
8 s' ?2 `; N, j+ P$ h" ^2 @  (2)在名称为Form1的窗体上画两个文本框,名称分别为Text1、Text2,再画两个命令按钮,名称分别为Command1、 Command2,标题分别为“复制”、“删除”。程序运行时,在Text1中输入一串字符,并用鼠标拖拽的方法选择几个字符,然后单击“复制”按钮,则被选中的字符被复制到Text2中(如图所示)。若单击“删除”按钮,则被选择的字符从Text1中被删除。请编写两个命令按钮的Click过程完成上述功能。
5 r4 r+ s- h, s) Y6 o  注意:
/ s3 p9 J4 b0 a  要求程序中不得使用变量,事件过程中只能写一条语句。
/ e4 I8 ]3 R: K# Y% _% ?+ @& Q+ `  存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm。 " j/ R0 r! z% _9 B! p
  解题思路: , [7 Z- u& x- v, }$ w
  启动Visual Basic系统,创建一个Form1窗体。 ! C& T3 y# _4 S  H$ v$ f
  在该窗体上画二个文本框控件,通过其属性窗口将名称分别设为Text1、Text2。画二个命令按钮控件,通过其属性窗口将名称分别设为Command1、Command2,标题(Caption属性)分别设为“复制”、“删除”。
3 ^% V0 B) X9 @* c1 E  单击“复制”按钮(即运行Click事件过程),在该Click事件过程中加入语句: 6 R$ U$ t5 Y8 W% F% L5 l
  Private Sub Command1_Click()
/ a. h$ V7 j8 \7 ~+ W/ |- @+ `1 v  Text2 = Text1.SelText
2 d+ A1 A& D. |! k8 Y- i; H  End Sub 9 i, P0 L% `' A2 J. x2 O5 {! p
  单击“删除”按钮(即运行Click事件过程),在该Click事件过程中加入语句:
9 v$ a. z0 Y6 S: S  Private Sub Command2_Click() ' C$ ]  ~5 f$ ]
  Text1.SelText = ""
/ b% ~7 c8 t' [  End Sub ) N+ O2 C5 f2 g8 \0 z* ^
  参考文件:c:\wexam\26990001\hlpsys\参考答案\sjt2.vbp、sjt2.frm、sjt2.vbw
: {3 Q/ J. i) s2 a- a/ }  请把这些文件复制到c:\wexam\26990001中,然后打开sjt2.vbp文件并运行。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|Woexam.Com ( 湘ICP备18023104号 )

GMT+8, 2024-5-29 00:51 , Processed in 0.307180 second(s), 21 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表