《2021年《高级语言程序设计(VB.NET)》平时作业华南理工大学网络教育学院》由会员分享，可在线阅读，更多相关《2021年《高级语言程序设计(VB.NET)》平时作业华南理工大学网络教育学院（5页珍藏版）》请在金锄头文库上搜索。
1、高级语言程序设计(VB.NET)作业 2021.2教学中心： 专业层次： 学 号： 姓 名： 注意事项：1. 本作业共五大题，满分100分；2. 请将以上各项信息填写清楚,否则,作0分处理；3以word文件附件形式提交，不能以图形文件附件形式提交。交作业文件的名字必须含有你的名字（例如：vb作业（2021.2）王小兵）。（建议以2003版word附件形式提交） 4. 所有答案直接写在答案栏上,答在其它地方无效。一. 判断题(如正确打，否则，打。)1. Write_1 和学校$ 是不正确的变量名。 2源程序中的错误一般分为编译错误、运行错误和逻辑错误等三种。3若一个整型变量说明了之后没有给它赋值
2、，则它的值为0。4判别ch是否为小写字母，若是，输出“yes”；否则，输出“No”的块结构条件语句为:If Asc(ch)=97 And Asc(ch)=122 Then WriteLine (“Yes”)Else WriteLine(“No”)End If5如果数组元素的下标值为实数，则VB.Net系统会按四舍五入原则进行处理。6函数过程定义中必须有一个赋值语句把表达式的值赋给函数过程名。7. 事件是由VB.Net系统预先设置好或者在程序中由编程者自己设计的，它能够被对象识别的动作。8. 从文件取出一组数据以流的方式存放到程序的变量或数组中称为向流写入数据。9. 文件流类FileStream
3、用于打开和关闭文件，并提供对文件按字节的读/写操作。10.若某个模块中以关键字public定义子过程，则只能在该模块中可以调用该过程。答案栏： 1 2 3 4 5 6 7 8 9 10 二. 单项选择题 1设X为整型变量,不能正确表达1 X 5的逻辑表达式是( A )。A. 1 X 5 B. X=2 or X=3 or X=4C. 1X And X 5 D. Not (X=5)2设有数组说明语句：Dim c( 10) AS Integer，则下面表示数组c的元素选项中（D）是错误的。A. c(i-1) B. c(5+0.5) C. c(0) D. c(11)3下面不合法的标识符是（B ）。A.
4、 o_To B. Integer C. 姓名 D. Int14VB.NET是一种( C )程序设计语言。A. 面向事件 B. 面向属性 C. 面向对象 D. 面向过程 5. 设已定义函数过程f，它有三个实型传值参数；设a,b和c为实型变量，则调用该函数的正确形式为（ C ）。A. f B. f( a+b, b+c )C. f ( a+b, b+c ,c+a ) D. f a+b, b+c, c+a6 若使命令按钮可见，可以设置Visible属性的值为（ A ）。A. FalseB. True C. T D. F7要使单选按钮RadioButton处于选中或未选中状态，需由（ D ）属性来决定。
5、A. Show B. List C. Text D. Checked8要删除列表框中的某一个项目，需要使用（ B ）方法。 A. ClearB. ReMoveC. MoveD. ReMoveItem9要设置计时器的时间间隔可以通过（ D ）属性来实现。 A. ValueB. TextC. MinimumD. InterVal10下面（ A ）类用来把数据写入文本文件中。 A. StreamWriter B. BinaryWriter C. StreamReader D. BinaryReader答案栏： 1. _A_ 2. _D_3. _B_ 4. _C_5. _C_6. _A_7. _D_8
6、. _C_9. _D_10. _A_ 三.简答题1. 标识符的作用是什么?它的选取必须遵循什么规则？2.下列窗体上有哪些控件?3. 文件操作可以分为哪些步骤?答案栏： 1.答：标识符用于标记用户自定义的常量、类型、变量、控件、过程、函数等名称。标识符的选取必须遵循如下规则：必须以英文字母或汉字开头，由英文字母、汉字、数字和下划线组成。不能与关键字同名。另外，允许使用汉字作为用户自定义标识符。2.答:窗体上的控件有窗体1个、Label有5个、Textbox有5个、Button2个3. 3.答：文件操作可分为三个步骤如下：打开文件；读(磁盘内存)或写(内存磁盘)文件；关闭文件 四.程序阅读题 1当
7、x的输入值分别为2.5、8、4和15时，写出执行下列程序的输出结果。Imports System.Console Module Module1 Sub Main() Dim x%, y% Write(请输入x的值:) x = ReadLine() Select Case x Case 1, 3, 5 y = x - 1 Case 6 To 10 y = x + 1 Case 2, 4 y = 2 * x Case Is 10 y = x * x + 1 End Select WriteLine(x=0 y=1 , x, y) End Sub End Module2. 写出执行下列程序的输出结果
8、。Imports System.ConsoleModule Module1 Sub Main() Dim f(5) As Integer, i As Integer f(0) = 0 : f(1) = 1 For i = 2 To 5 f(i) = 2 * f(i - 2) + 4 * f(i - 1) Next i For i = 0 To 5 If i Mod 2 = 0 Then WriteLine() Write(0 , f(i) Next i WriteLine() End SubEnd Module1. x=2 y=4、x=8 y=9、x=4 y=8、x=15 y=2262. f(
9、0)=1f(1)=1f(2)=2f(3)=3f(4)=5f(5)=8f(6)=13f(7)=21f(8)=34f(9)=55f(10)=89五.程序填空题 1. 下面程序的功能是：求的值，在横线上填上适当内容。 Imports System.ConsoleModule Module1 Sub Main() Dim i, n%, s! Write(n=) n = (1) i = 1 : s = (2) While i = n s = s + (3) i = i + 1 End While WriteLine(s=0, s) End SubEnd Module2. 下面程序的功能是输入m和n的值，
10、并按公式：求组合数的程序，在横线上填上适当内容。Imports System.ConsoleModule Module1 Sub Main() Dim m&, n&, cmn#, c1&, c2&, c3& Write(n=) n = ReadLine() Write(m=) m = ReadLine() Call fac(m, c1) : Call fac(n, c2) : Call fac(m - n, c3) cmn = (4) WriteLine(cmn=0 , cmn) End Sub Private Sub fac(ByVal k&, ByRef f&) Dim t&, i& t = (5) For i = 1 To k t = t * i Next i (6) End SubEnd Module答案栏： （1） Read Line() （2） 0 （3） 1、（i*i） （4） C1(C2*C3) （5） 1 （6） f=t 高级语言程序设计(VB) 第 1 页 （共 4 页）
