VB实验报告5.docVIP

* 学号：090900xx 姓名：xxx 班级： 0xxx 实验时间：20xx.4.17 实验编号 VB01 实验名称 函数、表达式和Print方法的使用 实验目的和要求 掌握表达式的使用。 掌握函数的使用。 掌握print的使用及有关函数的使用。 实验内容 1.print方法的作用。 2.算术、关系、逻辑等表达式的使用。 一、实验题目 1. 设计出如下图所示的界面，程序运行时，在第一个文本框中输入字符，单击下列三个按钮时，在第二个文本框是出现相应的数据（反串字符：出现输入字符的反顺序；三个首字符：出现由输入字符的首字符组成的三个字符长度的字符串；字符长度：出现输入字符的长度） （1）属性设置： 控件名 属性名 属性值 Label1 caption 输入字符 Label2 caption 对应的数据 Command1 Caption 反串字符 Command2 Caption 三个首字符 Command3 Caption 字符长度 （2）代码编写： Private Sub Command1_Click() Text4.Text = StrReverse(Text3.Text) End Sub Private Sub Command2_Click() Text4.Text = String(3, Text3) End Sub Private Sub Command3_Click() Text4.Text = Len(Text3.Text) End Sub （3）运行结果截图 . 2. 当单击窗体时，窗体上出现下图所示图案。窗体文字大小为20（提示：利用print及对应函数） （1）代码编写： Private Sub Form_click() Print 12345678901234567890 Print 2; Tab(15); * Print 3; Tab(14); *; Tab(16); * Print 4; Tab(15); * Print 5; Tab(14); *; Tab(16); * Print 6; Tab(15); *; End Sub （2）运行截图： 3.在文本框一中分别输入VB中的表达式，单击按钮在窗体上第十个字符处输出各表达式的值，输出字符大小为：小初号，文本框中字符大小为：三号，并且算出的值前面要无空格，如例题中所算出的20前无空格（提示可用函数实现该功能）。(a=2:b=3:x=4:y=5) （1）Cos2(a+b)+5e2 (2)x3+ Private Sub Command1_Click() a = 2: b = 3: Print Cos(a + b) *(a+b) + 5 * exp(2): Tab(10); End Sub Private Sub Command1_Click() a = 2: x = 4: y = 5 Print x ^ 3 + Sqr(4 * y - 3 * x) / 2 * a; Tab(10) End Sub 例：算出表达式2x+4y的值： 二、实验感受(包括上机过程中遇到的问题和如何解决的问题、通过上机实践学到了些什么知识、对上机的意见等) 1.不断的加强上机训练胜过一切，除此之外，一定要加强对书本知识的理解与消化，特别是书中的一些编写语句，不仅是去模仿，还要去记忆，否则的话，每次上机练习总是十分陌生。勤学苦练才是制胜的法宝。 2.编这种程序要特别有耐心，不要因为一次两次的失误而急躁，加强对操作的熟练度，要把每一步的输入熟练于心。 Visual Basic 程序设计 实验（训）报告