使用VB6向字符串添加字符

时间:2019-04-05 11:21:24

标签: vb6

说我有一个这样的地址:

Dim address as string
address= "1 The Street, London, LN11SD"

我想在最后三个字符前添加一个空格,以便地址看起来像这样(请注意邮政编码中的空格):

1 The Street, London, LN1 1SD

我该怎么做?我花了最后一个小时使用Google搜索这个简单的问题,并且在VB.NET中使用string.Insert找到了许多示例。但是,我找不到任何有关VB6及其相关原因的示例。

2 个答案:

答案 0 :(得分:2)

第1步-您必须获取所有地址变量,然后使用Mid函数删除最后3个字符
第2步-添加空间
步骤3-使用正确的功能获取最后3个字符

Dim address As String
address = "1 The Street, London, LN11SD"

address = Mid(address, 1, Len(address) - 3) & " " & Right(address, 3)

答案 1 :(得分:1)

简单地说,您可以这样做:

Dim address as string
address = "1 The Street, London, LN11SD"

address = Left$(address, 25) & " " & Right$(address, 3)

话虽这么说,我认为您需要更多的逻辑来准确检测大量地址中缺少空间的位置。