1、区分常量变量：true, “ch”, abc, 1.23e4 Dim s1 As String，s2，s3 As Double，s4 as variant,s5! 表达式23/4.6、 234.6、23 Mod 4.6的值分别是 表达式4+56*7/8 Mod -9(1/3) 的值是 VB表达式的书写int（-23.87）+fix（24.56）的值为 X为何数：x/2=x2, 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
2、）,CInt(-3.5）的值分别是,“65x” 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可执
3、行文件） 添加控件，设置属性 编写代码（对应控件的对应事件） 保存到自己的文件夹 启动运行、调试修改 保存 验证例题：任给4个数，计算它们的和及平均值,实验0,3、验证例题：笼中有鸡和兔共h只，脚共f只，问鸡和兔各多少只？ X=(4h-f)/2 Y=(f-2h)/2,1、理论教材Pa.50：三、34，在同一个窗体中做。 2、窗体上添加一个标签、3个命令按钮，单击第一个按钮时标签字号扩大为2倍，单击第二个按钮时标签向右、下各移动100个单位（缇），单击第三个按钮时标签在窗体上居中、字体为20（磅）。 3、简单应用题： 利用rnd函数设计一个简单的随机取号程序。（建议：用户输入取值下界m和上界n）
4、 用户输入一个整数n,在窗体上打印一行n个“*”。 分别在4个标签中显示当前系统年、月、日和时间。,实验1,实验2,1、设计应用程序，实现功能：用户输入长方形的长、宽值，求面积、周长及长与对角线夹角的正弦值。或：用户输入半径，求圆面积和周长、球体表面积和体积。S球=4r2，V球=4r3/3 （注意：数据的表示、输入输出的方式） 2、用户输入一个1-3位数的整数（如47），求该数的：位数；每一个数位；逆序数。 （提示：可利用相关的字符串函数或算术运算符） 3、设计多窗体应用程序:账号、密码正确登录进入主界面(计算器1.0），否则弹出对话框提示输入有误。,Private Sub Command1_
5、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、用户输入三个数，
6、判断能否构成三角形，能求面积。L=(a+b+c)/2,s= 4、用户输入三个数，输出最大值。 选做题： 5、水仙花数形如：153=13+53+33,用户输入任意一个三位数的整数，判断是否水仙花数。 6、输入一个字符，若为英文字母则转成小写输出，其它原样输出。,实验4,1、用户输入任意的年、月，判断该月天数。（闰年条件：能被4但不能被100整除、或者能被400整除） 或：“体重计算与判断”题 2、利用选择性控件对文本框或标签进行字体设置（字体、颜色、效果等） 或：“实验七 兴趣爱好调查程序” 3、计算器2.0（+、-、*、/） 选做题： 4、奖学金评定方案,体重计算与判断 计算中国人理想体重的方
7、法： 北方人理想体重=(身高cm-150)0.6+50(kg) 南方人理想体重=(身高cm-150)0.6+48(kg) 标准体重, 标准体重+10) ，需保持 标准体重+10, 标准体重+20)，需控制 标准体重+20, 标准体重+30)，需小减 标准体重+30, 标准体重+50)，需大减 标准体重+50,) ，需狂减 试设计应用程序： 、输入或选择你的所属区域，计算你的理想体重 、输入你的实际体重，判断你的体型是否需要减肥,实验5（数组、For循环）,1、用控件数组实现计算器2.0 2、设计应用程序：用户输入整数，求n! ，即1*2*n 3、求200,300内能被3整除且不能被5整除的数。
8、 4、统计全班125人的VB成绩平均分、最高分、最低分（要求用rnd函数自动产生成绩数据）。 选做题： 4、分别产生125人的平时成绩和考试成绩，计算总评成绩。 5、输入10个数，统计负数个数并计算正数和。,1、求1！+2！+n！。 2、输入行数n，打印图案： * * * * 3、求所有的水仙花数，即100,999间满足n=g3+s3+b3。 或：求30以内所有勾股数组合（满足a2+b2=c2)。 4、数组处理：输入10个数，逆转该数组并输出。选做：排序输出,实验6（ For循环、多重循环）, ,* * * *,实验78（Do循环、排序）,1、目前世界人口约69亿，若以每年1.3%的速度增长，
9、10年后人口数？多少年后将达到（或超过）80亿？ 或：苹果1.2元/个，第一天买1个，以后每天翻倍，10天后共花多少钱？直到苹果总数将达到（或超过）100个的前一天为止，平均每天的花费？ 2、利用pi/4=1-1/3+1/5-1/7+求pi的近似值，直到最后一项的值小于10-6为止。 3、数组处理：输入10个数，排序输出。,座位安排,医检：149，课代表50 口腔：51110，课代表63 影像：113161 ，课代表162 麻醉：163215 ，课代表175,1、数组处理：输入10个数，逆转该数组并输出。 2、数组处理：输入10个数，对该数组进行排序并输出。,实验9,实验10,1、列表框、组合框应用 2、计时器应用,1、分别编写Sub和Function过程实现求阶乘2、在1.的基础上继续编程，调用过程求 S1=A!+B!+C! S2=1!+2!+.+N! 3、编写一个求任给3个数的最大值的通用过程，调用该过程， 1）求用户输入的3个数的最大值 2）求用户输入的5个数的最大值 3）求用户输入的7个数的最大值,实验11,
