VB 演示如何使用WeekdayName获取星期名称

VB.net绘制生成code128条形码的例子，另外还有EAN128、包括了Code128 A/B/C类型的条形码，程序非常好用，在文本框输入规定要求的数据，即时输入，即时生成。程序中为生成条形码，创建了一些函数，比如显示可见条码文字 如果小于40 不显示文字、获取条形码宽和放大系数、获得条码图形、根据编号获得条纹、获取目标对应的数据、偶数检测判断、获取128图形等，在VB.NET生成条形码的朋友，本范例源码是个很好的参考。

VB 6.0 将数组中的数据利用图表分析,也就是用柱状图来显示数组中的数据,所有的操作都是从点击按钮开始的,如下代码: 　　Private Sub Form_Load() 　　Dim i 　　i = Array(1, 2, 3, 4, 5, 6, 7) 　　Dim j 　　For j = 0 To UBound(i) 　　 With MSChart1 　　 .RowCount = UBound(i) + 1 　　 .Row = j + 1 　　 .ColumnCount = 1 　　 .Data = i(j) 　　 .RowLabel = i(j) 　　 End With 　　Next j 　　End Sub

VB创建一个个性化的椭圆形窗口界面，使用 SetWindowRgn创建椭圆形窗口的例子。个性的窗口形状可增加程序的趣味性，可以使程序更具吸引力。见惯了方方正正的矩形窗体，椭圆形窗体更会使用户眼前一亮。本实例设计一个椭圆形的窗体，运行程序，窗体为椭圆形，单击窗体，即可退出程序。

用VB编的股票采集数据源码、分享出来希望对大家有用。

vb捕获键盘按键和鼠标坐标位置，监测鼠标的位置和鼠标按键的名称，如窗体所示，随意移动鼠标，即可适时显示出鼠标坐标，若敲击键盘，则会获取到哪一个键被按下，两个功能的代码写在按钮事件中，获取鼠标XY坐标位置： 　　Me.Label3.Text = "x=" + e.X.ToString() + " y=" + e.Y.ToString() 　　获取键盘按下： 　　Me.Label4.Text = "code=" + e.KeyCode.ToString() + " value=" + e.KeyValue.ToString()

FSO对象模型提供了三种创建和打开文件的方法：其实本示例是创建了FileSystemObject对象，然后用FSO对象的FileExists、CreateTextFile、OpenTextFile方法，对文件进行操作，演示了三种FSO对象的操作方法，对学习初级的FSO文件操作有相当好的帮助作用。

VB编写完整源码判断字符串中某一字符是否大写，执行下面的代码，这个例子简单哦，不多介绍了，直接看代码吧： 　　If Asc(Mid(Text1, Val(Text2), 1)) >= 65 And Asc(Mid(Text1, Val(Text2), 1)) = 97 And Asc(Mid(Text1, Val(Text2), 1))

VB 使用VsMenu控件创建漂亮菜单，是一个很不错的VsMenu控件用法演示实例，在窗体上单击右键,可以看到弹出式菜单效果。 　　Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) 　　 If Button = vbRightButton Then PopupMenu MDIfrmMain.mnuEdit 　　 End Sub

内核为VB6的一个下载软件开源源码， 界面方面支持悬浮窗、支持TAB窗口选项卡切换内容，操作方便，关于下载文件方面，已经实现的功能： 　　1.同时下载两个文件 　　2.支持断点续传 　　3.支持代理服务器 　　使用方法： 　　1.双击开始或停止 　　2.其他按鼠标右键

一个演示VB高速搜索文件程序，基于API来实现，用于快速查找文件，类似的例子在前几年的书籍实例中，有很多，这一个也是从VB的书中整理出来的，代码中有丰富的注释，主要是分享给VB新手参考学习的。