怎么定义一个串口类型，源代码发上，求解

如何定义一个串口类型，源代码发上，求解
Public StrHexSend As String
Public Sjsend()  As String
Public Bytesend() As Byte
Public Function SendStr_To_PLC(Sstr As String, Mscomm10 As mscomm)
    Dim l, I As Integer
    If Sstr = "" Then Exit Function
    If Mscomm10.PortOpen = True Then Mscomm10.PortOpen = False
    Mscomm10.CommPort = 7
    Mscomm10.SThreshold = 0
    Mscomm10.InBufferCount = 0
    Mscomm10.OutBufferCount = 0
    Mscomm10.InputMode = comInputModeText
    l = Len(Sstr)
    StrHexSend = ""
    For I = 1 To l
        StrHexSend = StrHexSend + (Hex(Asc(Mid(Sstr, I, 1)))) + Space(1)
    Next I
    StrHexSend = StrHexSend + "0D"
    Mscomm10.Settings = "9600,O,8,1"
    Sjsend = Split(StrHexSend, " ")
    l = UBound(Sjsend)
    ReDim Bytesend(l)
    For I = 0 To l
        Bytesend(I) = Val("&H" & Sjsend(I))
    Next I
    If Mscomm10.PortOpen = False Then Mscomm10.PortOpen = True
    Mscomm10.Output = Bytesend
End Function
这是一个像松下PLC发送数据的程序，可是出现错误：用户定义类型未定义
经过检查发现是这一句Public Function SendStr_To_PLC(Sstr As String, Mscomm10 As mscomm)
中的mscomm这个类型没有定义，求解应该怎么定义才能让程序正常运行，我需要调用这个函数，我
试过将mscomm改成string，错误提示变成了：byref参数类型不符，我的调用方式是：
str = "%01#WCSR00711**"
Call SendStr_To_PLC(str, mscomm1)
各位大神求解，VB没学几天，实在弄不懂怎么定义类型，拜托了
------解决方案--------------------
在工具窗口中点击右键,添加控件,将mscomm控件加入到工程