![]() |
FlowFact - Entwicklungstools |
![]() |
Sub | Add(ByVal strPhone1 As String, ByVal strPhone2 As String, ByVal strPhoneComment As String) |
strPhone1: Vorwahl strPhone2: Durchwahl strPhoneComment: Kommentar Public Sub Add(ByVal strPhone1 As String, ByVal strPhone2 As String, ByVal strPhoneComment As String) Dim strLine As String strLine = strPhone1 & vbTab & strPhone2 & vbTab & strPhoneComment m_oList.Add m_oList.Count + 1, strLine End Sub |