thaiall logomy background

กระดานแสดงความคิดเห็น

my town
ตัวอย่าง VB สำหรับ MSHFlexgrid
Private Sub customername_Change
Set rs = cndb.Execute("select * from customer where cusname like '" & cusname.Text & "%'")
Set Grid1.DataSource = rs
Call hgrid
End Sub
Private Sub Form_Load Set rscus = cndb.Execute("select * from customer where status=0 order by cuscode")
Set Grid1.DataSource = rscus
Call hgrid
End Sub
Sub hgrid With Grid1
.TextMatrix(0, 1) = "id"
.TextMatrix(0, 2) = "name"
.ColWidth(0) = 200
.ColWidth(1) = 900
.ColAlignmentFixed(1) = 3
.ColAlignmentFixed(2) = 3
End With
End Sub
Private Sub Grid1_DblClick If ccc = 1 Then
frmsale.cusname.Text = Grid1.TextMatrix(Grid1.Row, 3)
ccc = 0
Unload Me
frmsale.tname.SetFocus
End If
End Sub



จากคุณ : บุรินทร์ .
03:28am (6/07/07)
ทความเกี่ยวกับไอทีในชีวิตประจำวัน (Information Technology in Life) ถูกเขียนลงในหนังสือพิมพ์ฅนเมืองเหนือ เป็นหนังสือพิมพ์รายสัปดาห์ เริ่มเขียนปลายปีพ.ศ. 2549 จนถึงมิถุนายน พ.ศ.2560 รวมได้ 611 บทความมีโฮมเพจอยู่ที่ http://www.thaiall.com/itinlife และ http://www.thaiall.com/opinion เพื่อเป็นแหล่งแบ่งปันเรื่องราวที่ได้พบ ได้อ่าน ได้ปฏิบัติ แล้วนำมาเรียบเรียงแบ่งปันแก่เพื่อนชาวไทย และส่งให้กองบรรณาธิการนำไปตีพิมพ์ลงในหนังสือพิมพ์ท้องถิ่นของจังหวัดลำปาง
Opinion แปลว่า ความคิดเห็น วาทะ ความเชื่อ ที่สามารถสะท้อนออกมาให้อยู่ในรูปของวรรณกรรม หรืองานเขียน ที่เรื่องราวจะถูกร้อยเรียงเป็นตัวอักษร ไล่เรียงตามลำดับให้ได้รู้และเข้าใจความคิดความเห็น ที่ไม่เลือนหายไปตามเวลาเหมือนความทรงจำ
version 1.3 (15 ตุลาคม 2566)
Thaiall.com
Thaiall.com