实验与练习.pptVIP

区分常量变量：true, “ch”, abc, 1.23e4 Dim s1 As String，s2，s3 As Double，s4 as variant,s5! 表达式23/4.6、 23\4.6、23 Mod 4.6的值分别是 表达式4+5\6*7/8 Mod -9^(1/3) 的值是 VB表达式的书写 int（-23.87）+fix（24.56）的值为 X为何数：x/2=x\2, x mod 2=0, int(x/2)=x/2, x/2=0 Cos(0)+Abs(-1)+Int(Rnd())的值是 将变量x赋值为[3，12）间的一个随机整数 Int(-3.5）,Fix(-3.5） ,round(3.5）,CInt(-3.5）的值分别是 “65x” 32, “65x” + 32 Left(“You are welcome!”,6)、 right(“You are welcome!”,6)、 Len(“You are welcome!”)的值分别是 3. 函数Mid(“NanHua,10,4)、 Instr(1,”I love you”,”Love”)的值分别是 X=now; y=month(x); z=hour(x) 已知“A”的ascii码是65，asc(”Basic”)、chr(E)的值分别是 答疑时间 周三5-6节，8-402，17-18周 周三5-6节，8-402，17-18周 实验要求 必须带理论教材和作业（笔记）本！ 保存在c:\临医0101姓名文件夹下 最好自备移动存储设备备份 实验0 1、熟悉VB开发环境，对各子窗口进行显示/隐藏，添加常用控件、设置常用属性等： 窗体: 标签:字体、字号、颜色、对齐 文本框: 命令按钮: 图片框: 形状: 直线： 实验0 2、第一个VB应用程序，熟悉可视化程序设计步骤： 创建工程（.exe可执行文件） 添加控件，设置属性 编写代码（对应控件的对应事件） 保存到自己的文件夹 启动运行、调试修改 保存 验证例题：任给4个数，计算它们的和及平均值 实验0 3、验证例题：笼中有鸡和兔共h只，脚共f只，问鸡和兔各多少只？ X=(4h-f)/2 Y=(f-2h)/2 实验1 1、理论教材Pa.50：三、3~4，在同一个窗体中做。 2、窗体上添加一个标签、3个命令按钮，单击第一个按钮时标签字号扩大为2倍，单击第二个按钮时标签向右、下各移动100个单位（缇），单击第三个按钮时标签在窗体上居中、字体为20（磅）。 3、简单应用题： ①利用rnd函数设计一个简单的随机取号程序。（建议：用户输入取值下界m和上界n） ②用户输入一个整数n,在窗体上打印一行n个“*”。 ③分别在4个标签中显示当前系统年、月、日和时间。 实验2 1、设计应用程序，实现功能：用户输入长方形的长、宽值，求面积、周长及长与对角线夹角的正弦值。 或：用户输入半径，求圆面积和周长、球体表面积和体积。S球=4πr2，V球=4πr3/3 （注意：数据的表示、输入输出的方式） 2、用户输入一个1-3位数的整数（如47），求该数的：①位数；②每一个数位；③逆序数。 （提示：可利用相关的字符串函数或算术运算符） 3、设计多窗体应用程序:账号、密码正确登录进入主界面(计算器1.0），否则弹出对话框提示输入有误。 长方形参考代码 Private Sub Command1_Click() Dim a As Single, b As Single Dim s As Single, c As Single, sin_a As Single a = Val(Text1.Text) b = Val(Text2.Text) s = a * b c = 2 * (a + b) sin_a = b / Sqr(a ^ 2 + b ^ 2) Label1.caption=“s=” s “c=” c “sin_a=” sin_a End Sub 实验3 1、用户输入一个整数，判断奇偶性。 2、Pa.72:二、2，选做：并求出相应的根。 3、用户输入三个数，判断能否构成三角形，能求面积。L=(a+b+c)/2,s= 4、用户输入三个数，输出最大值。 选做题： 5、水仙花数形如：153=13+53+33,用户输入任意一个三位数的整数，判断是否水仙花数。 6、输入一个字符，若为英文字母则转成小写输出，其它原样输出。 实验4 1、用户输入任意的年、月，判断该月天数。（闰年条件：能被4但不能被100整除、或者能被400整除） 或：“体重计算与判断”题 2、利用选择性控件对文本框或标签进行字体设置（字体、颜色、效果等） 或：“实验七 兴趣爱好调查程序” 3、计算器2.0（+、-、*、/）