vb.net 2008下数据库连接类源码：
copy文件到你项目下，然后添加现有项，选择slq_conn.vb，然后添加你的数据库名字、用户名、密码。
在你程序中添加以下代码，即可使用数据库连接了。
里面还定义了一些其他的连接，自己慢慢研究调用吧。下面给你一个调用验证实例：
dim sconn As New sql_conn
Dim dt As DataTable = sconn.ExecuteSql("Select name,code From stu where code like '333%'")
For i As Integer = 0 To dt.Rows.Count - 1
Me.DropDownList1.Items.Add(dt.Rows(i)(1))
Next
（预先要添加一个DropDownList1控件）
2021-11-08 17:15:37
3KB
1
mariadb-connector-net
MariaDB Connector / NET用于将以C＃，VB.NET或任何.Net框架开发的应用程序连接到MariaDB和MySQL数据库。 MariaDB Connector / NET已获得LGPL许可。
在DNX Core发布之前，我的主要目标是使该工具与DNXCore 5和EntityFramework兼容。
建置状态
关于.NET Core
为了构建跨平台的.Net二进制文件，请参阅以获取适用于您目标平台的DNX SDK。您还需要安装MS ASP.NET和Web工具以用于Visual Studio 2015（仍处于Beta版）将打开.Net Core Project Files（.xproj）。
2021-11-07 17:17:52
1.07MB
1
C#代码项目转换VB.NET项目代码（可整个项目转换）C#代码项目转换VB.NET项目代码（可整个项目转换）
2021-11-05 23:32:20
14.06MB
1
同学们都觉得太贵了，那我就降低点。
'调用示例
Debug.Print(stringToHex(des_crypt("MinqfDesTest", "mimi9924", 1))) '加密
Debug.Print(des_crypt("MinqfDesTest", hexToString("3F2DFAAC155A9D5A"), 0)) '解密
这两天要做个VB程序访问PHP的Web服务，传输内容用DES加密算法加密。做的时候发现VB.net带的DES加密算法和我PHP里的不一样，PHP已经是成型产品，不能修改，于是就把PHP里的加密算法翻译了一遍。一天一夜，真不容易。主要问题出在PHP里在做位运算的时候截断数据，搞的我VB.net里费了好大劲。
PHP的算法来自这个网站：
http://www.tero.co.uk/des/code.php
修改的时候偷了个懒，2个参数省略了。有同学要用的话自己去加，也没什么难度了。
他提供了PHP、Perl、Javascript三个版本。我在修改的时候主要是用他的PHP版本测试的，PHP版的没问题，其他两版本稍作修改（应该没有PHP中截断数据的问题）应该也没问题的。
Delphi的同学可以找找这个加密算法也有Delphi版的。
费了很大精力搞这东西，佛祖的真经也要用紫金钵盂换的，发到CSDN上，供同学们使用。
觉得贵的同学请飘过，第一天晚上搞到4点，第二天一天，晚上又到2点，才调试完毕。所以，觉得贵的自己翻译去。
时间仓促，有可能还会有问题，如果有同学找到问题，请提出来，不胜感激。
2021-11-05 20:08:09
9KB
1
CSharp2VB:C#代码转换到Vb.net的程序
VB2Csharp：VB转换到C#的程序（同时还支持Delphi、Vb6到C#的转换）
2021-11-04 01:38:50
364KB
1
VB.NET 时钟 圆形钟表，算出每刻度的角度，实际上是(pi/30)*i,为了精确用了Atan(1)，因为Atan(1)=PI/4，使用Atan数学函数，必须在程序的开头引入System.Math空间，'创建Graphics对象用于绘图
Dim FrmGraphics As Graphics = Me.CreateGraphics
'设置画面质量(消除锯齿)
FrmGraphics.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias
'创建Pen1对象,颜色为黄色，粗细为3像素
Dim Pen1 As New Pen(System.Drawing.Color.Yellow, 3)
'创建Pen2对象，颜色为黑色，粗细为1像素
Dim Pen2 As New Pen(System.Drawing.Color.Black, 1)
'定义表示刻度的起点和终点数组，坐标原点
Dim StartPoint(59), EndPoint(59), OriginPoint As PointF
'设置坐标原点
2021-11-03 17:10:21
675KB
1