广东省 深圳市 摩羯座
发消息 写留言
| 近期心愿 | 誠征老婆一名。。。。 |
| 博客等级 | 加载中... |
| 今日访问 | 加载中... |
| 总访问量 | 加载中... |
| 最后登录 | 加载中... |
天气
自定义模块
自定义模块
仿Outlook菜单
2011-9-2 16:06:27 阅读28 评论0 22011/09 Sept2
用JQuery写了一个。
JS代码(MenuList.Js)如下:
001 function Select(Menu,Index)
002 {
003 if (Menu
JQuery Div对话框
2011-5-23 16:05:39 阅读159 评论0 232011/05 May23
//JQuery版本：1.5.2
//Open：打开一个对话框。返回该对话框对象。
// ID： 对话框的标识。
// Type： 对话框内容的类型，包函：HTML，CHILD，DIV，SRC，FRAME 五类。
// Source：对话框的内容。
// HTML：Html文本内容；
// CHILD：Html元素的ID，对话框显示该元素内的内容复本；
// DIV：DIV元素的ID，该DIV被移动到对话框内。关闭对话框时移回原位，移出时该DIV将被隐藏；
// SRC：网络地址，对话框显示该地址内容；
JQuery日期选择器
2011-5-23 15:59:11 阅读91 评论0 232011/05 May23
var DateBox={
DateFormat: function(D,F)
{
if(!F || F == "")
{
F = "yyyy-MM-dd";
}
var Y = D.getFullYear().toString();
var M = (D.getMonth() + 1).toString();
D= D.getDate().toString();
窗体特效——无边框窗口移动、圆角、颜色渐变、桌面边缘停靠、失去焦点自动隐藏(VB.NET)
2010-6-1 11:47:56 阅读1433 评论0 12010/06 June1
Public Class frmTest
'设置：
'窗体名：frmTest
'加入Timer控件
'名称：timShow
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Integer
Private Declare Sub ReleaseCapture Lib "User32" ()
登录窗口记录用户名功能(VB.NET)
2010-6-1 11:08:05 阅读225 评论0 12010/06 June1
Module HistoryMod
'模块功能：模拟登录窗口的记录用户名功能。
'UserName 要记录的用户名
'FilePath 保存用户名的文件路径
Friend Sub SaveUserName(ByVal UserName As String, ByVal FilePath As String)
Dim StrName As String = ""
If System.IO.File.Exists(FilePath) Then