1、编号：QMSD/JWC-21-01信息工程系 VB 程序设计 期中试卷 第 1 页 共 3 页班级 姓名 学籍号 考考 生 答 题 不 得 超 过 此 密 封 线 VB 程序设计 期 中 试卷（ 2009 / 2010 学年度第 一 学期）用卷班级 07 计信(1)(2)(大专)班级编号 0741 0742班级人数 38命 题 人 蒋丽萍 审核人 核 对 人一 选择题 （2 分15）1.以下哪个是合法的变量名ALen BTestqw C6cost_1 Dcount2s2.在 Visual Basic代码中，将多个语句合并在一行上的并行符是A. 撇号（） B. 冒号（：） C. 感叹号（！） D
2、. 问号（?）3数学关系 3x10 表示成正确的 VB 表达式为 。A 3=3 AND x=3 OR x=3 AND 0 then n=n+1B if sex=”男” and aged mod a or c=0 and a+cb+3 or not d0四程序完善 （2 分8）1 下列程序段完成功能：输入三个数 a,b,c，求其平均值 avg。Private Sub Command1_Click（）Dim 定义变量a=Inputbox(“输入 a”)Print “a=”;ab=_Print “b=”;bc= Print “c=”;cAvg= 求平均值输出平均值End Sub2 从键盘上输入 10
3、 个数，求它们的和 sum。Private Sub form_Click（）Dim x as singleDim sum as singleDim i as integer赋初值For i=1 to 10Sum=sum+x编号：QMSD/JWC-21-01信息工程系 VB 程序设计 期中试卷 第 3 页 共 3 页班级 姓名 学籍号 考考 生 答 题 不 得 超 过 此 密 封 线Print “sum=”;sumEnd sub五编程题（7 分9 分7 分）1设计一窗体如图所示。当按下鼠标时，在窗体中显示按下的是左键还是右键，并显示当时鼠标的位置。Private Sub Form_MouseDo
4、wn(Button As Integer, Shift As Integer, X As Single, Y As Single)End Sub2设计一程序，运行后界面如下图。请把各控件的相关属性填入下表。控件 属性 属性值name Label1labelcaptionname Label2labelcaptionname Text1textboxTextname Text2textboxTextcommandbutton name Command1captionname Command2commandbuttoncaption编程实现如下功能：在文本框中输入一个值，如果输入的值大于等于 0，则在第二个文本框中求这个值的平方，如果输入的值小于 0，则在第二个文本框中求它的绝对值。单击“退出”按钮则退出程序。Private Sub Command1_Click()End SubPrivate Sub Command2_Click()End Sub3从键盘上输入一个大于 1的整数 n，编程实现求 s=1+2+n。
