永发信息网

vb中怎么将字符数组转换成字符串

答案:2  悬赏:50  手机版
解决时间 2021-02-08 11:20
  • 提问者网友:杀生予夺
  • 2021-02-07 11:02
vb中怎么将字符数组转换成字符串
最佳答案
  • 五星知识达人网友:西岸风
  • 2021-02-07 11:22
dim a(20) as string
dim c as string
dim l as integer
private sub command1_click()
l = 0
for i = 1 to 20
n = int(rnd * 11 + 1)
for j = 1 to n
  c = chr(int(rnd * 26 + 97))
a(i) = a(i) & c
next j
print a(i); space(15 - len(a(i)));
if len(a(i)) > l then
    l = len(a(i))
end if
if i mod 5 = 0 then print
next i

print
for i = 1 to 20
    if len(a(i)) = l then
        print "最长的字符串长度是" & l & ",字符为" & a(i) & vbcrlf
    end if
next i


end sub
全部回答
  • 1楼网友:一秋
  • 2021-02-07 12:36
Private Sub Form_Click() Dim a(3) As String, s As String a(0) = "
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