如何在 Visual Basic 中选择字符串的字符部分答案

【问题标题】：How to select the characters part of string in Visual basic如何在 Visual Basic 中选择字符串的字符部分
【发布时间】：2024-01-09 13:56:01
【问题描述】：

我有一些带有数字和字符组合的字符串变量。像这样：

A12452

BCD23

ESK56003

使用 vbscript 我想从这些字符串中获取字符而不是数字。所以我应该得到以下结果。

一个

BCD

ESK

注意：我现在在 VB6 上。

【问题讨论】：

这个问题很混乱。您使用哪种编程语言？ VB 6、VBScript 还是 VBA？您需要一个可以与所有或仅其中一个一起使用的解决方案吗？如果您想在 VBScript 中完成这项工作，为什么有时也使用 VB 6 很重要？这特别难说，因为你已经使用了所有的标签！
相关问题：*.com/q/8589746/262403
连同 Ilya 发布的链接，您可以从我对 this question 的回答中轻松找出解决方案。我很确定这些字符串操作函数对 VB 的所有方言都是通用的。

标签： excel vbscript vb6 vba

【解决方案1】：

VBA：

Dim i As Long
Dim k As Long

k = Len (MyString)
i = 1
Do Until (i > k) Or (IsNumeric (Mid$ (MyString, i, 1)))
    i = i + 1
Loop

Result = Left$ (MyString, i - 1)

编辑：我刚刚注意到此代码中可能存在错误，因为Or 在 VBA 中不是短路的（即，即使第一个表达式为真，Or 后面的表达式也会被评估）。编写循环的正确方法可能是

Do
    If i > k Then Exit Do
    If IsNumeric (Mid$ (MyString, i, 1)) Then Exit Do
    i = i + 1
Loop

【讨论】：