กระทู้เก่าบอร์ด อ.สุภาพ ไชยา
361 4
URL.หัวข้อ /
URL
Report/Code อีกครั้ง
ตามที่คุณ Apuk แนะนำผมลองพิมม์ Code
Private Sub Report_Open(Cancel As Integer)
select case text1.value
case is >3
text2.Value="F"
case is <3
text2.value =Pass"
End select
End Sub
เมื่อผมเปิด Report
มันบอกว่าไม่สามารถกำหนดค่ากับ Control นี้ได้
แล้วทำไมเวลาผมพิมม์มันไม่ขึ้น Syntex ให้เมือนเวลาพิพม์ Code ของ Form
ช่วยหน่อยนะครับ
Private Sub Report_Open(Cancel As Integer)
select case text1.value
case is >3
text2.Value="F"
case is <3
text2.value =Pass"
End select
End Sub
เมื่อผมเปิด Report
มันบอกว่าไม่สามารถกำหนดค่ากับ Control นี้ได้
แล้วทำไมเวลาผมพิมม์มันไม่ขึ้น Syntex ให้เมือนเวลาพิพม์ Code ของ Form
ช่วยหน่อยนะครับ
4 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R05079
แถมอีกหน่อย
Function A(Points)
select case points
case is >3
A="F"
case is <3
A ="P"
End select
Function A(Points)
select case points
case is >3
A="F"
case is <3
A ="P"
End select
3 @R05080
ขอบคุณครับ
4 @R05081
ขอบคุณมากครับใช้ได้แล้ว
Time: 0.1692s
เช่น Function A(points)
Select case points
.....
end select
End function
2. ใน Control source ของ Text2 ให้ใส่ =A(text1)
ลองดุใหม่ครับ