- 博客(20)
- 资源 (124)
- 收藏
- 关注
原创 VB备忘录(21)ADO实例
一、增加数据记录: rs.AddNew '增加一个新行(记录) rs.fields(0)=... '各个字段赋值 ...... rs.Update '更新到数据库 1、增加字符型或数值型。 字符型前加Str,数据型加Val,这样转型是为了和数据库匹配。
2013-04-27 16:15:41 1771
原创 VB 利用ADO的Stream对象在数据库进行写入与读出
1、stream只是一个媒介,它在数据库字段与实际的图片间充当一个搬运工作用。 当读出时,图片字段写入stream中,,然后stream导出成一个实际图片 当写入时,实际图片装入stream中,,然后字段再从steam中读取 注意:这里写和读,是字段对stream的操作。从数据库中取出数据,相当于字段先写到stream中。
2013-04-24 13:34:33 3810
原创 VB备忘录(21)ADO概念
ADO是一个接口,它的主要功能就是让你忘记复杂的内部操作,用这个接口来操作数据库。 用户ADOOLEDBODBC各种数据库 如上所示,用户通过ADO,与OLEDB相连,OLEDB再与驱动ODBC相连,最后自动连接到各种的数据库,完成与数据库的通信。 只须记住: ADO与各种数据库打交道即可。用户
2013-04-23 21:30:19 1653
原创 ========VB 图片剪切出来的三个方法,待代码。。。
对一个图片进行剪切有三种方法:一、PictureClip二、Object.PaintPicture三、BitBlk API的利用。
2013-04-17 12:07:47 2881
原创 VB 图片转灰度图
Option ExplicitDeclare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y As Long) As LongDeclare Function SetPixelV Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, ByVal Y
2013-04-16 16:01:23 4605
原创 VB备忘录(16)图像处理
保存图片:SavePicture Picture,strFileName 把Picture保存到指定位置的图片文件中StrFileName 注意:对于绘制的图片保存有两个要点: 1、AutoRedraw为真,这样才是持久图形,才会在内存中有映像,保存时就会提取它来保存。 2、可以pictu
2013-04-16 13:36:18 1768
原创 VB PictureBox中图片长宽尺寸大于本身尺寸,却没有显示完整呢?
上面显示的三个尺寸: 图片框宽度,图片框内部宽度(不含边框),还有一个特殊的图片框内图片的宽度。发现一个问题: 图片尺寸大于图片框,但是,,图片去没有占满图片框,这是什么原因呢?水平反转一下图片,可以看到这个问题将困惑我们:图片明显放大了,原因就出在上面所说的尺寸问题上。百度N久没有结果。一次一次的查MSDN,终于找到一个东西:
2013-04-16 11:25:53 8925
原创 VB备忘录(15) 图形处理
颜色1、系统颜色2、QBColor(0)-QBColor(15) vbred,vbblack,...3、RGB(red,green,blue)坐标:注意边框,标题栏。 Scale是中间可用区域(不含边框)自定义坐标有两种方式:1、Object.Scale (x1,y1)-(x2-y2) 通过左上角与右
2013-04-14 21:07:10 1383
原创 VB备忘录(14)文件读取
记录文件域,域名,域值顺序文件:只能按顺序进行读取,不能随意定位进行读取。仅适合于小容量文件随机文件:按记录读取,可以随机定位,读取速度快,对大容量记录文件效率最高二进制文件:以字节进行顺序存储,可定位操作内存---------》硬盘 输出到硬盘(Output)内存《--------硬盘 读进内存(Input)
2013-04-12 17:04:35 1877
原创 VB 失去焦点时验证事件没有引发
Private Sub Form_Load() Form1.KeyPreview = True '控件前拦截按键激活 Text1.CausesValidation = True '激活使之可以引发验证事件End SubPrivate Sub Command1_Click() Text2.SetFocus '转移焦点到文本2End SubPrivate Sub
2013-04-11 15:57:58 2118
原创 VB备忘录(13) 鼠标键盘
鼠标改变光标LoadCursorFromFile 载入光标图形,返回一个句柄。(这个句柄用SetClassLong,可以将其设置为某个对象中的光标)DestoryCursor 卸载光标句柄,用默认SetClassLong 设置目的对象内的光标Option ExplicitPrivate Declare Fun
2013-04-11 11:30:56 1205
原创 VB API常数的值如果是负值,则外面要加一括号
比如上面引用其中的常时外面会有括号:Private Const GCL_HCUSOR=(-12)为什么这里要加一个括号呢?说法1:规范性写法说法2:避免负号与减号混淆仔细一样也是,常量与C++中一样,别人无法来识别Define有时的错误。于是就用一个括号避免产生不必要的混淆。所以上面两种说法,目的都是一个,防止产生负号与减号的混淆问题。
2013-04-11 11:00:02 1118
原创 VB备忘录(12) 通用对话框
对话框有:1、inputbox2、msgbox3、通用通话框通用通话框部件:microsoft common dialog control 6.0分为五种:打开showopen另存为 showsave颜色 showcolor字体 showfont打印 showprinter帮助 showhelp注意:
2013-04-10 21:35:27 1349
原创 VB 象画图程序那样有趋势地画图
Option ExplicitDim oldx As Double, oldy As DoubleDim tx As Double, ty As DoubleDim flgPress As BooleanPrivate Sub Command1_Click() Dim a As Integer Text1.Text = Hex("44")End SubPrivate
2013-04-10 10:29:57 1279
原创 vb 子菜单无法使上一级已经隐藏的菜单显示
建立菜单如下文件...............变化 (不可见)............................................显示...............退出下面通过弹出“变化”菜单,触发"显示"事件,使得上一级菜单”变化“可以显示出来Private Sub Form_MouseUp(Button As Integer, Shift
2013-04-08 21:29:55 2417
原创 VB备忘录(11)菜单工具栏
菜单编辑器标题与名称标题:用来显示在菜单上,给用户看和选择的。名称:不显示在菜单上,在程序代码中用来操纵对应标题菜单的动作的。“协调位置”允许选择菜单的 NegotiatePosition 属性。该属性决定是否及如何在容器窗体中显示菜单。这个MSDN说得太粗了,查了N久才明白是什么意思。一个窗体上有菜单 ,也有添加的一个容器(控件,工
2013-04-08 16:47:14 1946
原创 VB 背景图片随窗体变化
Private Sub Form_Paint() Me.PaintPicture Me.Picture, 0, 0, Form1.Width, Form1.HeightEnd SubPrivate Sub Form_Resize() Me.PaintPicture Me.Picture, 0, 0, Form1.Width, Form1.HeightEnd Sub
2013-04-08 15:51:09 5603
转载 vb 如何操作xml文件
XML文件如下: 1 自由飞翔 2007-12-7 2 自由 2007-12-7 Dim XMLDoc As DOMDocument Dim root As IXMLDOMNode Dim xlst As IXMLDOMNodeList, xlst1 As IXMLD
2013-04-08 13:17:46 1837
原创 vb 已经知道年和月,如何得到该月最大天数(最后一天)
Text1.Text = DateDiff("d", DateSerial(1980, 12, 1), DateAdd("m", 1, DateSerial(1980, 12, 1)))
2013-04-07 16:05:29 4221
原创 VB备忘录(10)控件
Object.SetFocus使控件得到焦点。注意:控件必须是“可视”且“可用”的 可视,即可以界面显示的,若在load中的控件是不能得到焦点的 可用,即Enable,变灰的不能得到焦点DDE动态数据交换,即发送到接收端之间的动态数据交换MaskColor mask屏蔽,遮盖,color颜色,屏蔽
2013-04-03 23:37:36 1546
Surfer 11.4.958全版本软件及注册码(2013年5月19日更新)
2013-05-19
Surfer 11.4.958全版本的注册码(20130512更新)
2013-05-12
用Surfer软件绘制红水河流域自动站雨量等值线
2013-04-10
Fiddler4Beta小提琴 探测http协议好工具(微软认证)
2013-03-18
多多五笔-鹤版1.0正式版[2012.12.03更新]完全支持win8
2013-01-08
Http Analyzer Full V 7.0(最新版本含注册机)
2013-01-07
SQLserver2008示例数据库adventureworks2008(SQLserver2012版本也可附加用)
2013-01-04
最小巧的GIF动画制作软件GIFGIFGIF(不到200K,太小了)
2012-12-30
SQL server 数据库示例(来自Orcale中的Scott经典示例)
2012-12-23
Surfer 11.0.642 全版本及注册码
2012-11-15
Visual Basic 2010&.NET 4高级编程(第四章)
2012-11-07
完全兼容win8 Metro 的多多五笔输入法 2.51 最新版
2012-11-04
C++入门经典(第三版 高清大图,网络中第一份)
2012-08-19
数字图象处理·基础篇 (日)谷口庆治编 朱虹 廖学成 乐静译
2012-07-29
Mastering VBA for Microsoft Office 2013
2016-06-30
O&O Defrag 19(32及64位含注册码)
2016-02-08
Windows 10 Bible 2nd Edition(英文PDF共707页)
2016-01-15
O&O Defrag Pro 18.9.60(32位,20150812更新)
2015-08-12
O&O Defrag Pro 18.9.60(64位,20150812更新)
2015-08-12
用VB.NET和ACCESS实现监督监测报告报表编制系统
2013-10-18
焦作市气象局测报监测网络业务应急预案
2013-10-18
关于加强气象应急工作的几点思考
2013-10-18
地市级气象数据库的设计与实现
2013-10-18
Surfer 11.5.1069全版本及注册码(2013年8月19日更新)
2013-08-19
Test源码(vb.net2012构造函数例)
2013-08-12
自学Power Point 2013教程(Wiley.Teach.Yourself.VISUALLY.PowerPoint.2013)共354页
2013-07-02
windows8圣经(Wiley.Windows.8.Bible.Oct.2012)PDF共1178页
2013-07-01
visual.basic.2012.入门经典(PDF748,高清文字带书签)
2013-07-01
Word2013入门(PDF共576页)
2013-07-01
PDF解密去除限制(打印、编辑、标签、复制等限制)
2013-06-08
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人