השלמת שם משתמש.

[Rרחמים]

תודה על השיתוף
הקובץ אכן נמחק אבל לא עבד לי המחיקה של הרשומות בתיבת הרשימה אז תיקנתי קצת הקוד כך

Private Sub ניקוי_Click()

    On Error GoTo Err_ניקוי_Click

    strFilePath = GetTempFolder & "\Your Application\"

    If Not Dir(strFilePath & "cookie.users") = "" Then
        Kill strFilePath & "cookie.users"
    End If

    ' מחיקת הרשומות מתיבת הרשימה
     Dim i As Integer
     For i = Me.cboUsername.ListCount - 1 To 0 Step -1
     Me.cboUsername.RemoveItem Index:=i
     Next

    MsgBox "מחקת בהצלחה את השמות משתמשים מזכרון המחשב!", vbMsgBoxRight + vbMsgBoxRtlReading + vbOKOnly, "הודעת מנהל המערכת"

    Exit Sub

Err_ניקוי_Click:
    MsgBox Err.Description

End Sub

 

[אפקטיביות]

ואפשר גם כך:

Me.cboUsername = ""
    Me.cboUsername.RowSource = ""

התוצאה היא מחיקה של הערכים ב"מקור רשומה".

נ.ב. מומלץ להעביר את הפקודה שמכניסה ערכים לקוקי, מ"לאחר עדכון" של שם משתמש, - ללחצן "כניסה".
כדי שלא ישמור לזיכרון כל ניסיון לא מוצלח.