检查字符串STRSOURCE是否为BIG或BIG5码-会员卡,广州印刷,深圳印刷,印刷公司,名片,彩页,名片设计,设计教程,名片制作,彩色名片,名片模板,贵宾卡,pvc卡,设计欣赏,深圳名片,广州名片,business card design

首页	名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash

» 彩色名片
» PVC卡
» 彩色磁性卡
» 彩页/画册
» 个性印务
» 彩色不干胶
» 明信片
   » 明信片
   » 彩色书签
   » 门挂
» 其他产品与服务
   » 创业锦囊
   » 办公用品
   » 信封、信纸
   » 便签纸、斜面纸砖
   » 无碳复印纸
   » 海报
   » 大篇幅印刷
   » KT板
   » 海报
   » 横幅

检查字符串STRSOURCE是否为BIG或BIG5码
Public Function CheckBIG(strSource As String) As Boolean
Dim idx As Long
Dim ByteTemp() As Byte
CheckBIG = False
For idx = 1 To Len(strSource)
　　ByteTemp = StrConv(Mid(strSource, idx, 1), vbFromUnicode)
　　If UBound(ByteTemp) > 0 Then
　　　　If (ByteTemp(1) >= 64) And (ByteTemp(1) <= 126) Then
　　　　　　CheckBIG = True
　　　　　　Exit For
　　　　End If
　　End If
Next idx
End Function

返回类别: 教程
上一教程: 仿照CHINAASP论坛中TOP10写的部分显示代码
下一教程: 缩略图水印组件WSIMAGE2.0

您可以阅读与"检查字符串STRSOURCE是否为BIG或BIG5码"相关的教程:
· 检查SQL字符串中是否有单引号,有则进行转化.
· 检查SQL字符串中是否有单引号，有则进行转化
· ADO如何取得资料表栏位资讯(BIG5)
· 一个为字符串中的网址加上链接的程序例子
· 再来一套加解密字符串的FUNCTION


	快精灵印艺坊版权所有	首页会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店网站地图关于我们友情链接