软件开发技术
griefforyou
从事欧美软件外包项目过程管理及新员工培训
展开
-
将一个图片按比例缩放显示在一个Frame中。
运行效果图: 代码如下: Form1.frmVERSION 5.00Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX"Begin VB.Form Form1 Caption = "Form1" ClientHeight = 5010 ClientLeft = 60 ClientTo原创 2004-06-23 14:43:00 · 1947 阅读 · 1 评论 -
CSV MDB转换程序
///////////////////////////////////////////////////////CSV MDB Convert ToolWritten By griefforyou///////////////////////////////////////////////////////Option ExplicitPrivate Sub Command1_Click(原创 2004-12-24 14:28:00 · 6227 阅读 · 1 评论 -
【原创】oracle数据库应用中实现汉字“同音”查询
要实现“同音”查询当然要先得到汉字的汉语拼音了,在网上随处可以找到ASP的汉字转拼音的代码,如以下代码: Set d = CreateObject("Scripting.Dictionary") d.add "a",-20319 d.add "ai",-20317 d.add "an",-20304 d.add "ang",-20295 d.add "原创 2005-03-06 16:57:00 · 4105 阅读 · 0 评论 -
一个图形分割问题[答网友]
新建工程,点“工程”->“部件”,在列表中找到并勾选“Microsoft PictureClip Control 6.0”将其添加到工具箱。在窗体中添加一个PictureClip控件,设置它的Picture属性装载一副图像,设置PictureClip控件的Col属性为3(3列),Row属性为3(3行)。然后添加一个CommandButton控件Command1,设置其Style为1(图形按钮),再原创 2005-03-11 10:46:00 · 2315 阅读 · 0 评论 -
如何实现图像左右翻转[答网友]
在VB中提供了完善的做图方法, 可以在窗体或图形框中绘制各种图形, 其中提供了一个方便的图像处理命令即:PaintPicture, 此命令的功能与WINDOWS API 函数BitBlt类似,但由于不用做API函数说明,并且有它独特的功能,所以更有它的方便之处, 使用它可以完成很多图像的特殊处理工作。 一、语法格式: PaintPicture Pic,destX,destY,destWidth原创 2005-03-24 11:28:00 · 6184 阅读 · 0 评论 -
将汉字转换成UTF8编码的URLEncode
google搜索表单接收的是UTF8编码数据,如果直接在地址栏上输入http://www.google.com/search?hl=zh-CN&q=griefforyou的程序人生 ,后面的汉字会变成乱码正确的方法是将汉字转换成UTF8编码的URL Encode代码如:http://www.google.com/search?hl=zh-CN&q=griefforyou%E7%9A%84%E7原创 2005-04-03 17:19:00 · 15722 阅读 · 11 评论 -
[FAQ]ASP中提取多选列表框中的值,并传递给存储过程执行。
[网友问]ASP中我怎样提取 里面所有的值数据集1数据集3数据集3... 这是一个可以在列表框中多项选择数据的列表框,现在问题是:怎样才能实现将列表中多项值提交并得到结果集,并将提交的数值用SQL语句查询出来呢?请大家给予帮助,谢谢! [griefforyou答]选择多项后,提交自动会以逗号隔开数据。[网友问]谢谢版主答复,我用request.form("select")不能将多个选择的结果集原创 2005-04-07 10:46:00 · 6540 阅读 · 0 评论 -
设置屏幕分辨率、颜色位数、刷新率
////////////////////////////////////griefforyou收集整理//////////////////////////////////Private Declare Function GetDeviceCaps Lib "gdi32" (ByVal hdc As Long, ByVal nIndex As Long) As LongPrivate De原创 2005-05-23 22:51:00 · 3540 阅读 · 0 评论 -
编写程序自动登录Gmail
Dim Flag As BooleanPrivate Sub form_load() On Error Resume Next URL = "http://gmail.google.com" wb.Navigate URLEnd SubPrivate Sub Command1_Click() Dim vDoc, vTag Dim i As Integer原创 2005-05-23 23:19:00 · 7530 阅读 · 0 评论 -
在Inno Setup制作的安装包中利用Pascal脚本检查安装,卸载前检查程序是否已经启动 [转载]
IS(Inno Setup,我用的是5.2.2)是一款免费的制作安装包的工具,关于它的具体介绍和如何制作安装包(用向导一步一步很容易上手的)我就不介绍了。在这里,只介绍两个方面的内容:1. 安装软件前,检查该软件是否正在运行,如果正在运行,则提示用户,需要先关闭,然后才能进一步按照。2. 卸载软件的时候,检查该软件是否正在运行,如果正在运行,则要关闭才能进行卸载。 在IS中,有[c转载 2009-04-29 22:05:00 · 6309 阅读 · 0 评论 -
编写一个浮动按钮控件(如何给控件添加MouseOut事件)
lblCtlFloatButton.ctl 文件内容如下VERSION 5.00Begin VB.UserControl lblCtlFloatButton ClientHeight = 405 ClientLeft = 0 ClientTop = 0 ClientWidth = 1965 ScaleHeight原创 2004-11-08 12:58:00 · 2231 阅读 · 0 评论 -
Crystal Report 水晶报表如何实现类似表格单元格合并的功能
效果图:报表设计如下:实现的方法很简单,打开“节专家”,选择你的组页眉,右边“公用”中选中“延伸到后续节”原创 2004-11-03 16:42:00 · 6636 阅读 · 6 评论 -
用VB编写一个屏幕颜色拾取器
设计状态下窗口中添加两个Frame控件做为容器,加入二个PictureBox控件,一个PictureClip控件(其中装入一个设计好的鼠标指针Mask图片),两个文本框控件,几个Label控件,两个Command控件,一个CheckBox控件。 代码如下: Option Explicit Private Declare Function GetWindowDC Lib "user32" (ByV原创 2004-07-07 23:38:00 · 3863 阅读 · 2 评论 -
网络俄罗斯方块对战游戏For FICQ
[俄罗斯方块For FICQ使用说明][独立运行]1.解压后程序可以直接运行,可通过点击网络对战进行设置.[做为FICQ插件]1.解压后将Elsfk.exe与Elsfk.ini拷贝到FICQ安装目录下的PlugIn目录中,2.如果当前已经运行了FICQ,请重新登录一次,这样插件才能装载.3.左键点击好友图标,在弹出菜单中点击"疯狂俄罗斯方块"将弹出"邀请对方加入疯狂俄罗斯方块"对话框,点击"发出原创 2004-07-12 21:27:00 · 3094 阅读 · 0 评论 -
[2004-8-4]VB.Net学习笔记,使用ADO.Net对象访问数据库,将结果写入ListView
Public Class Form1??? Inherits System.Windows.Forms.Form#Region " Windows 窗体设计器生成的代码 "??? Public Sub New()??????? MyBase.New()??????? 该调用是 Windows 窗体设计器所必需的。??????? InitializeComponent()?????原创 2004-08-04 14:51:00 · 1990 阅读 · 0 评论 -
2004.7.15 [C#学习记录]使用C#编写一个自定义控件
using System;using System.Collections;using System.ComponentModel;using System.Drawing;using System.Data;using System.Windows.Forms;namespace WindowsControlLibrary1{/// /// UserControl1 的摘要说明。/// publ原创 2004-07-15 22:33:00 · 1527 阅读 · 0 评论 -
使用VB在应用程序中注册热键
窗体中Option Explicit Private Sub Form_Load()Dim ret As Long 记录原来的window程序地址 preWinProc = GetWindowLong(Me.hWnd, GWL_WNDPROC) 用自定义程序代替原来的window程序 ret = SetWindowLong(Me.hWnd, GWL_WNDPROC,原创 2004-07-12 10:35:00 · 2145 阅读 · 0 评论 -
VB编写一个能显示百分比的自定义进度条控件
运行效果: 设计方法: 1.在UserControl中添加一个Label控件Label1,将它设为平面,用来做外框。添加两个PictureBox控件PictureBox1做为进度指示,PictureBox2控件做为控件背景。 2.加入以下代码 Option Explicit 定义私有变量用于存储属性值Private mvarMax As LongPrivate mvarMin As Long原创 2004-07-18 11:25:00 · 9098 阅读 · 2 评论 -
随机抽取n个记录的SQL
随机抽取n个记录的SQL(mysql和sqlserver) mysql: select * from tablename order by rand() limit 10sqlserver: select top 10 * from tablename order by NEWID() 在符合条件的数据中的,从第5条开始提出后面10条数据mysql: select * from table原创 2004-07-21 08:58:00 · 2022 阅读 · 0 评论 -
神秘的DUAL ------ black_snail(原作)
标题 神秘的DUAL black_snail(原作) 关键字 ORACLE DUAL DUAL ? 有什么神秘的? 当你想得到ORACLE系统时间, 简简单单敲一行SQL不就得了吗? 故弄玄虚….SQL> select sysdate from dual;SYSDATE---------28-SEP-03哈哈, 确实DUAL的使用很方便. 但是大家知道DUAL倒底是什么OBJECT, 它有什么特殊原创 2004-09-06 10:21:00 · 9033 阅读 · 15 评论 -
五种提高 SQL 性能的方法
五种提高 SQL 性能的方法发布日期: 4/1/2004 | 更新日期: 4/1/2004Johnny Papa Data Points Archive 有时, 为了让应用程序运行得更快,所做的全部工作就是在这里或那里做一些很小调整。啊,但关键在于确定如何进行调整!迟早您会遇到这种情况:应用程序中的 SQL 查询不能按照您想要的方式进行响应。它要么不返回数据,要么耗费的时间长得原创 2004-08-22 17:02:00 · 1969 阅读 · 0 评论 -
探究CRC32算法实现原理-why table-driven implemention
Author : Kevin Lynxemail : zmhn320@163.comPreface基于不重造轮子的原则,本文尽量不涉及网络上遍地都是的资料。Whats CRC ?简而言之,CRC是一个数值。该数值被用于校验数据的正确性。CRC数值简单地说就是通过让你需要做处理的数据除以一个常数而得到的余数。当你得到这个数值后你可以将这个数值附加到你的数据后,转载 2009-07-29 17:19:00 · 4061 阅读 · 0 评论