精华内容
下载资源
问答
  • VB中的字符串拼接

    万次阅读 2007-08-22 16:06:00
    拼接字符串VB做也是很简单。比如把字符串“你好”和字符串“吗?”拼接起来:dim a,bdim ca="你好"b="吗?"c=a+b这样,str里面值就是“你好吗?”。以上是字符串的拼接。如果不做说明,VB的dim声明出来是...
    拼接字符串用VB做也是很简单的。
    比如把字符串“你好”和字符串“吗?”拼接起来:
    dim a,b
    dim c
    a
    ="你好"
    b
    ="吗?"
    c
    =a+b

    这样,str里面的值就是“你好吗?”。
    以上是字符串的拼接。如果不做说明,VB的dim声明出来的是variant类型,也就是不定类型,编译器会根据变量的值的范围来决定变量的类型。那么如果a=“你好吗?”,b=12345这两个变量进行拼接,使用相同的方法是不行的。因为加号(+)会被数字判断为计算和,而被字符判断为拼接。这时会出错。
    dim a,b
    dim c
    a
    ="你好吗?"
    b
    =12345
    c
    =a+b

    正确的应该用&进行拼接。
    dim a,b
    dim c
    a
    ="你好吗?"
    b
    =12345
    c
    =a&b

    那么,最好的解决方法就是无论什么拼接,一律用&去做而尽量不用+进行拼接。
    展开全文
  • VB中的字符串操作函数

    千次阅读 2009-03-27 00:51:00
    ASC(X),Chr(X):转换字符字符码 [格式]: P=Asc(X) 返回字符串X的第一个字符的字符码 P=Chr(X) 返回字符码等于X的字符 [范例]: (1)P=Chr(65) ‘ 输出字符A,因为A的ASCII码等于65 (2)P=Asc(“A”) ‘ 输出...

    ASC(X),Chr(X):转换字符字符码  

     

    [格式]:  
    P=Asc(X) 返回字符串X的第一个字符的字符码  
    P=Chr(X) 返回字符码等于X的字符  

    [范例]:  
    (1)P=Chr(65)  
    ‘ 输出字符A,因为A的ASCII码等于65  
    (2)P=Asc(“A”)  
    ‘ 输出65  


    2. Len(X):计算字符串X的长度  
    [格式]:  
    P=Len(X)  
    [说明]:  
    空字符串长度为0,空格符也算一个字符,一个中文字虽然占用2 Bytes,但也算一个字符。  

    [范例]:  
    (1) 令X=”” (空字符串)  
    Len(X) 输出结果为0  
    (2) 令X=”abcd”   
    Len(X) 输出结果为4  
    (3) 令X=”VB教程”  
    Len(X) 输出结果为4  


    3. Mid(X)函数:读取字符串X中间的字符  
    [格式]:  
    P=Mid(X,n)  
    由X的第n个字符读起,读取后面的所有字符。  
    P=Mid(X,n,m)  
    由X的第n个字符读起,读取后面的m个字符。  

    [范例]:  
    (1) X=”abcdefg”  
    P=Mid(X,5)  
    结果为:P=”efg”  
    (2) X=”abcdefg”  
    P=Mid(X,2,4)  
    结果为P=”bcde”  


    4. Replace: 将字符串中的某些特定字符串替换为其他字符串  
    [格式]:  
    P=Replace(X,S,R)  
    [说明]:将字符串X中的字符串S替换为字符串R,然后返回。  

    [范例]:  
    X=”VB is very good”  
    P=Replace(X,good,nice)  
    输出结果为:P=”VB is very nice”  


    5. StrReverse:反转字符串  
    [格式]:  
    P=StrReverse(X)  
    [说明]:  
    返回X参数反转后的字符串  
    [范例]:  
    (1)X=”abc”  
    P=StrReverse(X)  
    输出结果:P=”cba”  


    6. Ucase(X),Lcase(X):转换英文字母的大小写  
    [格式]:  
    P=Lcase(X)  
    ‘ 将X字符串中的大写字母转换成小写  
    P=Ucase(X)  
    ‘ 将X字符串中的小写字母转换成大写  
    [说明]:除了英文字母外,其他字符或中文字都不会受到影响。  

    [范例]:  
    (1) 令 X=”VB and VC”  
    则Lcase(X)的结果为”vb and vc”,Ucase(X)的结果为”VB AND VC”  


    7. InStr函数:寻找字符串  
    [格式]:  
    P=InStr(X,Y)  
    从X第一个字符起找出Y出现的位置  
    P=InStr(n,X,Y)  
    从X第n个字符起找出Y出现的位置  
    [说明]:  
    (1)若在X中找到Y,则返回值是Y第一个字符出现在X中的位置。  
    (2) InStr(X,Y)相当于InStr(1,X,Y)。  
    (3)若字符串长度,或X为空字符串,或在X中找不到Y,则都返回0。  
    (4) 若Y为空字符串,则返回0。

    展开全文
  • vb怎么提取字符串中的字母,比如120v或13220u,我要提取v跟u,vb中有这种功能的函数没?
  • VB.NET取得字符串中所有数字: 1.用正则表达式: '引入命名空间 Imports System.Text.RegularExpressions Public Shared Function GetNumbers(ByVal str As String) As String Return Regex.Replace(str, “[a-z]...

    VB.NET取得字符串中所有的数字:

    1.用正则表达式:

    '引入命名空间
    Imports System.Text.RegularExpressions
    Public Shared Function GetNumbers(ByVal str As String) As String
    Return Regex.Replace(str, “[a-z]”, “”, RegexOptions.IgnoreCase).Trim()
    End Function

    2.写一个vb.net教程函数

       '''   <summary>   
        '''   从字符串中提取所有数字   
        '''     Returns:所有数字   
        '''   </summary>     
        '''   <param  name = "strp">需要提取的字符串   </param>   
        '''   <returns> 所有数字</returns>   
        Private Function GetNumbers(ByVal strp As String) As String
            Dim strReturn As String = String.Empty
            If strp Is Nothing OrElse strp.Trim() = "" Then
                strReturn = ""
            End If
            For Each chrTemp As Char In strp
                If [Char].IsNumber(chrTemp) Then
                    strReturn += chrTemp.ToString()
                End If
            Next
            Return strReturn
        End Function
    
    展开全文
  • 虽然看过《老兵新传》《VisualBasic win32编程》中介绍vb字符串的内容,但依旧对vb中的字符串如何存储不十分清楚,不像对C语言中的字符串那样,在头脑中有一个清晰的轮廓。同时对varptr(),strptr()的理解也只限于书...

        虽然看过《老兵新传》《VisualBasic win32编程》中介绍VB6字符串的内容,但依旧对VB6中的字符串如何存储不十分清楚,不像对C语言中的字符串那样,在头脑中有一个清晰的轮廓。同时对varptr(),strptr()的理解也只限于书上的那些例子。直到有一天,突然灵光一闪,动手写了下面的程序,当程序执行的结果出现时,我也终于恍然大悟。

    Option Explicit
    Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
    
    Sub main()
        Dim strA As String
        strA = "BSTR"
        
        Dim addrofStr As Long
        addrofStr = StrPtr(strA)
        Debug.Print "StrPtr(strA):" & addrofStr
        
        Dim llength As Long
        addrofStr = addrofStr - 4
        CopyMemory llength, ByVal addrofStr, 4 'llength中应为字符串包含的字节数
        Debug.Print "length of bytes:" & llength
        
        Dim addrofVar As Long
        addrofVar = VarPtr(strA)
        Debug.Print "VarPtr(strA):" & addrofVar
        
        Dim addrofTest As Long
        CopyMemory addrofTest, ByVal addrofVar, 4
        Debug.Print "content in addrofVar:" & addrofTest
        
    End Sub
    
    '代码运行结果为:
    'StrPtr(strA):1909252
    'length of bytes:8
    'VarPtr(strA):1309648
    'content in addrofVar:1909252

        说明:

        1、程序中先声明了一个字符串变量strA,使用StrPtr(strA)取值并保存于long型变量AddrofStr中,该值为:1909252,每次执行这个值会有变化,这是一个32位的地址值,指向存储字符串"BSTR"的内容地址的首字节。

        2、在比这个地址(AddrofStr)小四个字节的地方(AddrofStr-4所指向的地址)存储着"BSTR"的字节数,证明"BSTR"是UNICODE编码,一个字符占两个字节的空间,所以整个字符串的字节数是8。

        3、使用VarPtr(strA)取值保存于long型变量addofVar中,该值为:1309648,这个值是strA变量在内容中的地址,在这个地址中存储的就是真正指向字符串"BSTR"在内存中的首地址,即1909252,验证如下。

        4、取得addrofVar地址中的内容,存储于long型变量addrofTest中,打印出该变量的值,为:1929252,恰好与StrPtr(strA)相等。

        5、程序代码中声明的long型变量在VB6中是32的数据,实际上是用来存储一个32的地址,相当于C语言中的指针。

        6、在copymemory(目的操作数,源操作数,字节数)函数中,对于目的操作数和源操作数,如果使用了“byval 地址”的格式,那么实际上操作的是这个地址中的内容;如果只是“地址”,那么操作的是地址值本身。 

        下面用一张图画出上面的整个过程:


    展开全文
  • VB.net中文字符串转拼音

    千次阅读 2018-01-18 14:08:06
    从NuGet上发现一个很好用包可以实现该效果这个包可以直接把单个汉子转换成拼音字符串,于是自己写了个函数实现对整个字符串的拼音转换 ''' ''' 字符串转拼音 ''' ''' ''' Public Function toPinyin(ByVal ...
  • 一般来说,VB访问远程后台数据库有...OO4O是一种进程中的OLE服务器,但是它不使用ODBC标准, 它利用ORACLE的调用接口来与ORACLE会话,这样一来,它就可以克服ODBC的速度慢的缺点了。正是由于OO4O访问ORACLE的这种特殊...
  • 这是《Excel VBA:办公自动化》教程第8节,介绍字符串。1.认识VBA:什么是VBA?2.这些掌握了,你才敢说自己懂VBA3.VBA变量5年踩坑吐血精华总结4.VBA重要强制申明,谁看谁明白5.VBA掌握循环结构,包你效率提高...
  • VB.NET校验字符串函数

    2020-09-03 17:16:47
    本文给大家分享是2个vb.net字符串类型函数,十分简单实用,有需要小伙伴可以参考下。
  • VB.net中字符串操作函数

    千次阅读 2012-02-07 13:13:03
    VB.net中字符串操作函数   函数 语法 功能 Len Len(string|varname) 返回字符串内字符数目,或是存储一变量所需字节数。 Trim Trim(string) 将字符串前后空格去掉 Ltrim Ltrim(string) 将...
  • 描述: 从一个字符串中截取到 固定两个字符串之间的 字符 例子:截取假如今天是星期四:5分 这句话中的 5 字 Dim s As String Dim l As Long Dim szText As String s = TextBox2.Text l = InStr(s, "星期四...
  • vb6中字符串转控件名方法

    千次阅读 2013-12-22 20:24:38
    vb6中字符串转控件名方法 比如我想用"label1"来调用label1控件,我们可以用: me("label1")来调用label1所有属性: me("label1").caption="xxx" me("label1").backcolor=vbred ... ... 所有属性都可用,可查看...
  • 通过data获取图片拓展名//通过图片Data数据第一个字节来获取图片扩展名-(NSString*)contentTypeForImageData:(NSData*)data{uint8_tc;[datagetBytes:&clength:1];switch(c){case0xFF:return@"jpeg";...
  • VB.NET中字符串操作函数

    千次阅读 2008-01-10 10:17:00
    VB.NET中字符串操作函数 函数 语法 功能 Len Len(string|varname) 返回字符串内字符数目,或是存储一变量所需字节数。 Trim Trim(string) 将字符串前后空格去掉 Ltrim Ltrim(string
  • vb使用字符串分隔字符串 最近,我在一次培训课程辅导初中生。 任务之一是编写一个类,该类可以根据某些字符串键使映射变形。 创建初级用户之一结果包含以下方法: void dwarwle(HashMap<String,Dwarwable...
  • 函数 语法 功能Len Len...Trim Trim(string) 将字符串前后空格去掉Ltrim Ltrim(string) 将字符串前面空格去掉Rtrim Rtrim(string) 将字符串后面空格去掉Mid Mid(string,start,length) 从string字符串的start字...
  • 【e良师益友网】编写程序都会涉及到了字符串的使用,本文将介绍VB中字符串的一些使用心得: 1、方法介绍: SubStr() 中文化取子字串,相对Mid() Strlen() 中文化字串长度,相对Len() StrLeft() 中文化取左字串,...
  • 这个连接在VB6是可以运行而且是对。。。。 获取gstrOraUser和gstrOraPwd 时在VB6是进行了转换: gstrOraUser = StrConv(LeftB(StrConv(strBuf3, vbFromUnicode), lngLen), vbUnicode) 是不是这里出现了...
  • 怎么判断和修改vb字符串中的某个字符?能不能将字符串当作一个数组来修改呢?
  • vb中字符串数组赋值

    万次阅读 2006-08-23 17:30:00
    前段时间用vb.net写程序,遇到一个给字符串数组赋值问题。用google搜索了很长时间,找到大都使用循环方法赋值,我觉得那样有些麻烦,就一直在找新方法。虽然后来找到了,时间长了, 我居然又给忘了。 今天...
  • VB中字符串操作函数

    2016-03-23 13:45:00
    1 Len Len(string|varname) 返回字符串内字符数目,或是存储一变量所需字节数。 2 Trim Trim(string) 将字符串前后空格去掉 3 Ltrim Ltrim(string) 将字符串前面空格去掉 4 Rtrim Rtrim(string) 将...
  • 没日没夜找了两天,翻了无数页面,终于找到VB中用SENDMESSAGE...VB6+XP系统下向DELPHI窗体TEDIT发送字符串成功。英文字符串都可以。DELPHI窗体不需要焦点。源代码如下:lngHwnd = FindWindow("TFormMain", 
  • EXCEL函数公式大全之利用FIND函数...在日常的工作中我们经常容易把员工姓名和部门输入到一个单元格中,那么有没有一个函数可以提取文本中的部门呢?我们今天的例子就是利用FIND函数和LEFT函数提取销售员中的部门。第...
  • VB中字符串匹配多种方式

    千次阅读 2012-06-13 09:11:55
    这段时间在移植项目过程中,起初我想判断一个字符串中是否存在某字符(串),直接使用方法是用instr(start,string1,string2,VB compare),但经过分析在VB中可以只用一下方法来判断! 1.常用 InStr 方法 ...
  • vb6获取字符串长度

    2014-10-11 14:56:00
    用过VB5.0或者更早版本读者应该知道VB有一个测试字符串长度函数:Len。但当你升级到VB6时,会发现这里Len并没有以前那么好用了——它变成了测试字符个数而不是字符串长度。就是说,当你用以前版本的VB执行Len(...
  • vb中Variant类型调用mid函数返回的字符串还是在原来字符串里面么?怎么区分Variant类型和字符串类型?vb怎么调用不定长的mid?
  • VB 6.0 在字符串中用一子串替换另一子串,采用VB中内置的Replace函数来实现,类似这种的替换字符串方法,在平时使用十分广泛,在WEB编程的ASP/PHP/ASP.NET中,同样使用广泛。本示例中,主要是替换一个字符串中的指定...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 1,719
精华内容 687
关键字:

vb中的字符串