我想设计一个vb.net程序,它从字符串中找到最长的单词。在其他用户的帮助下,我设法做到了,我添加了其他字符串操作。总的来说,程序现在计算符号数,字数,间隔数,查找最长和最短的字以及平均字大小。我认为代码可以帮助那些像我这样的操作有同样问题的人,所以我在下面发布了它。 以下是该计划的图片:https://i.stack.imgur.com/KcPNa.png 这是最终代码的外观:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim a As String = TextBox1.Text
Dim a1 As Integer = Len(a) ' string size
Dim a3 As String = a.Split(" ").Length - 1 ' interval count
Dim a4 As String = a.Split(" ").OrderByDescending(Function(j) j.Length).FirstOrDefault 'longest word
Dim a5 As String = a.Split(" ").OrderByDescending(Function(j) j.Length).LastOrDefault 'shortest word
Dim a6 As String = a.Split(" ").Average(Function(j) j.Length) 'average word count
TextBox2.Text = a1
TextBox4.Text = a3
TextBox3.Text = a3 + 1 'word count is just 1 more than interval count
TextBox5.Text = a4
TextBox6.Text = a5
TextBox7.Text = a6
End Sub
答案 0 :(得分:0)
我无法在vb中提供解决方案,但也许我的c#实现会给你一个提示。
string source = "some string";
string longest = string.empty;
foreach(string s in source.Split(' ')) {
if (s.Length > longest.Length) {
longest = s;
}
}
Console.WriteLine(longest);
提示:下一次询问更具体的问题会有所帮助。