13518219792
建议你在百度上查“枕善居”
成都创新互联公司是创新、创意、研发型一体的综合型网站建设公司，自成立以来公司不断探索创新，始终坚持为客户提供满意周到的服务，在本地打下了良好的口碑，在过去的十年时间我们累计服务了上千家以及全国政企客户，如社区文化墙等企业单位，完善的项目管理流程，严格把控项目进度与质量监控加上过硬的技术实力获得客户的一致表扬。
那里有很多适合新手、老鸟的vb源代码
VBGOOD CSDN
都很不错的，
VB中国也可以
还有一个叫做 枕善居 的博客里面有超多实例和精品源码，受益颇多
首先你要知道密码是多少.
例:假设1.rar密码为123,里面含有一个setup.exe.
把rar.exe复制到你的VB程序目录下.
在窗体上新建一个按钮,输入以下代码
rar e -p123 1.rar setup.exe : rar后空格,跟着e,再空格,跟着-p后面没有空格,紧跟密码,然后空格,输入要解压的RAR文件,空格,再输入要解压的具体文件
private sub command1_click()
shell "rar e -p123 1.rar setup.exe",5
end sub
-----------------------
RAR命令行:
RAR 3.80 beta 5 版权 (C) 1993-2008 Alexander Roshal 29 八月 2008
已注册给
用法: rar 命令 -开关 1 -开关 N 压缩文件 文件...
@列表文件... 解压路径\
命令
a 添加文件到压缩文件
c 添加压缩文件注释
cf 添加文件注释
ch 改变压缩文件参数
cw 写入压缩文件注释到文件
d 删除压缩文件中的文件
e 解压压缩文件到当前目录
f 刷新压缩文件中的文件
i[参数]=串 在压缩文件中查找字符串
k 锁定压缩文件
l[t,b] 列出压缩文件[技术信息,简洁]
m[f] 移动到压缩文件[仅对文件]
p 打印文件到标准输出设备
r 修复压缩文件
rc 重建丢失的卷
rn 重命名压缩文件
rr[N] 添加数据恢复记录
rv[N] 创建恢复卷
s[名字|-] 转换压缩文件为自解压格式或转换回压缩文件
t 测试压缩文件
u 更新压缩文件中的文件
v[t,b] 详细列出压缩文件[技术信息,简洁]
x 用绝对路径解压文件
开关
- 停止扫描
ac 压缩或解压后清除存档属性
ad 添加压缩文件名到目标路径
ag[格式] 使用当前日期生成压缩文件名
ao 添加具有压缩属性的文件
ap格式 添加路径到压缩文件中
as 同步压缩文件内容
av 添加用户身份校验(仅注册版本可用)
av- 禁用用户身份校验
c- 禁用注释显示
cfg- 禁用读取配置
cl 名称转换为小写
cu 名称转换为大写
df 压缩后删除文件
dh 打开共享文件
dr 删除文件到回收站
ds 对固实压缩文件禁用名称排序
dw 压缩后清除文件
e[+]属性 设置文件排除和包括属性
ed 不添加空目录
en 不添加"压缩文件结束"标志
ep 从名称中排除路径
ep1 从名称中排除基本目录
ep2 展开为完整路径
ep3 扩展路径为包含盘符的完全路径
f 刷新文件
hp[密码] 同时加密文件数据和文件头
id[c,d,p,q] 禁用消息
ieml[属性] 用 E-mail 发送压缩文件
ierr 发送所有消息到标准错误设备
ilog[名称] 把错误写到日志文件(只有注册版本可用)
inul 禁用所有消息
ioff 完成一个操作后关闭 PC 电源
isnd 启用声音
k 锁定压缩文件
kb 保留损坏的已解压文件
m0..5 设置压缩级别(0-存储...3-默认...5-最大)
mc参数 设置高级压缩参数
md大小 以KB为单位的字典大小(64,128,256,512,1024,2048,4096 or A-G)
ms[ext;ext] 指定存储的文件类型
mt线程 设置线程数
n文件 仅包含指定的文件
n@ 从标准输入设备读取文件名到包括
n@列表 在指定的文件列表包括文件
o[+|-] 设置覆盖模式
oc 设置 NTFS 压缩属性
or 自动重命名文件
os 保存 NTFS 流
ow 保存或恢复文件所有者和组
p[密码] 设置密码
p- 不询问密码
r 递归子目录
r0 仅递归通配符名称的子目录
riP[:S] 设置优先级(0-默认,1-最小..15-最大)和以毫秒为单位的休眠时间
rr[N] 添加数据恢复记录
rv[N] 创建恢复卷
s[N,v[-],e] 创建固实压缩文件
s- 禁用固实压缩文件
scchr[obj] 指定字符集
sfx[名称] 创建自解压压缩文件
st[名称] 从标准输入设备读取数据(stdin)
sl大小 处理小于指定大小的文件
sm大小 处理超过指定大小的文件
t 压缩后测试文件
ta日期 添加日期 日期 后修改的文件,日期格式 YYYYMMDDHHMMSS
tb日期 添加日期 日期 前修改的文件,日期格式 YYYYMMDDHHMMSS
tk 保留原始压缩文件时间
tl 设置压缩文件时间为最新文件时间
tn时间 添加 时间 以后的文件
to时间 添加 时间 以前的文件
tsm,c,a[N] 保存或恢复文件时间(修改,创建,访问)
u 更新文件
v 自动检测创建卷的大小或者列出所有的卷
v大小[k,b] 创建卷大小=大小*1000 [*1024, *1]
vd 创建容量前清除磁盘内容
ver[n] 文件版本控制
vn 使用旧风格的卷命名方案
vp 每卷之前暂停
w路径 指定工作目录
x文件 排除指定的文件
x@ 从标准输入设备读取要排除的文件名
x@列表 排除指定列表文件中的文件
y 假设对全部询问都回答是
z[文件] 从文件读取压缩文件注释
如果你使用的是PNG图片，可以到枕善居找一个显示透明PNG图片的例子 如果是Gif图片，建议可以模拟透明效果，不然效果会很差。 透明的办法，比如有一张图，图上有一个圆，先把没有圆的这张图做VB窗体的背景，再在带圆的这张图上切下带圆的方形图案，在把这个方型图案放到窗体背景同样的位置来模拟透明效果。 经验之谈，还是自已去动动手吧。 -------------------------------------------------------------------------------------------- 专业网站建设、动画设计、网站优化、网站托管 萍缘设计
百度一下“枕善居”，里面有很多不错的VB.NET源码，其中“多风格渐变按钮 Ver 1.0 For VB.NET 2008”也许能满足你的要求。
楼主你好，Scintilla是一个高亮插件，其中有不少功能，支持多种语言高亮、行号、缩进等，算是一个很完善的代码高亮编辑器。我这里有VB版的源码，需要的话请联系我。
您也可以直接到枕善居下载，地址：
上面有源码的简介，只要注册一个账号就能下载了。
