定长字符串的问题

2015-04-01 02:12:04 746 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

java socket定长报文实现接口通信因为要和银行方进行通信，所以接口通信传参就需要实现定长报文，小小的吐槽一下，最开始是json传参方式到改为xml，刚写好xml还没有试试就通知要改为定长报文，也就我脾气好，真想骂爹，骂娘，但是时间有限还是得实现啊，但是网上资料又不多，最终一点点摸索弄出来了。首先定长报文是指像json格式那种key,value有字段有值的方式，定长报文就是String拼接的vlaue值，而没有key了，那么你就想了那我解析值或者取值怎么取我想要的对应的值呢，其实定长报文么，顾名思义就是没有了key就把值的长度固定了呀，. 阅读详情

项目目前代码

dim a,b as string

a = "123456"

b = a '此时b为123456

------------

想要实现定长字符串自动截取功能
例
dim a as string
dim b as New Microsoft.VisualBasic.Compatibility.VB6.FixedLengthString(5) ‘定义长度5的字符串

a = "123456"
b.value = a ' 此时 b.value = 12345

-----
但问题是这样做需要大量修改现行代码
如上面的方法，需要为每一个b赋值取值位置增加.value或者left或者substring什么的
，像这样的定长字符串用到了很多

可否从dim处入手做处理，不修改代码呢
目标：

dim a as string
dim b as 任何处理
任何处理

a = "123456"
b = a
得到b为 "12345"

...全文

如何用C语言读取不定长字符串输入请注意，使用动态内存分配需要谨慎考虑，必须在不再需要内存时释放它，以避免内存泄露。另外，在分配和重新分配内存时，还需要检查分配是否成功，以避免分配失败导致程序崩溃的情况。为了更好地处理这种情况，我们可以使用动态内存分配来分配足够的内存以存储任意长度的字符串，但这超出了本回答的范围。在读取过程中，我们还需要检查字符数是否超过了数组的长度，以防止内存溢出。要解决这个问题，我们可以使用动态内存分配来避免输入字符串长度超过预设的字符数组大小。请注意，以上代码存在一个潜在的问题，即如果用户输入的字符串长度超过了。阅读详情

gui41021

VB 16,718 成员 110,520 内容

+ 关注 + 加入社区

切换为时间正序

本拉灯 2015-04-21

打赏
举报

36楼，好牛B。。。膜拜

gui41021 2015-04-21

打赏
举报

不明觉厉还请大神指点迷津

office_2007 2015-04-15

打赏
举报

使用字符串之前你们必须了解String类型的运行方式。然后，正确使用字符串。我审阅了如上所有大神们的回答中看出，这些大神们没有弄清楚string的基本运行方式。这种原因就转向了与string基本方式相违背的方向思考。可悲啊！

string类型是数据处理程序中非常重要的一部分。例如；数据库连接。安全登陆，数据处理等等众多领域中都使用字符串。微软为了数据安全的原因，对string类型进行了策略性运行方式。一旦，对已经声明的字符串变量重新赋值时，字符串变量长度不可变的原因，就返回新的字符串变量，不是原来的字符串变量。为什么这样做呢？为了防范更改字符串变量带来的安全隐患问题。 <<返回新的字符串变量的方式替代可变长度字符串变量。>> 这样你们已经基本上了解到了string类型的问题。那么，关于解决楼主的问题你们应该明白了吗？！！楼主提出的问题不是解决的问题，是举双手投降的方式结束走向与 string相违背的死路。！阿门！

jthkl 2015-04-14

打赏
举报

学习了。。。

本拉灯 2015-04-03

打赏
举报

引用 29 楼 gui41021 的回复:

Dim a As digit= New digit(3) Dim b As String = "abcdefg" a = b 执行a = b时执行了b 的string转digit Return New Digit(d) ' new后，len= 0，val = abcdefg 这样a = b过后，a 的len 就不再是设定的3,而是New Digit(d) 时没有传递的0

E。。。这个还没想到有这样的问题。。。 Public Shared Widening Operator CType(ByVal d As String) As Digit Return New Digit(d) End Operator 这个方法是静太的，没法调用目标实体。。。你只能把那个Length也设成静太的了，不过这有缺陷，就是会变成全局的了。

gui41021 2015-04-03

打赏
举报

Dim a As digit= New digit(3) Dim b As String = "abcdefg" a = b 执行a = b时执行了b 的string转digit Return New Digit(d) ' new后，len= 0，val = abcdefg 这样a = b过后，a 的len 就不再是设定的3,而是New Digit(d) 时没有传递的0

本拉灯 2015-04-03

打赏
举报

没懂你啥意思。

gui41021 2015-04-03

打赏
举报

回楼上 a as digit(5) b as string = “123456” a = b时因为new b为digit了所以a 会被b 覆盖为长度0 123456

