VB演示三种FileSystemObject文件操作方法

VB6 判断文件是否存在，使用VB内置的函数FileExists来实现，可以说实现方法简单，直接调用函数（文件路径）即可，至于返回的结果，这里有两种形式，一种是以MsgBox的方式弹出窗口告之，另一种是返回布尔值，True或False，然后再进行相关处理。关于FileExists用法，有以下代码供参考： 　　Dim B As Boolean 　　B = FileExists(Me.Txt_Path.Text) 　　If B Then 　　 MsgBox "文件存在" 　　Else 　　 MsgBox "文件不存在" 　　End If 　　以上代码段封装在按钮事件中，用户单击按钮后，执行本段代码，判断指定的文件是否存在。

VB6.0演示一个求解数学问题，求两个数最大公约数，这是个简单的数学问题，数学基础好，用VB很轻松就编写出本程序了。在运行的窗口中，分别输入两个整数，单击按钮，程序将显示两个数的最大公约数是多少。求解的过程代码描述如下： 　　If (Val(Text1.Text) = 0 Or Val(Text2.Text) = 0) Or Val(Text1.Text) > 2147483647 Or Val(Text2.Text) > 2147483647 Then 　　 MsgBox "输入的数0或溢出，请重新输入！" 　　 MsgBox "输入的数0或溢出,请重新输入!", vbInformation + vbOKOnly, "数据错误" 　　 Text1.Text = "" 　　 Text2.Text = "" 　　 Text1.SetFocus 　　Else 　　 m = Val(Text1.Text) 　　 n = Val(Text2.Text) 　　If m < n Then 　　 temp = m: m = n: n = temp 　　End If 　　Do 　　 r = m Mod n 　　 m = n 　　 n = r 　　Loop While r 0 　　Label3.Caption = "两个正整数m和n的最大公约数为: " & m 　　End If

VB模拟输入的成绩判断奖学金等级，测试前请输入学生的三门功课的成绩，输入成绩后，程序会根据预设的判定一、二、三等奖学金的条件，来判断该同学成绩应该属于几等奖学金。 　　这类程序其实容易实现，中间的一些小技巧我觉得不错，比如当用户输入一科成绩后，光标自动定位到下一个文本框，如果需要用户输入内容比较多的时候，这个功能可大大提升用户体验。 　　更多源码细节请下载查看。

Visual basic vb6.0 制作个人调查表窗体，这个主要是练习一些VB Form 窗体控件中的元素用法，如果你初学习VB的话，这个例子非常适合你学习。 　　本例子中主要包括了对VB基本控件元素Check、Option、Text、Label、Button的用法进行了演示，具分享出了具体实现某一功能的代码及设置方法，涉及到光标自动归位、清空文本框、判断用户输入是否正确，断用户选择了哪一项按钮等功能，虽然简单，但对于VB打基础还是挺有帮助的。

VB6.0编写的一个轻型仿写字板的多功能文档编辑器源码，具备新建、打开、保存、打英剪切、复制、粘贴、粗体、斜体、下划线、左对齐、置中、右对齐等功能，界面还是挺友好的，文件格式支持DOC格式 (*.doc)|*.doc|RTF格式 (*.rtf)|*.rtf|文本文件 (*.txt)。 　　注：如果这个工程没有帮助文件，显示消息给用户，可以在“工程属性”对话框中为应用程序设置帮助文件。完整源码请下载查看。

用visual studio VB语言编写的学生信息管理系统 WINFORM 数据库采用的是ORACLE 

VB.net 绘制实时曲线，是一个实时曲线控件的DEMO测试，使用这个控件，可以生成适时曲线 、历史曲线 、动态历史曲线。可用于流量 监控、访问量统计、员工绩效排名等众多场合中。 　　CEGraphControl目录中为控件的源代码，DeviceApplication1为使用此控件的示例，测试时要把CEGraphControl目录中生成的CEGraphControl.dll文件拷贝到测试源码的Bin同级目录中。

VB 只允许输入特殊字符，这只是一个普通的用户查询窗口，字段名称、运算符、关 键 字，然后对其进行查询，因为要向cbofields中添加规范化数据，所在再输入时只能输入“>”、“

vb6 批量生成证书、房屋等编号，学会了本例子，是个比较实用的技巧，在一些需要批量生成编号的地方，你都可以借鉴本程序，来实现编号生成，在本例中，是批量生成房屋的编号，用户可选择楼层范围、单元范围等参数后，即可快速生成编号。十分方便哦。这个小程序从界面和功能易用上来说，都设计的都好用的。

VB6.0演示的AutoSize实例，自动改变图片框的大小以显示图形全部内容，当图片框比图形小时，图形超出部分不被显示，减少图片框高度，使图片框小于图形。