VB实验指导与练习题实验部分的参考答案_第1页
VB实验指导与练习题实验部分的参考答案_第2页
VB实验指导与练习题实验部分的参考答案_第3页
VB实验指导与练习题实验部分的参考答案_第4页
全文预览已结束

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

VB实验指导与练习题实验部分的参考答案：实验 44-1： 2*pi*rPi*r*r4-3: chr(64+n)4-4: x mod 10 x 10 mod 10 x1004-5: mid(s,i,1)=Lcase(t)实验 55-1： a+b+c+dSum/45-2: (4*h-f)/2 (f-2*h)/25-4: sec360024 Sec mod (1& 24*3600) mod 3600 mod 605-5: 0.5*g*t*t+v0*t实验 66-1: left(text1,text1.selstart) & text2 & right(text1, len(text1) text1.selstart)6-2: timer1.enabled=true Timer1.enabled=false6-3: shape2.left=shape2.left +d *506-5: a & check2.caption6-6: list1.listcount -16-7: 1000 List1.list(i)6-8: text1实验 77-1: n=n-3500 n-y text1.setfocus7-2: a=a & c7-3: sum +j Sum=12507-4: m=n n=r r= m mod n7-5: if a mod i=0 then exit for 7-6: text1 S2 & mid (s1,k,1)S2=”7-7: 2 nfactor factor+17-8: n7-9: sum=0 s & i & “ +” list1.clear7-10: mid(text1, i, 1)实验88-1：a(i)=a(16-i) a(16-i)=temp8-2: a(i-2)+a(i+1)+1 Text2 & vbcrlf8-3: picture1.print i=1 to 5 sum=sum+a(I,j) next i sum+a(i,j)+a(i,6-i) not ( i1 and
人人文库> 全部分类> 行业资料 > 管理策划

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论