การเก็บค่าInputตามDigitที่กำหนดไว้

[Earth]

พลาดตรงนี้เอง ขอบคุณมากค่ะ

[Earth]

สอบถามอาจารย์ค่ะ โค้ดนี้สามารถนำมาประยุกต์บน vb.net ได้อย่างไรบ้างคะ

โค้ดที่ทำการหาข้อความผลลัพธ์ เอาชื่อฟอร์มและเทเบิลที่ถูกต้องมาใส่แทนด้วยครับ

โค๊ด: [Select]

Dim L           As Integer
Dim Tx          As Variant
Dim TxCtrl      As Access.TextBox
Dim Str         As String   ' เก็บข้อความผลลัพธ์

For Each Tx In Split("ITEM ID,NAME,LOT", ",")  ' ลิสท์รายชื่อของเท็กซ์บ็อกซ์ คั่นแต่ละชื่อด้วยเครื่องหมาย "," และจะมีกี่ชื่อก็ได้
    Set TxCtrl = Forms("ชื่อฟอร์ม")(Tx)
    L = CurrentDb.TableDefs("ชื่อเทเบิล")(TxCtrl.ControlSource).Size
    Str = Str & Left$(TxCtrl & Space(255), L)
Next


[สันติสุข]

ไม่ทราบครับ ไม่มีความรู้ VB.NET ครับ