VB样题的的答案.docVIP

《Visual BASIC程序设计》（A卷） ? 一、填空题(每空1分,共10分) 1. 单选按钮 option1.value=true ,说明该按钮 _被选中_(被选中/未选中) 2. 根据存取方式，文件可分为 _顺序___ 文件和 __随机___ 文件 3. DIM A AS integer ,也可以写成 __DIM A%____ 4. print format (63.57,”000.000”) 的输出结果是 _063.570___ 5. k=a=b 第一个是__赋值____号, 第二个是 __逻辑等__ 号 6. DIM A(2,3) as string ,则数组A 最多能放 _12_ 个元素，各元素是 _字符串__ 类型。 7. 设 a,b,c是三角形的三条边长，写出能构成三角形的逻辑表达式 ____a+bc and b+ca and a+cb____ 二、选择题(每空1分,共10分) 1. 窗体文件的扩展名是_C__ 工程文件的扩展名是 _A___ A. .vbp B. .log C. .frm D. .bas 2.“立即窗口”选项是在 _B__ 里 A.窗口菜单 B.视图菜单 C.工具菜单 D.编辑菜单 3. 在面向对象的程序设计中，对象的性质和状态特征称为 _C___ A.消息 B.类 C.属性 D.事件 4. fontbold=true表示将字体设为 __B____ A.斜体 B.粗体 C.加中划线 D.加下划线 5. 属于外颜色属性的是 _D__ A.height B. top C.left D.backcolor 6. 文本框的text 属性返回值是 _C__ 类型, autosize 属性是 _A____ 类型。 A.逻辑 B.数值 C.字符 D.日期 7. 将按钮的鼠标事件屏蔽，可将 __C___ 属性设为false A.caption B.text C.enable D.visible 8. 不能使用print 方法的对象 _D___ A.printer B.form C.picturebox D.text 三、程序填空(每空2分,共20分) 1、计算 S=1+2+3+…+100 S=0:N=0 WHILE__N100__ N=N+1 __S=S+N_____ WEND PRINT S ? 2、有一批从1到99的整数，分别统计其个位数是1，2，3，…，9的数各有多少。 DIM X(9) as integer, N as integer, M as integer,I as integer, J as integer N = val(INPUTBOX(“输入个数”)) FOR I=1 TO N M = VAL(INPUTBOX(“输入待统计的整数”)) J=____M mod 10____ X(J)=____X(J)+1_______ NEXT I FOR J=1 TO 9 PRINT X(J) NEXT J ? 3、建立并打印一个主对角线元素为1，其余元素为零的10行10列的二维数组。 DIM A(10,10) as integer FOR I=1 TO 10 FOR J=1 TO 10 ____A(I,j)=0_____ IF _____i=j______THEN A(I,J)=1 PRINT A(I,J) ; NEXT J ____Print____ NEXT I 4、 用选择法将10个两位随机整数按升序排列． OPTION Explicit Private sub command1_click() Const n＝10 DIM A(1 to n ) as integer DIM I as integer, J as integer, K as integer, T as integer FOR I＝1 TO n A(I)=___int(rnd*90+10)__ PRINT A(I); NEXT I PRINT FOR I＝1 to n-1 K＝I FOR J＝＿i+1 to n＿ IF A(K) A(J) THEN ＿＿K=J＿＿ NEXT J IF KI THEN T=A(I) A(I)=A(K) A(K)=T ENDIF NEXT I PRINTdara after sorting: FOR I＝1 TO n PRINT A(I