กระทู้เก่าบอร์ด อ.Yeadram
1,997 4
URL.หัวข้อ /
URL
ใน inputbox ถ้าจะให้ช่องใส่ข้อมูลเป็นแบบ Password
Private Sub DelRecord_Click()
Dim Result As String
Result = InputBox("ใส่รหัสผ่านยืนยันสิทธิ", "Confirm Permission")
If DLookup("[Password]", "user", "[password] = '" & Result & "' and [permission] =-1") Then
DoCmd.SetWarnings (False)
Me.AllowDeletions = True
DoCmd.RunCommand acCmdDeleteRecord
Me.AllowDeletions = False
Else
If Result = "" Then
MsgBox "ยกเลิกการลบ", vbOKOnly, "Cancel"
Else
MsgBox "รหัสผ่านไม่ถูกต้อง", vbOKOnly, "False!!"
End If
End If
End Sub
จากโค้ดนี้ผมต้องทำยังไงครับ ตอนที่กรอกข้อมูล ตอนนี้มันเป็นตัวเลขโชว์ออกมา ผมอยากให้มันเป็น ******* ไม่ให้โชว์อ่ะครับ
ปล. ขอบคุณ อ.yeadram ให้คำปรึกษาเรื่องโค้ดนี้ด้วยครับ
Dim Result As String
Result = InputBox("ใส่รหัสผ่านยืนยันสิทธิ", "Confirm Permission")
If DLookup("[Password]", "user", "[password] = '" & Result & "' and [permission] =-1") Then
DoCmd.SetWarnings (False)
Me.AllowDeletions = True
DoCmd.RunCommand acCmdDeleteRecord
Me.AllowDeletions = False
Else
If Result = "" Then
MsgBox "ยกเลิกการลบ", vbOKOnly, "Cancel"
Else
MsgBox "รหัสผ่านไม่ถูกต้อง", vbOKOnly, "False!!"
End If
End If
End Sub
จากโค้ดนี้ผมต้องทำยังไงครับ ตอนที่กรอกข้อมูล ตอนนี้มันเป็นตัวเลขโชว์ออกมา ผมอยากให้มันเป็น ******* ไม่ให้โชว์อ่ะครับ
ปล. ขอบคุณ อ.yeadram ให้คำปรึกษาเรื่องโค้ดนี้ด้วยครับ
4 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R13401
อ.yeadram ครับ กำหนดตรงไหนครับ มันไม่ใช่ textbox มันแบบ popup อ่ะคับ
ใน textbox ผมกำหนดใน properties ได้แต่ inputbox เราจะกำหนดตรงไหนครับ
ใน textbox ผมกำหนดใน properties ได้แต่ inputbox เราจะกำหนดตรงไหนครับ
3 @R14248
ใช้ครับ มันไม่ใช้ textbox
4 @R14251
Time: 0.2848s
กำหนดคุณสมบัติของมันได้ใน properties dialog ได้เลยนะครับ เป็น password