กระทู้เก่าบอร์ด อ.Yeadram
        
           1,233   1		  
          
					  
		    URL.หัวข้อ / 
		    URL
        
        ผู้สอบถาม      
    
      สอบถามหน่อยค่ะ พอดีว่า ทำ Barcode แล้วมี Textbox 2 อัน มี txtstr และ txtend เพื่อจะ RunBarcode Auto เช่นจากเลข FDB580001 ถึง FDB580050
ซึ่งจะให้ FDB58 อยู่ตลอดไป และเลข 4 ตัวหลัง ให้ RUN ไปเรื่อยต้นเดือนก็ Run เลข FDB580001 ใหม่ แล้ว โชว์ใน Report FDB580001 จะโชว์แผ่นที่ 1 ,FDB580002 จะโชว์แผ่นที่ 2,FDB580003 จะโชว์แผ่นที่3 จนถึง FDB580080 ใน REPORT จะทำอย่างไรดีค่ะ
    
  ซึ่งจะให้ FDB58 อยู่ตลอดไป และเลข 4 ตัวหลัง ให้ RUN ไปเรื่อยต้นเดือนก็ Run เลข FDB580001 ใหม่ แล้ว โชว์ใน Report FDB580001 จะโชว์แผ่นที่ 1 ,FDB580002 จะโชว์แผ่นที่ 2,FDB580003 จะโชว์แผ่นที่3 จนถึง FDB580080 ใน REPORT จะทำอย่างไรดีค่ะ
				1 Reply in this Topic. Dispaly 1  pages and you are on page number 1 
				
      Time: 0.6053s
    
      
		
ลองใช้ โค๊ดนี้แล้ว แต่รันไม่ได้ ค่ะ อาจารย์คนไหนก็ได้ค่ะ ต้องขอขอบคุณล่วงหน้า
Private Sub Command36_Click()
Dim a As String
Dim result As String
Dim PatternRunningNo As Integer
Dim PatternNoEnd As Integer
Dim PatternNoStart As Integer
For PatternRunningNo = PatternNoStart To PatternNoEnd
result = "FD58LD" & PatternRunningNo
MsgBox result
Next PatternRunningNo
End Sub
Do While Item <= 1
Print Item
Item = Item + 1
Loop
End Sub