gpt4 book ai didi

vb6 - Visual Basic 6.0 中的字符数组

转载 作者:行者123 更新时间:2023-12-04 19:19:31 26 4
gpt4 key购买 nike

考虑:

char [] chararray = txt1.Text;

我们如何在 Visual Basic 6.0 中做同样的事情?

最佳答案

这取决于你最终想要做什么。

例如,您可以在 VB6 中执行此操作:

Dim b() As Byte
b = Text1.Text

这样 b数组将被调整大小以保存来自 "string" 的 Unicode 数据-- 但是每个字符将被分成两个字节,这可能不是您想要的。此技巧仅适用于 Byte .

你也可以这样做:
Dim b() As Byte
b = StrConv(Text1.Text, vbFromUnicode)

每个字母现在将占用一个字节,但扩展字符将消失。仅当当前系统代码页包含所需字符时才执行此操作。

您可以手动将字符复制到数组中:
Dim s() As String, i As Long
ReDim s(1 To Len(Text1.Text))

For i = 1 To UBound(s)
s(i) = Mid$(Text1.Text, i, 1)
Next

或者您甚至可以完全避免创建数组,因为 Mid也可作为索引器操作符,在原地更改字符,无需复制或分配任何内容:
Dim s As String
s = Text1.Text

Mid$(s, 3, 1) = "!"

关于vb6 - Visual Basic 6.0 中的字符数组,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/3820877/

26 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com