Visual Basic.NET程序设计实验实训指导 教学课件 作者 邱炳城 实验3 猜数游戏.ppt

《Visual Basic.NET程序设计实验实训指导 教学课件 作者 邱炳城 实验3 猜数游戏.ppt》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、VisualBasic.NET程序设计实验实验3猜数游戏7/22/2021【功能描述】由计算机随机产生一个[1，100]间的整数，给用户猜测，每次给出猜大了还是猜小了的提示。最多猜5次，5次均猜错即为输。7/22/2021【实验内容】1．For-Next语句及If-Else-EndIf语句的应用。2．ListBox控件的应用3．Int()、Val()、Str()函数的运用。4．MessageBox.Show()方法的运用。5．Me关键字的运用。7/22/2021【实验目的】1．掌握For-Next语句的

2、格式、功能及运用。2．熟悉语句结构的嵌套及灵活应用。3．掌握通过代码改变窗体及其控件的属性的方法。4．熟悉人机交互的多种方法。7/22/2021【预备知识】1．赋值运算2．相关函数3．For-Next语句4．MessageBox.Show()方法5．Me7/22/2021【实验步骤】1．创建及保存项目2．“即时”窗口的使用3．窗体设计4．程序设计5．程序调试6．程序改进7/22/2021【问题与思考】1．在“即时”窗口输入一些命令，比较函数Str()和CStr()的异同。2．通过联机帮助学习Format()

3、函数的使用方法。3．试按下面要求改写程序：不限制用户的猜数次数，改为以成绩来评价游戏结果。每局（猜一个数）给初始分为100分，每猜错一次扣10分，直至猜对为止。然后重新产生一个数，进入下一局。每猜一次都在窗体上显示出累计得分。4．试按下面要求改写程序：当用户挑战成功（5次之内猜对）或挑战失败（5次都猜错）时，不用消息框显示游戏结果，改为用图片显示游戏结果。用一幅胜利形象的图片表示挑战成功，用一幅失败形象的图片表示挑战失败。5．过程zoom中的For语句使用参数d作为步长值，如果有代码使用zoom（0）来调用

4、该过程，会出现什么不良后果？如何改进？7/22/2021赋值运算赋值运算符除了实验1介绍的“＝”外，还有+=、-=、*=、/=、=、^=、&=等，这些运算符的运算功能是：将一个表达式与一个变量或属性进行运算，并将结果赋给该变量或属性。如：+=——将一个数值表达式的值与一个数值变量或属性的值相加，并将结果赋给该变量或属性。&=——连接String表达式与String变量或属性，并将结果赋给该变量或属性。运算符“+=”除了作数值运算外，也可以作字符串（String）连接运算，但通常使用“&=”作为String

5、连接运算符。7/22/2021赋值运算示例下面代码运行后，变量x的值为20，而变量y的值为"128"。DimxAsInt16=12DimyAsString="12"x+=8y&=87/22/2021Int()函数该函数用于进行取整运算。Int(n)的返回值为不大于n的最大整数。例如：Int(3.89)返回值：3Int(-3.2)返回值：-4。7/22/2021Val()函数该函数用于将字符串转换为数值。转换时，如果第1个字符不是数字字符，则返回数值0。例如：Val("23KM")返回值：23Val(“APP

6、LE”)返回值：0。Val()函数在转换时能识别E、小数点、&O前缀（八进制）、&H前缀（十六进制），并且会排除空格、制表符和换行符。例如：Val("2.6E3KM")返回值：2600Val("&O14")返回值：12Val("&H1F")返回值：31Val("1615198thStreetN.E.")返回值：16151987/22/2021Str()函数与Val()函数对应的函数Str()，可用于将数值转换为字符串。如果参数是正数，转换结果保留前导空格。例如：Str(345)返回值："345"Str(-3

7、.14)返回值："-3.14"。7/22/2021For-Next语句常用的For语句格式为：For循环变量=初值To终值[Step步长值]语句sNext[循环变量]执行For语句时，初值赋给循环变量，并判断循环变量的值是否超过终值。如果超过，则执行Next后面的语句，否则执行“语句s”。执行Next语句时，循环变量加上步长值，然后判断循环变量的值是否超过终值。如果超过，则执行Next后面的语句，否则执行“语句s”。7/22/2021For-Next语句的运行过程Yes循环变量=初值语句sNoNextFor

8、循环变量+=步长循环变量值超过终值？7/22/2021For语句示例1下面代码用于求100以内奇数的和，结果赋给变量s。Dimi,sAsIntegers=0Fori=1To100Step2s+=iNexti7/22/2021For语句示例2如果循环变量在For语句之前未声明，则可在For语句中声明。下面代码产生10个用"Hello"连接的字符串，结果赋给变量h。DimhAsStringForiAsInteger=