ยินดีต้อนรับแขกผู้มาเยือน กรุณา เข้าสู่ระบบ หรือ ลงทะเบียน
ส่งอีเมล์ยืนยันการใช้งาน?
 
Please Login!

แสดงกระทู้

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - kaimuk

หน้า: 1 [2] 3 4 ... 7
21
General Programming / Re: QR Code กับ VB 2008
« เมื่อ: 21 มิถุนายน 2011, 08:24:04 »
แนะนำให้เปลี่ยน โปรเจ็คครับ ข้อมูลเรื่องนี้มีน้อยมากครับ

22
General Programming / Re: ช่วยแนะแนวVBหน่อยครับทำให้..
« เมื่อ: 16 มิถุนายน 2011, 11:58:47 »
น่าจะเป็นเรื่องของ MDI นะครับ ดูที่ http://www.zone-it.com/195428 น่าจะช่วยได้บ้างนะครับ

23
For Each _Form As Form In Me.MdiChildren
            _Form.Close()
Next

เป็น คำสั่ง ปิด Form ทั้งหมดที่อยู่ใน MDI น่าจะช่วย จขกท. ได้บ้างนะครับ

24
General Programming / Re: สอบถามเรื่อง VB.NET ครับ
« เมื่อ: 16 มิถุนายน 2011, 11:38:23 »
ดูจากโจทย์แล้ว ต้องบอกว่า Code อยู่ในระดับที่ง่ายเลยนะครับ มีคำสั่งที่ต้องใช้น้อยมาก
ที่สำคัญก็  คำสั่ง หา String (InStr())
            คำสั่ง ดึง String เป็นช่วง (Mid())
นอกจากที่ก็เป็น คำสั่งพื้นฐาน อื่นๆ อย่าง เช่น IF ที่ต้องรู้อยู่แล้ว  และก็ส่วนของแนวคิด จริงๆ ผมเขียนเองแล้ว แปะ Code ยังง่ายกว่าพิมพ์อธิบายอีกนะครับ
แต่อยากให้ จขกท. ทดลองพยายามทำดูก่อน ติดตรงไหนค่อยถามจะดีกว่าครับ การถามลักษณะนี้ ยากมากๆ ครับที่จะได้รับคำตอบ
(บอกโจทย์แล้วขอ Code)
ผม ไก่ เป็นแนวทางให้แล้ว ไม่น่ายากเกินความสามารถนะครับ

25
ถ้ามาแนวนี้ แนะนำ C ครับหาข้อมูลง่ายครับ (แต่ผมเขียน VB เ้พราผมคิดว่ามันง่ายดี และก็ไม่อยากเปลี่ยนด้วยเพราะผมขี้เกียจ) แถมเป็น C ในไทยไม่มีวันอดตาย (ถ้าเก่งจริง) แต่อย่าหยุดที่ App ครับ พยายามศึกษา Web เพิ่มด้วยครับเพราะอนาคต ทุกสิ่งอย่างจะอยู่บน Web หมดแล้วครับ

26
คิด Code ขึ้นมาเองเลยครับเอาแบบง่ายๆ เลยก็ได้เช่นการ บวก ค่า ของ รหัส  Ascii เข้าไปที่ตัวอักษร ก็ถือว่าเป็นการเข้ารหัสแล้ว แต่หากเป็น System ขนาดใหญ่แบบนี้ก็ดูง่ายไปและถูกถอดรหัสง่ายอีกด้วย แต่ถ้า Project จบ แบบนี้ก็พอครับ แค่ตอนอธิบาย วนๆ ไปไกลๆ อาจารย์ก็ไม่รู้แล้วครับ

27
ไม่มีครับ ถ้า MD5 แปลงกับได้ MD5 ก็ไม่มีความหมายอะไรอีกแล้วครับ

28
 Function GetMD5Code(ByVal _String As String) As String

        Dim _MD5 As New Security.Cryptography.MD5CryptoServiceProvider
        Dim _Bytes() As Byte = System.Text.Encoding.ASCII.GetBytes(_String)
        Dim _Result As String = ""

        _Bytes = _MD5.ComputeHash(_Bytes)

        For Each b As Byte In _Bytes
            _Result += b.ToString("x2")
        Next

        Return _Result

    End Function

29
General Programming / Re: ถามเรื่องโค้ดครับ
« เมื่อ: 28 เมษายน 2011, 11:35:41 »
ถ้าเป็นผม ผมจะเปลี่ยน Location มัน

