实验3(顺序结构程序).doc

实验3 顺序结构(设计性)
实验目的
掌握顺序结构程序的概念
掌握赋值语句的一般格式、功能和使用
掌握Print方法、Tab函数、Spc函数和Format函数的功能和使用
掌握在属性窗口中设置属性值的方法
了解在工程中添加窗体的实验3 顺序结构(设计性)
实验目的
掌握顺序结构程序的概念
掌握赋值语句的一般格式、功能和使用
掌握Print方法、Tab函数、Spc函数和Format函数的功能和使用
掌握在属性窗口中设置属性值的方法
了解在工程中添加窗体的操作
实验内容
实验1：利用下列程序测试Print方法的功能。
Private Sub Form_Click()
Dim x
Print -2 * 3 / 2, "Visual " & "Basic", Not 5 > 3,
Print -2 * 3 / 2; "Visual " & "Basic"; Not 5 > 3;
x =
Print "x=";
Print x
End Sub
实验2：利用下列程序测试Tab函数和Spc函数的功能及其区别。
Private Sub Form_Click()
Print Tab(10); -100; Tab(20); 200; Tab(30); -300
Print Spc(10); -100; Spc(20); 200; Spc(30); -300
End Sub
实验3：利用下列程序测试Format格式化函数的功能。
Private Sub Form_Click()
Dim x!
x =
Print Format(x, "###.##")
Print Format(x, "##.##")
Print Format(x, "")
Print Format(x, "")
Print Format(x, "%")
Print Format(x, "$##.##")
Print Format(x, "+##.##")
Print Format(x, "+00")
End Sub
实验4：Print方法练习，显示下图所示字符图形。
要求窗体不可改变大小，当单击“清屏”按钮后，清除窗体所显示的图形。读者也可以发挥自己的想象力，设计更美观的图形。
实验5：编一个华氏温度与摄氏温度之间的转换程序。
界面自己设计，要求按两种方法进行转换：
（1）用命令按钮实现转换。即单击“转为华氏”按钮，则将摄氏温度转换为华氏温度；同样，单击“转为摄氏”按钮，则将华氏温度转换为摄氏温度。温度转换公式：C=（F-32）*5/9
（2）不用命令按钮，当文件输入完成时直接进行转换。即当用户在摄氏温度文本框输入结束（以按回车表示， KeyAscii的值为13 ），激发KeyPress事件，将摄氏温度转换为华氏温度；同样，华氏温度转换摄氏转换的方法也是如此。
实验6：字号、按钮、随机函数练习。
在文本框输入一字符串，对学号进行放大和缩小，缩小比例由随机函数产生。要求：
单击“放大”按钮，将文本框中的字符