百度词典vb版 附VB源码.rar

VB版竖直的折叠菜单，一个比较流行的折叠菜单，功能比较多，另外还有很多设置选项，比如添加面板、全部复位、更改菜单位置、更改菜单图标大孝更换风格、气泡提示等，都是很实用的。

固高GTS运动控制卡VB版驱动说明书例程 最新版说明书,包含最新函数,调试软件及应该例程

海康vb版流媒体，代码，可以公学习，功能比较简单

摘要:VB源码,游戏编程,真心话大冒险　　VB_真心话大冒险游戏源码，一个VB编写的小游戏，脑筋急转弯游戏源码。源码中定义一些有用变量，分别记录真心话，大冒险，脑筋急转弯作者: 小呼QQ：1002042998，希望与大家一起交流，一起进步。

置开始的指定数目字符。 i = i + 1 m(i) = InStr(m(i - 1) + 1, b, ",") '从上一个找到的逗号位置起，查找下一个逗号的位置 Loop If m(i) = 0 And i > 1 Then tr(i) = Right(b, Len(b) - m(i - 1)) '处理一行中最后一个逗号后的字符串 '以下部分是将存储在数组变量 m(i)中的字符分类存放到方向、边长、已知坐标、网型信息等数组中 k = k + 1 For j = 1 To 5 jd(k, j) = Val(tr(j)) Next j zjd = k Loop ts.Close MsgBox "转角数据已成功读入", 0 + 64 + 0, "数据输入" End If End Sub Private Sub cd2_Click(Index As Integer) Dim tr() As String, m(10) As Integer '定义过程级变量 Dim i As Integer, j As Integer, k As Integer, h As Integer CommonDialog1.ShowOpen fname = CommonDialog1.FileName '将用户在"打开"对话框中选择的文件名对变量fname赋值 If fname <> "" Then '若无此判断当对话框中选择取消时、下面赋值语句将出错 Set ts = fso.OpenTextFile(fname) '将fname作为文本文件打开,并设置句柄 j = 0: k = 0: p = 0: h = 0 'j是测站数累计变量,k是已知点累计变量,l（j）、ns（j）分别是方向值、边长累积计数 Do While ts.AtEndOfLine <> True '前测型循环，进入循环的条件是没有读到文件结束尾

屏幕录像 VB源码修改版，录像前直接用代码写选项，无设置窗口弹出。

相当不错的VB图形报表控件，一共有8款不同的样式，来生成直方图-柱状图-曲线图，绘制及生成图表的控件VB版附示例源码，示例截图的曲线图只是其中一个的运行效果图，有一个还是画工作流程图的，有一款还是通过读取数据库的内容而生成的，整体效果简洁实用，也可作为学习的实例。

用VB写的网络抓包程序源代码，可对本地IP、端口，远程IP、端口进行设置。可以显示已抓数据包内容。

孙博文编著; 分形算法与程序设计 VB版 ; 科学出版社, 2004