VB的怪问题？

amstar 2000-05-26 04:12:00

有谁能用代码判断去掉字符串中的Tab键符.（表现为两个小黑竖条）因为我在用flexgrid时用fxgSale.additem adocus("id") & vbtab & adocus("name") & vbtab & ....
在name中含有一个Tab键符，使加入的位置乱了.

...全文

167 2 打赏收藏转发到动态举报

写回复

用AI写文章

2 条回复

切换为时间正序

请发表友善的回复…

发表回复

Un1 2000-05-26

打赏
举报

s = replace(s,vbtab,vbnullstring)

TopHead 2000-05-26

打赏
举报

Dim str As String, lng As Long
str = "1234" & vbTab & "5678"
lng = InStr(str, vbTab)
str = Left(str, lng - 1) & Mid(str, lng + 1)
即可啊！

搞怪vb小程序，如果没有按照提示来写就会在60秒后自动关机

摘要:VB源码,其它类别,VB恶搞　　Vb恶搞程序，逗您玩，关不完的消息框（弹出窗口），其实是能关掉的，只要你一直点下去，而且到最后还可以看到传说中的比尔盖茨，哈哈。程序是个小恶搞程序，对你的系统不会造成任何伤害，只是玩玩的，源代码开源。

最近在看USB的HID类的设备的读写操作，前几天下了一个是用VC写的，由于本人对VC不是太懂，所以看起来比较吃力，而且修改起来也比较困难。呵呵，只怪自己VC太差。如果有用VB写的就好了。最近正好找到一个，VB写的，方便理解。也很容易改成自己HID的上位机

　　VB6本身只支持16色(4位)和256色(8位)的图标，这种图标只是早期的Windows版本所采用的图标格式标准。现在各种高清真彩色（32位带Alpha通道、24位不带Alpha通道）早已经很流行并且普遍使用了，但在VB6中却不能直接支持、使用。即使想把这种真彩色图标加入图标资源、或者是把它加入ImageList控件中，也会被提示“无效图片”而不能加入。记得论坛中曾经有某位高人说过，VB6的Form是支持真彩色图标的，可以给窗体设置真彩色图标。　　昨天上午我试了一下，新建一个标准EXE工程，然后随意找了一个高清真彩图标文件，给工程的Form1设置Icon属性，成功了………　但是，感觉它显示的图标有点怪异，总觉得有些不对劲呢……　于是，我把这个高清图标文件中32×32和16×16这两种规格的真彩色图标单独提取出来，分别保存为一个.ico格式的文件，然后再用这两个图标文件来给它设置Icon属性。果然，这两个文件在操作时VB6都提示“无效图片”！！！这就说明：VB6是不支持真彩色图标的。最开始时“能设置成功”，只不过是因为它从图标组中找到了256色的、它能支持的格式罢了。　　闲话不多说了，这个模块进行了简单的封装，提供了一些基础的操作功能。源码中有比较详细的注释，使用起来应该是很简单的，就不再写什么“应用示例代码”了。首先要调用接口函数装载图标，从图标文件加载就调用LoadFromFile()，从字节数组加载就调用LoadData()。加载成功后，即可调用其它接口来使用图标对象了，比如用GDI方式把图标画到窗口内、或者画到某个PictureBox上、给自己的窗口或别的程序窗口设置一个真彩色图标等。虽然在“资源” 中不能以“图标”的方式把真彩图标加入，但是，却可以按“自定义资源”的方式把图标文件装入，使用时读取出对应的资源数据，然后调用函数LoadFromData()进行加载。加载成功就可以使用里面的真彩色图标了。　　这个模块只提供了一些基本的功能，如果有需要可以自己再进行扩展。还有就是没有进行异常处理，因此要求用来加载的文件必须是正确的图标文件、并且可以读取；数组数据则必须是合法的图标文件数据。否则可能会引起异常，你也可以修改代码进行异常捕获处理。

是一个恶搞类的软件，被迫自动关机，打开后必须输入我是猪，否则自动关机。

VB基础类

7,762

社区成员

197,608

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章