กระทู้เก่าบอร์ด อ.Yeadram
        
           1,917   4		  
          
					  
		    URL.หัวข้อ / 
		    URL
        
        นาย นาง นางสาว ครับ      
    
      เรียนถามอาจารย์และท่านผู้รู้ครับ
1.ผม link ข้อมูลจาก ตารางของฐานข้อมูลอันนึงมาใช้
2.จากตารางหลัก มี field คำนำหน้าชื่อ กำหนดให้กรอกข้อมูลเป็น 1,2,3
3.โดยที่ 1 หมายถึง นาย
2 หมายถึง นาง
3 หมายถึง นางสาว
4.ผมสร้างรายงานชื่อ Re_NameOfHouseHolde
5.กำหนดให้มี textbox ชื่อ txt01 เป็นตัวรับค่า ที่รายงาน
6.โดยที่ title01 คือชื่อของ field คำนำหน้าชื่อ
6.แล้วใช้ if..then เพื่อให้ 1 = นาย 2= นาง 3= นางสาว เมื่อเปิดใช้รายงานดังนี้
Private Sub Report_Current()
If title01 = 1 Then
txt1 = นาย
ElseIf title01 = 2 Then
txt1 = นาง
ElseIf title01 = 3 Then
txt1 = นางสาว
End If
End Sub
มันเฉยๆครับอาจารย์..ไม่แสดงอะไรเลย
คือผมใช้คำสั่งผิด หรือว่าใช่ผิด เหตุการณ์ครับ
ขอคำสอนแนะด้วย..เป็นพระคุณอย่างยิ่งครับ
    
  1.ผม link ข้อมูลจาก ตารางของฐานข้อมูลอันนึงมาใช้
2.จากตารางหลัก มี field คำนำหน้าชื่อ กำหนดให้กรอกข้อมูลเป็น 1,2,3
3.โดยที่ 1 หมายถึง นาย
2 หมายถึง นาง
3 หมายถึง นางสาว
4.ผมสร้างรายงานชื่อ Re_NameOfHouseHolde
5.กำหนดให้มี textbox ชื่อ txt01 เป็นตัวรับค่า ที่รายงาน
6.โดยที่ title01 คือชื่อของ field คำนำหน้าชื่อ
6.แล้วใช้ if..then เพื่อให้ 1 = นาย 2= นาง 3= นางสาว เมื่อเปิดใช้รายงานดังนี้
Private Sub Report_Current()
If title01 = 1 Then
txt1 = นาย
ElseIf title01 = 2 Then
txt1 = นาง
ElseIf title01 = 3 Then
txt1 = นางสาว
End If
End Sub
มันเฉยๆครับอาจารย์..ไม่แสดงอะไรเลย
คือผมใช้คำสั่งผิด หรือว่าใช่ผิด เหตุการณ์ครับ
ขอคำสอนแนะด้วย..เป็นพระคุณอย่างยิ่งครับ
				4 Reply in this Topic. Dispaly 1  pages and you are on page number 1 
				
        
    2 @R08630    
        
  
      If title01 = 1 Then 
txt1 = นาย
ElseIf title01 = 2 Then
txt1 = นาง
ElseIf title01 = 3 Then
txt1 = นางสาว
End If
End Sub
ที่คุณบอก ไม่เห็นมี txt1 เลยครับ ผมว่าตัวรับค่า ส่งค่ามันไม่ถูกครับ
ผมว่าเอาไปใส่ใน Query ดีกว่า ถ้ามีแค่ 3 ตัว ก็ใช้แบบนี้
Title:Switch([title01]=1,'นาย',[title01]=2,'นาง',[title01]=3,'นางสาว',)
แล้วเอา Title ไปใส่ใน รายงาน
    
  txt1 = นาย
ElseIf title01 = 2 Then
txt1 = นาง
ElseIf title01 = 3 Then
txt1 = นางสาว
End If
End Sub
ที่คุณบอก ไม่เห็นมี txt1 เลยครับ ผมว่าตัวรับค่า ส่งค่ามันไม่ถูกครับ
ผมว่าเอาไปใส่ใน Query ดีกว่า ถ้ามีแค่ 3 ตัว ก็ใช้แบบนี้
Title:Switch([title01]=1,'นาย',[title01]=2,'นาง',[title01]=3,'นางสาว',)
แล้วเอา Title ไปใส่ใน รายงาน
        
    3 @R08632    
        
  
      Private Sub Report_Current() 
If title01 = 1 Then
txt1 = นาย
ElseIf title01 = 2 Then
txt1 = นาง
ElseIf title01 = 3 Then
txt1 = นางสาว
End If
End Sub
นาย นาง นางสาว ตามที่เขียนนั้น จะถูกตีความหมายว่าเป็นตัวแปรนะครับ
ใส่เครื่องหมายคำพูดก็จะได้แล้วละครับ
txt1 ="นาย"
txt1 ="นาง"
txt1 ="นางสาว"
    
  If title01 = 1 Then
txt1 = นาย
ElseIf title01 = 2 Then
txt1 = นาง
ElseIf title01 = 3 Then
txt1 = นางสาว
End If
End Sub
นาย นาง นางสาว ตามที่เขียนนั้น จะถูกตีความหมายว่าเป็นตัวแปรนะครับ
ใส่เครื่องหมายคำพูดก็จะได้แล้วละครับ
txt1 ="นาย"
txt1 ="นาง"
txt1 ="นางสาว"
        
    4 @R08638    
        
    
      ขอบคุณทุกท่านครับ
เดี๋ยวไปลองดู
ไปประชุมก่อนครับ
    
  เดี๋ยวไปลองดู
ไปประชุมก่อนครับ
      Time: 0.5114s
    
      
		
textbox ตัวที่ชื่อ txt1
กำหนดค่า ไม่ให้มันผูกกับฟิลด์ใดๆ เลยครับ
เขียนเป็นนิพจน์ ดังนี้ครับ = iif(title01=1,"นาย", iif(title01=2,"นาง", iif(title01=3,"นางสาว","")))
** อย่าลืมเครื่องหมายเท่ากับ ที่อยู่ข้างหน้านะครับ
ลองรันรายงานดูใหม่ครับ