vb软件中分别设计一个Sub过程方法和一个Function函数方法，功能是：输入一串字母，将这一串字母变为大写，若输入时就是大写，则提示“已经是大写字母，请重新输入”。

在Visual Basic (VB) 中，你可以创建一个名为`ToUpperCheck`的模块，其中包含一个Sub过程（Subroutine）和一个Function函数（Function），来完成这个任务。以下是它们的简单示例：

**1. Sub过程（Sub）：`

Public Sub ConvertToUpperCase()
    Dim input As String
    Console.WriteLine("请输入一串字母:")
    input = InputBox("请输入", "转换")

    If input.ToUpper() = input Then '检查是否已是大写
        MsgBox("已经是大写字母，请重新输入")
    Else
        input = input.ToUpper()
        Console.WriteLine("转换后的结果是：" & input)
    End If
End Sub

在这个Sub过程中，用户会被引导输入字符串，然后程序会检查输入是否全为大写。如果是，就会显示消息框；如果不是，则将输入转换为大写并输出。

**2. Function函数（Function）：`

Public Function ToUpperIfNotAlready(input As String) As String
    If input.ToUpper() = input Then
        Return "已经是大写字母，请重新输入"
    Else
        Return input.ToUpper()
    End If
End Function

Public Sub CallFunctionExample()
    Dim userInput As String
    userInput = InputBox("请输入一串字母:", "转换")
    Console.WriteLine("转换后的结果是：" & ToUpperIfNotAlready(userInput))
End Sub

在Function版本中，我们创建了一个名为`ToUpperIfNotAlready`的函数，它接受一个字符串作为参数。如果输入是大写，就返回提示信息；否则，返回转换后的大写字符串。在`CallFunctionExample` Sub过程中，我们调用了这个函数并展示了结果。

**相关问题--:**
1. Sub过程和Function函数有何区别，在使用时需要注意哪些点？
2. VB中的InputBox函数和Console.WriteLine在实际项目中是如何配合的？
3. 如果我想让这个功能在一个Windows Form应用程序中使用，应该如何集成？