22 พฤษภาคม 2556

วิธีการ Set Focus ที่แถวแรกของ Listview (VB.NET)

            If ListView1.Items.Count > 0 Then
                ListView1.Focus()
                ListView1.Items(0).Selected = True
            End If

21 พฤษภาคม 2556

การเลื่อน Listview ขึ้นไปยังตำแหน่งบนสุดโดยอัตโนมัติทุกครั้งที่เพิ่มข้อมูล (VB.NET)

While Not Rs.EOF
Dim lv As ListViewItem = ListView2.Items.Add(Rs.Fields("ID").Value)
     lv.SubItems.Add(Rs.Fields("Name").Value.ToString & "")
    lv.SubItems.Add(Rs.Fields("SName").Value.ToString & "")
    ListView1.EnsureVisible(ListView1.Items.Count - 1) 'เอามาใส่ตรงสุดท้ายก่อนเลื่อน Record
    Rs.MoveNext()
End While

09 พฤษภาคม 2556

การ Export File Excel 2000/2003 ด้วย VB.NET

เขาทำไว้เข้าใจง่ายมากๆ ครับ
http://www.hagrin.com/311/create-excel-2003-workbook-using-vbnet

ส่วนที่ผมหาจนตาลายคือการส่งออกเป็นไฟล์ .xls Format 2003 ครับ เพราะหาวิธีไม่เจอสักทีมาเจอที่นี่
 xlsWorkSheet.SaveAs("c:\test.xls", Excel.XlFileFormat.xlExcel7) 
ตรงนี้เองครับประเภทไฟล์อยู่หลังชือไฟล์

08 พฤษภาคม 2556

วิธีเปลี่ยนดรัม (รีเซ็ตค่าดรัม) Brother MFC-7860DW

วิธีเปลี่ยนดรัม (Reset Drum Counter) Brother MFC-7860DW
1. เปิดฝาเครื่อง เปลี่ยนดรัม หรือจะไม่เปลี่ยนก็แล้วแต่
2. อย่าพึ่งปิดฝาเครื่อง กดปุ่ม Clear ข้างๆปุ่ม Copy
เครื่องจะถามว่า Replace Drum? 1.Yes 2.NO
3. กดปุ่ม 1 เพื่อยืนยัน
4. ปิดฝาครอบเครื่องตามปกติ