- 博客(16)
- 资源 (4)
- 收藏
- 关注
RSS订阅原创 vb.net中Code128码解决方案
使用RDLC与CobainBarCode控件 问题和主要技巧说明： 1、RDLC动态调用数据 Dim frm As New Report Dim command1 As New OleDbCommand("select * from Out_Plan_Temp where 区分='" & ComboBox1.Text & "'", mdbcon
2012-01-20 15:29:47
426
翻译 dbnull数据的处理
在.net中dbnull数据在程序运行中经常会出现错误，在一个外国网站上看到了一个非常好的函数 留下来： Enum enumObjectType StrType = 0 IntType = 1 DblType = 2 End Enum Public Function CheckDBNull(ByVal obj As
2012-01-20 14:39:43
217
原创 VBA操作EXCEL技巧
'获取最后一行 Range("A" & Rows.Count).End(xlUp).Row '将文本转换为时间格式 TimeValue("12:00") '对时间格式进行加减 (TimeValue("12:00")-TimeValue("10:10"))*24=1.83小时
2011-11-26 23:56:25
216
原创 vb.net操作EXCEL
'前期定义 Dim xlapp As Excel.Application Dim xlbook As Excel.Workbook Dim xlsheet As New Excel.Worksheet xlapp = CType(CreateObject("excel.application"),Excel.Application) xlbook = CTy
2011-11-26 23:54:24
333
转载 VB ADO常用方法
'创建一个 Connection 实例 Dim conn As New ADODB.Connection '创建一个 Recordset 实例 Dim rs As ADODB.Recordset '1)连接Access数据库: CnStr = "PROVIDER=microsoft.jet.oledb.4.0;persist security info=false;d
2011-11-26 23:53:40
268
转载 EXCEL中使用SQL语言
Dim myData As String, myTable As String, SQL As String Dim cnn As ADODB.Connection Dim rs As ADODB.Recordset Dim i As Integer myData = "Provider=Microsoft.Jet.OLEDB.4.0" &_ ";Data
2011-11-26 23:52:43
198
原创 由于应用程序配置不正确,程序未能启动
最近写了一个程序 DLL是用C#编写的（A.DLL），这个DLL文件同时也引用另一个DLL文件（B.DLL)，此后在VB.NET中的程序中添加了引A和B两个DLL文件的引用 调试程序时，很正常，但生成一个安装包安装后，启动程序，提示："由于应用程序配置不正确,程序未能启动",在网上四处查找解决方法，也按照网上的办法一一测试，但均未能成功，后来自己测试了一下： 将安
2011-11-26 23:52:00
212
翻译 通过按键，退出循环
Public Declare Function GetAsyncKeyState Lib"user32.dll" (ByVal vKey As Int32) As UShort Public ReadOnly Property KeyStatus(ByVal Key As Keys) AsBoolean Get If Key = Keys.LButton AndAlso M
2011-11-26 23:50:59
492
翻译 .net中调用autoit的DLL出现乱码解决方法
用controlgettext演示： [DllImport("AutoItX3.dll", SetLastError = true, CharSet =CharSet.Auto)] private static extern voidAU3_ControlGetText([MarshalAs(UnmanagedType.LPStr)] stringTitle , [
2011-11-26 23:50:05
246
原创 控制回车键的代码
dim key as string key=e.keychar if key=microsoft.visualbasic.chrw(13) then button1.focus end if 窗体中有很多控件，控件回车键方法 dim key as string key=e.keychar if key=microsoft.visualbas
2011-11-26 23:48:11
497
原创 对非共享成员的引用要求对象引用
背景：用C#做成的DLL文件 在VB.NET中调用这个DLL文件的函数时出现的错误 原因： 将public string udisk() 改为： public static string udisk()
2011-11-26 23:46:45
492
原创 Ultragrid操作汇总
1、判断grid中行是否可见 当对ULTRAGRID进行数据筛选后，会有些行无法看到 如果想下载筛选后的数据，或者是对筛选后的数据进行操作，方法为： Dim rw As Infragistics.Win.UltraWinGrid.UltraGridRow For Each rw In UltraGrid1.Rows If rw.Hi
2011-11-26 22:59:09
253
翻译 vb.net遍历SQL中所有用户表
If sqlcon.State = ConnectionState.Closed Then sqlcon.Open() Dim tbl As New DataTable Dim cmd As New SqlCommand("select table_name as Name from INFORMATION_SCHEMA.Tables where TABLE_TYP
2011-11-26 22:56:12
158
原创 .net 常用项目汇总
在网上查找资料后，会发现以下信息的取得，大家都用了非常麻烦的方法 其实是可以很简单的,记下留着备用吧！ 1、获取计算机名 My.Computer.Name 2、当前使用的操作系统 My.Computer.Info.OSFullName 3、搜索一个目录下的所有文件，包括子目录 For Each foundFile As StringIn My.Computer.
2011-11-26 22:53:13
129
原创 vb.net clickone出错处理
错误信息： 未能连接到 出现以下错误: 无法创建网站 未安装与 FrontPage 服务器扩展进行通信所需的组件 刚开始以为是服务器端出了问题，所以在服务器上一个劲的找原因，找了整整一天 后来找了另一台电脑，可以发布到服务器上，因此问题不在服务器端原因 那就表示在客户端原因，在网上找了重新安装ASP.NET，重新安装OFFICE等各种办法，还是不好用 后来想到了重装系统，但在麻烦
2011-11-26 22:52:23
151
自制ping工具，为网络监控和网络心跳使用
2020-03-07
ppt+access抽奖
2012-12-19
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人