本拉灯 2015-04-03

打赏
举报

引用 25 楼 gui41021 的回复:

d.val.Substring(0, 5) 帅哥，如果5想作为参数传入那么dim a as digit(5） a = "123456789" 我如何把a 的长度作为参数传给 new ”123456789”的过程呢

那你就重载一个构造呀，



  ' Nested Types
    Private Class Digit
        ' Methods
        Public Length As Integer = 5
        ' Fields
        Public val As String

        Public Sub New(ByVal len As Integer)
            Length = len
        End Sub

        Public Sub New(ByVal d As String)
            Me.val = d
        End Sub

        Public Shared Widening Operator CType(ByVal d As String) As Digit
            Return New Digit(d)
        End Operator

        Public Shared Widening Operator CType(ByVal d As Digit) As String
            Return d.val.Substring(0, d.Length)
        End Operator

        Public Overrides Function ToString() As String
            Return Me.val.ToString
        End Function


      
    End Class

gui41021 2015-04-03

打赏
举报

d.val.Substring(0, 5) 帅哥，如果5想作为参数传入那么dim a as digit(5） a = "123456789" 我如何把a 的长度作为参数传给 new ”123456789”的过程呢

本拉灯 2015-04-03

打赏
举报

引用 33 楼 gui41021 的回复:

我试了重载等号不过貌似没效果

你是重载==号吧赋值号是不能重载的。

gui41021 2015-04-03

打赏
举报

我试了重载等号不过貌似没效果

本拉灯 2015-04-03

打赏
举报

引用 31 楼 gui41021 的回复:

那样的话是不是 dim a as digit(3) dim b as digit(4) 结果 a 也会长为4

是的。这没法子了。要么你只能多写一行了 a="aaaaaaa1213" a.Length=6; 这样所以你自己看了。

gui41021 2015-04-03

打赏
举报

那样的话是不是 dim a as digit(3) dim b as digit(4) 结果 a 也会长为4

於黾 2015-04-02

打赏
举报

引用 22 楼 dunewer 的回复:

有没有试过string.padleft这个函数？

这是作为补齐用的,不能用来截断也就是说,字符串如果不满n个,则在左边补某个字符但是如果已经超过n个了,你调用了也没效果的

本拉灯 2015-04-02

打赏
举报

引用 21 楼 gui41021 的回复:

这段在VB里怎么写？



 ' Nested Types
        Private Class Digit
            ' Methods
            Public Sub New()
            End Sub

            Public Sub New(ByVal d As String)
                Me.val = d
            End Sub

            Public Shared Widening Operator CType(ByVal d As String) As Digit
                Return New Digit(d)
            End Operator

            Public Shared Widening Operator CType(ByVal d As Digit) As String
                Return d.val.Substring(0, 5)
            End Operator

            Public Overrides Function ToString() As String
                Return Me.val.ToString
            End Function


            ' Fields
            Public val As String
        End Class

dunewer 2015-04-02

打赏
举报

有没有试过string.padleft这个函数？

gui41021 2015-04-02

打赏
举报

引用 16 楼 wyd1520 的回复:

这样就能做到最小修改了


 class Digit
        {
            public Digit()
            {
               
            }

            public Digit(string d)
            { 
                val = d; 
            }
            public string val;


            // User-defined conversion from Digit to double
            public static implicit operator string(Digit d)
            {
                return d.val.Substring(0, 5);
            }
            //  User-defined conversion from double to Digit
            public static implicit operator Digit(string d)
            {
                return new Digit(d);
            }
        }
  Digit dig = new Digit();
            dig = "abcdefghijk";
            //This call invokes the implicit "double" operator
            string num = dig;
            //This call invokes the implicit "Digit" operator
            Digit dig2 = "abcdefgaefe";
            Console.WriteLine("num = {0} dig2 = {1}", num, dig2.val);
            Console.ReadLine();

public static implicit operator string(Digit d) { return d.val.Substring(0, 5); } 这段在VB里怎么写？

gui41021 2015-04-01

打赏
举报

引用 19 楼 Z65443344 的回复:

不管用什么方式,你也得找到所有需要截断的字符串,一个一个的改的因为你的项目里必然是有字符串不需要截断的,而不是所有字符串都要截断比如数据库连接字符串,你截断了还得了比如JSON数据字符串等等

是的虽然是一部分量也不小呢所以才考虑只改定义不进代码

於黾 2015-04-01

打赏
举报

不管用什么方式,你也得找到所有需要截断的字符串,一个一个的改的因为你的项目里必然是有字符串不需要截断的,而不是所有字符串都要截断比如数据库连接字符串,你截断了还得了比如JSON数据字符串等等

加载更多回复（17）

定长字符串的问题

相关推荐