程序设计基础知识(基本数据类型、常量、变量和一维数组) 班级：_ 姓名：_【知识要点】一、常用数据类型整型Integer从-32768到32767长整型Long从-2147483648到2147483647单精度实型Single负数-3.402823E+38到-1.401298E-45正数1.40129E-45到3.402823E38 但它只有7位有效数字双精度实型Double绝对值小于10308的数，它有15位有效数字日期型Date(Time)如：#2008-01-31# #01/31/2008#字符型String如：“中国”，“zhongguo”布尔型BooleanTrue或False二、常量：在程序进行过程中不变的量，在VB中一般分数值常量与字符常量两种。数值常量：就是数学中说的常数，分整型常量和实型常量两种整型常量：即整数，指不带小数点的数值。实型常量：即实数，指带小数点的数值。字符串常量：被一对双引号括起来的若干个合法的字符称为字符串常量。符号常量：如果多次用到同一个常量，则可用一个有意义的名字表示这个常量。符号常量的声明：Const 常量名 As 常量类型 = 常量值如：Const pi As Single = 3.14159三、变量：在程序执行过程中，其值可以改变的量称为变量变量命名注意要点：1、必须以字母开头,后跟字母、数字或下划线任意组成。2、不能以VB保留字作变量名，如语句定义符、函数名等。3、VB不区分变量名中字母大小写变量的声明：Dim As 如：Dim a As Integer四、数组变量。数组是一批同类型的变量构成的序列，组成数组的每一个变量称为数组的元素，数组中每个元素的位置由它的下标唯一的确定。数组的定义：一维数组定义(只有一个下标)：Dim数组变量名(A1 To A2) As 元素的类型提示：定义数组时，若省略下标A1，默认下标从0开始。【练习与巩固】1.在VB中，若将500名献血志愿者的血型信息 (如“A型”)全部存储在数组data中，则下列最合适的说明语句是( )A. Dim data(1 To 500) As IntegeB. Dim data(1 To 500) As SingleC. Dim data(1 To 500) As StringD. Dim data(1 To 500) As Boolean2下列属于字符型常量的是( )A.word B.北京奥运会C.#2006-11-10# D.12343下列属于整型常量的是( ) A.2006 B.一千零一 C.1997 D.3.144在Visual Basic中，下列能作为变量名的是( )A. My B. If C. a+y D. 2nd5在Visual Basic中，以下可作为合法变量名的是（ ）A. Count_2sB. Text123 C. Chr D. 2ab6在Visual Basic中，用变量code存储数据“HN2012” ，下列说明语句正确的是( )A. Dim code As Integer B. Dim code As SingleC. Dim code As String D. Dim code As Boolea7在Visual Basic程序中要用到存储范围为-150000150000的某一整数变量，则该变量的类型应该定义为( )A.Integer B.Long C.Single D.Boolea8在VB中，用变量book存储一行诗句，那么变量book的数据类型应定义为()ASingleBBooleanCStringDInteger9在Visual Basic中，定义字符串常量a的正确语句是( )A.Const a As IntegerB.Const a= hello As StringC.Dim a As StringD.Const a = hello”10在Visual Basic中，要定义一个由50个元素构成的一维整型数组cp，下列语句正确的是( )A.Const cp(1 to 50) As IntegerB.Dim cp(1 To 50) As IntegerC.Const cp(1 To 5) As IntegerD.Dim cp As Intege11. 要定义一个可存储数值9.123的变量，其合适的类型是()A.IntegerB.SingleC.LongD.Boolean12. 在Visual Basic中，语句Dim b(10) As String所定义的数组元素个数是 ()A.1B.9C.10D.1113下面不是字符串常量( )A.True B.#False# C. D.你好14下列语句中定义了一个实型变量的是 ( )A.Dim end as Integer B.Dim sum As SingleC.Dim Name As String D.其它三项都不对8在VB数组说明语句Dim a(2 To 5) As Single中，定义的数组元素个数()A共5个 B共6个C共7个 D共8个9有如下VB程序段：Private Sub Command1_Click() Dim a(1 To 3) As Integer a(1) 11 a(2) a(1) 13 a(3) a(1) a(2) Text1.Texta(3)End Sub执行完毕后，文本框Text1中显示的是()A11 B13C24 D3510.有如下的Visual Basic程序：Private Sub Command1_Click() Const pi = 3.14 Dim s As Single, r As Single r = Val(text1.Text) pi = 3.1415 s = pi * r 2 Label1.Caption = 面积为+ Str(s)End Sub程序运行后，单击命令按钮Command1，出现如图所示的错误提示，下列原因分析正确的是( )A.常量不能用小数B.pi是常量，不允许赋值C.文本框Text1中输入的数据不是常量D.表达式结果超过了变量类型的范围11某VB程序的代码如下：Private Sub Command1_Click() Dim a(1 To 3) As Integer Dim x As Integer x 5 a(1) x a(2) 2 * x a(3) a(1) a(2) a(4) Exp(a(3) Label1.CaptionStr(a(4)End Sub运行程序，单击命令按钮Command1后，出现的错误提示为()A溢出 B子程序或函数未定义C下标越界 D类型不匹配12有如下VB程序段：Private Sub Command1_Click() Dim a(1 To 5) As Integer a(3) 123 a(6) 456 Text1.Text a(1)End Sub 程序执行完毕后，出现如上图所示的错误，引起此错误的语句是()ADim a(1 To 5) As IntegerBa(3) 123Ca(6) 456DText1.Text a(1)13某VB程序段如下：Private Sub Command1_Click() Dim a As Integer a Val(Text1.Text) a a 2 1 Text1.Text Str(a)End Sub程序运行时，在文本框Text1输入10，连续两次单击命令按钮Command1后，文本框Text1中显示的内容是()A10 B6 C4 D3 4 / 4