![](/img/trans.png)
[英]Cut all strings in column to a specified number of characters no chopping words
[英]Creating a specified number of strings
我想在VB.NET控制台应用程序中创建指定数量的字符串。 我已经尝试过此代码,但是会引发异常:
NullReferenceException:未将对象引用设置为对象的实例。
这是代码:
Module RandStrConsole
Dim r As New Random
Dim s As String
Dim result As System.Text.StringBuilder
Dim sb As System.Text.StringBuilder
Dim MaxChar As Integer
Sub Main()
Console.Write("Enter String: ") : s = Console.ReadLine
Console.Write("Maxchar: ") : MaxChar = Console.ReadLine
For i As Integer = 1 To MaxChar
Dim idx As Integer = r.Next(0, s.Count - 1)
result = sb.Append(s.Substring(idx, 1)) 'NullReferenceException: Object Reference not set into an instance of an Object.
result.ToString()
Next
Console.WriteLine(result)
Console.ReadKey()
End Sub
End Module
带注释的部分指示发生异常的位置。
您忘记了初始化StringBuilders
。 您必须使用New
关键字 。
Dim result As New System.Text.StringBuilder
Dim sb As New System.Text.StringBuilder
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.