自己编写的VB程序，请大家多指教！（赚一点积分嘿嘿……）部分代码如下：PrivateSubCommand1_Click()k=1.4D=Val(Text1.Text)S=Val(Text2.Text)Ne=Val(Text3.Text)nh=Val(Text4.Text)ε=Val(Text5.Text)L=Val(Text6.Text)R=Val(Text7.Text)ge=Val(Text8.Text)P0=Val(Text13.Text)T0=Val(Text12.Text)gc=Val(Text9.Text)gh=Val(Text10.Text)go=Val(Text11.Text)mt=Val(Text14.Text)i=Val(Text15.Text)ι=Val(Text16.Text)α=Val(Text38.Text)ξz=Val(Text40.Text)φi=Val(Text41.Text)ηm=Val(Text42.Text)n=Val(Text45.Text)Vh=(S*0.01)*3.14*(D*0.01)^2/4'排气过程Pr=1+0.3*n/nhTr=850+350*n/nhText17.Text=Val(Pr)Text18.Text=Val(Tr)'进气过程δ=0.5ΔT=ΔTh*(110-0.0125*n)/(110-0.0125*nh)Pa=Int(10^3*(P0*(1-((10*n^2/520/10^6)/10.6^2/0.75^2)*(ε-δ)^2/(ε-1)^2)^(k/(k-1))))/10^3γ=Int(10^3*(T0+ΔT)*Pr/Tr/(ε*Pa-Pr))/10^3Text44.Text=γText19.Text=PaTa=(T0+ΔT+γ*Tr)/(1+γ)ηv=ε*Pa*T0/(ε-1)/P0/Ta/(1+γ)Text20.Text=Val(Int(1000*Ta)/1000)Text21.Text=Val(Int(1000*ηv)/1000)'压缩过程n1=1.46-0.05*Nn/nPc=Pa*ε^n1Tc=Ta*ε^(n1-1)Text22.Text=Val(Int(1000*Pc)/1000)Text23.Text=Val(Int(1000*Tc)/1000)'燃烧过程L0=(gc/12+gh/4-go/32)/0.21M1=α*L0+1/mtCv1=(4.815+0.415*10^(-3)*Tc)*4.1868M2=0.79*α*L0+gh/2+gc/12A=(3.7+3.3*α)*10^(-4)*4.1868B=(4.4+0.62*α)*4.1868μ0=M2/M1μ=(μ0+γ)

将其他资源放到自身EXE程序.通过调用指定的ID资源,进行释放到指定目录.源代码

简单实现了二维装箱问题。
不过仅仅是简单实现，排列7、8个矩形没问题，超过10个就要花N久了。
。
简单实现了二维装箱问题。
不过仅仅是简单实现，排列7、8个矩形没问题，超过10个就要花N久了。
。

简单易懂,用到少量的vb知识,能运行成功

局域网聊天工具的最基本的技术实例，两个电脑可以连接传送信息。

VB+SQLC/S架构汽车租赁管理信息系统源代码(注:非本人开发)

学生信息管理系统VB学生信息管理系统VB学生信息管理系统VB学生信息管理系统VB学生信息管理系统VB学生信息管理系统VB学生信息管理系统VB学生信息管理系统VB学生信息管理系统VB

此程序用于高速采集设备的数据的实时显示。
通过串口接收数据（数据格式为：十六进制数的字符串，四个数据间为空格，最后是回车）每接收10组数据，对数据进行处理，然后在界面上用波形显示出来，波形的显示范围可以随数据范围变动。
典型的串口输入测试数据为：123445566fae21f3445566fae21235a5566fae2f23445564fae2123445566fae2123445566fae2126445566fae2123445566fae2123445566fae2123445566fae2将上面的数据以字符串形式直接发送给程序的串口，进行测试。
要很多这样的数据才能看到波形。

这个绝对不是病毒，我自己用visualbasic编写的解答数独的小程序。
。
。
。
不收费哦。
。
欢迎大家下载使用！！什么是数独游戏(可以参考百度百科)数独（すうどく，Sūdoku）是一种运用纸、笔进行演算的逻辑游戏。
玩家需要根据9×9盘面上的已知数字，推理出所有剩余空格的数字，并满足每一行、每一列、每一个粗线宫内的数字均含1-9，不重复。
独盘面是个九宫，每一宫又分为九个小格。
在这八十一格中给出一定的已知数字和解题条件，利用逻辑和推理，在其他的空格上填入1-9的数字。
使1-9每个数字在每一行、每一列和每一宫中都只出现一次，所以又称“九宫格”。
http://baike.baidu.com/subview/961/10842669.htm?fr=aladdin(参考百度百科的内容)编程的初衷办公室里忽然开始玩数独了，在百度的文库里下载了几道题，回家玩了几个晚上，挺好玩的，但是苦于没有答案可对，有些题解到最后无解了也不知道是题目错了还是自己解错了。
利用出差的闲暇时间，我用visualbasic编写了这个小程序。
现在和大家分享一下，希望喜欢数独的你可以对对答案。
当然了，有些人说我毁了这个游戏的乐趣。
对不起啊，这个东西就是一把双刃剑，看你怎么用了，我的初衷是对答案，不是偷懒。
。
。
使用注意事项1）网格里可以用左右上下键控制光标2）程序库里一共128道题，均来源于网络。
您也可以手动输入数独题目求解3）本程序免费提供给你，如果因此造成您机器的死机等等概不负责！(万亿分之一的概率，但是我怕遇到流氓额我啊！)4）程序里有我的email地址，有疑问的可以email我，嘿嘿。
5）我要保留我的版权，未经允许不得转载，不得用于商业用途6）不得将我的程序重新发布并且打包设置权限骗取注册，本来及时免费的，否则法庭见！7）要源代码的就省省吧。
嘻嘻。
给你一条鱼，你就不要管钓到的方法了！！

MSBCODE9.OCX是微软条形码控件用到的一个对象扩充组件，一般来说在进行条形码打印的时候会用到这个组件，经用户测试可以完美兼容office2007以及以及以上的版本，下载注册之后就可以正常使用了，有需要的办公用户快快下载吧。