![](https://img-blog.csdnimg.cn/20201014180756754.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
vb老鸟
杨哥儿
学习、生活、教育
展开
-
字符转换成UTF-8
Function StrConvFromUTF8(aBytes() As Byte) As String Dim cStream As ADODB.Stream Set cStream = New ADODB.Stream cStream.Open cStream.Type = adTypeBinary cStream.Write aBytes原创 2008-08-26 07:46:00 · 716 阅读 · 0 评论 -
grid的编辑功能
Private Sub MSHFlexGrid1_Click() Call SetFlexTxtBoxEnd Sub-------------------------------------------Private Sub FlexTxtBox_GotFocus() FlexTxtBox.SelStart = 0 FlexTxtBox.SelLength = Len(Fl原创 2008-08-26 07:33:00 · 607 阅读 · 0 评论 -
vb获得文件版本
Const VS_FFI_SIGNATURE = &HFEEF04BDConst VS_FFI_STRUCVERSION = &H10000Const VS_FFI_FILEFLAGSMASK = &H3F&Const VS_FF_DEBUG = &H1Const VS_FF_PRERELEASE = &H2Const VS_FF_PATCHED = &H4Const VS_FF_PRIVATEB原创 2008-09-09 13:37:00 · 1347 阅读 · 0 评论 -
VB常用代码总结(二)【转】
VB常用代码总结(二)【转】2008-07-10 00:04使用API调用Winodws各种通用对话框(Common Diaglog)的方法(二)1.选择目录/文件夹对话框将以下代码置于一模块中Option Explicit 调用方式:: string = BrowseForFolders(Hwnd,TitleOfDialog) 例如:String1 = Bro转载 2008-10-16 20:32:00 · 986 阅读 · 0 评论 -
VB常用代码总结(一)【转】
VB常用代码总结(一)【转】 移动无标题栏的窗体(borderstyle=none)dim mouseX as integerdim mouseY as integerdim moveX as integerdim moveY as integerdim down as booleanform_mousedown: mousedown事件down=转载 2008-10-16 20:34:00 · 980 阅读 · 0 评论 -
将Recordset作为XML保存
将Recordset作为XML保存微软使得将ActiveX数据对象(ADO)的Recordset作为XML在ADO 2.1里保存成为可能。这对于将Recordset保存在客户计算机上用于脱机使用很有用处。如果你希望通过可扩展样式表语言转换(XSLT)来操控Recordset的数据,那么这一能力也是很有用的。转载 2008-10-16 21:59:00 · 894 阅读 · 0 评论