实习二 变量表达式与函数.doc

实习二 变量表达式与函数一、实习目的1、 1、 掌握VB的基本字符集合、词汇集合和VB的基本数据类型。2、 2、 掌握常量、变量的定义及其使用。3、 3、 掌握运算符和表达式的使用。4、 4、 掌握常用内部函数。二、实习内容1、将下面的数输入到VB软件环境的立即窗口中，观察立即窗口中的输出结果。 输入语句为：Print X 或 ？X（在VB 中Print可以用?代替，X为下列数据）（1） Int(5.72) （2） Fix(5.72)（3） Int(-5.72) （4） Fix(-5.72)（5） Abs(Int(-7.6) （6） Sqr(25)（7） Sin(60*3.14159/180) （8） Sgn(-51)（9） 13 4 / 2 （10）25 * 7 / 3（11） Val(9.8AB) （12）2006 Mod 4 （注意运算符前后有空格）2、使用立即窗口，计算下面式子的值。(1) ab (2) 2005 (3) ABCD abcd (4) 134= 134 (5) Not (47)(6) 50 Or 0-2 And Not(TURE)(7) b / cos ( 5* x ) c * d 8 (其中 b=1 ，x=2 ，c=3 ，d=1 )(8) -1 Or 0 And （x / y ）Or Not y 0 （其中x=1，y=8）提示：求（7）、（8）式子的值时，要把提示的变量值代入到表达式当中。3、使用立即窗口，执行以下语句，写出结果。S= MY NAME IS XX Print Ltrim ( S )Print Rtrim ( S )Print Ttrim ( S )Print Left (S, N) (其中N=5)Print Mid (S , P , N) (其中P=3 , N=7)Print Right(S, N ) (其中N= 9) mystring= 内蒙古农业大学Print Len ( mystring) MYS1= String (10 , *)Print MYS1 MYS2= String (10 , 42 )Print MYS2 MYS3= String (5 , GOD)Print MYS3 MYS4= HELLO & Space (6) & EVERYONEPrint MYS4 S1=Hello WorldS2=worldPOS= Instr( S1, S2)Print POS POS= Insrt( 3 , S1 , S2 , 1)Print POS POS =Insrt (5 , S1 , World)Print POS S1= H EL LO worldS2= Ucase( S1)Print S2S3= Lcase(S1)Print S3 mystring= HOW ARE YOUMid (mystring , 4 , 2 )= DOGPrint mystring4、在立即窗口依次输入下列语句，观察显示的结果，完成填空。 a% = 5 : b% = 7 : c% = 8 （VB语言中对于赋值语句允许一行使用一条语句，如果一行有多条语句，应使用冒号分隔） x = xyz : y=258 a = b : b = c : c = a Print a, b, c显示的结果是_。为什么？ y = x & y : x = x+y Print x, y 显示的结果是_。 为什么？5、在VB软件环境内的窗体窗口设计如图2-1的画面，窗体中有一个命令按钮，双击命令按钮后进入代码编辑窗口，请在已有的两行代码中间（如图2-2）分别输入以下程序，并在运行时点击命令按钮，观察运行结果，并考虑为什么？。(1) Const a#=3 (2) Const a=356756 Print a , a# Print a , a#(3) Const a= abc (4) Const a$= hello+ my friend! Print a , a$ Print a , a$(5) (5) Dim x As Integer (6) x=abcx=123 Print xPrint x x=123x=abc Print xPrint x 图 2-1 图2-2 6、新建一个工程，在Form1窗口上放置三个按钮，分别设置按钮的Caption属性值为Rnd（2）、Rnd（0）、Rnd（-2），进入代码设计窗口，分别为三个按钮编写Click事件代码，代码如下：Private Sub Command1_Click( ) Print Rnd(2);End SubPrivate Sub Command2_Click( ) Print Rnd(0);End SubPrivate Sub Command3_Click( ) Print Rnd(-2);End Sub运行程序，分别点击三个按钮，观察窗体输出的内容，理解随机函数Rnd的参数用法。7、设计程序产生100-1000的随机数，并且把它打印出来。（1）、界面设计如图2-3所示： 图 2-3（2）、属性设置如表2-1所示：控件名称Caption属性Command1产生Command2退出 表 2-1（3）、程序代码如下：Private Sub Command1_Click()Dim myvalueRandomizeStatic imyvalue = _产生1001000的随机数Print myvalue;i = i + 1If i Mod 8 = 0 Th