30
น่าจะมีโปรแกรมที่สามารถแปลง VB6 เป็น 2010 ได้นะครับ แต่ปัญหาคือหลังจากแปลงแล้วจะมี Code ขยะเข้ามาเยอะมาก (เขาว่ากันเพราะผมเองก็ไม่เคยใช้เหมือนกัน) ดังนั้นเลยขอแนะนำให้เขียนใหม่ดีกว่าครับ

31
' Form2.Show()   <------- ให้เอา ' ออกครับ
  Me.Close()       <------- เปลี่ยนเป็น Me.Hide

32
ที่ปุ่มใน From 1

        For i = 1 To 100
            ProgressBar1.Value = i
            Threading.Thread.Sleep(20)
        Next
        If ProgressBar1.Value = 100 Then
            ProgressBar1.Value = 0
            If MsgBox("เมิงจะไป Form2 ไหมสาด ???", MsgBoxStyle.YesNo, "???") = MsgBoxResult.Yes Then
                ' Form2.Show()
                Me.Close()
            End If
       End If

ที่ปุ่มใน From 2

      End

33
General Programming / Re: เขียนไฟล์ vb
« เมื่อ: 20 เมษายน 2011, 16:45:35 »
 Dim _Info As FileInfo                            '<----- ประกาศตัวแปรเป็นชนิด FileInfo
 Dim _Writer As StreamWriter                 '<----- ประกาศตัวแปรเป็นชนิด StreamWriter
 _Info = New FileInfo("C:\TEST.txt")        '<----- กำหนดค่า _Info โดยชี้ตำแหน่งไปที่ C\TEST.text
 _Writer = _Info.AppendText                  '<----- กำหนดลักษณะการเขียน (เป็นแบบที่ จขกท. ต้องการ)
 _Writer.WriteLine("ถูกเขียนเวลา " & Now)    '<----- เขียนข้อความไปยัง C:\TEST.txt
 _Writer.Close()                                   '<----- ปิดการทำงานของ _Writer

34
กำหนดที่ Properties PrasswordChar ของ Textbox ครับ

35
General Programming / Re: ขอเขียนโค้ดนะนะนะนะนะ
« เมื่อ: 20 เมษายน 2011, 09:22:05 »
Module Module1

    Sub Main()
        For i = 1 To 5
            Console.Write(Space(5 - i))
            For j = 1 To i
                Console.Write(j)
            Next
            For j = 2 To i
                Console.Write(i + 1 - j)
            Next
            Console.WriteLine()
        Next

มันไม่ได้อย่างที่ จขกท. ต้องการเปะๆ นะครับ แต่ก็ใกล้เคียงเนืองจาก Logic มันขัดแย่งกันเอง คือบรรทัดที่ 2 ของ จขกท. มันไม่เข้าพวกอ่ะครับ
        Console.Read()
    End Sub

End Module

36
ทำลักษณะเดียวกันเลยครับกับการ DELETE เลยครับ แต่เปลี่ยนจาก SQL String  Delete เป็น Update ลองศึกษาภาษา SQL ดูครับมีเยอะเลยทีเดียว

37
General Programming / Re: เซียน SQL Server
« เมื่อ: 05 เมษายน 2011, 13:16:49 »
VB2010 SQL Server 2008 ไปเลยดีกว่าครับมีอันใหม่เราก็ใช้อันใหม่ดีกว่า แต่ถ้าำจำเป็นต้องใช้ตามที่ จขกท. ต้องการก็ไม่มีีปัญหาอะไรครับ

38
มาลองดูอีกวิธีนึงนะครับ ถือว่าเป็นทางเลือกนะครับ

1 เลือก Textbox ที่ต้องการ Save ค่า
2 เลือก Properties
3 เลือก ApplicationSetting > Text > New...
4 กำหนดชื่อ ที่ Name

ทดสอบ Run Programs  และ ใส่ค่าที่ Textbox
ปิดโปรแกรมแล้วทดลอง Run ใหม่อีกครั้ง

39
ใช้ Tool คนละชุดเลยครับ ถ้าใช้ Tool ที่ถูกต้องนะครับ SQL จะมี Tool เฉพาะของเขาครับ ซึ่งจะทำงานได้เร็วกว่า แต่ก็สามารถใช้ Oledb ได้เหมือนกัน

40
กำหนดจำนวนตัวอักษรดูที่ Properties MaxLength ครับ
เช็คว่าเป็นตัวเลขหรือไม่ใช้ Funtion IsNumeric()

หน้า: 1 [2] 3 4 ... 7