หน้าแรก
คอมมูนิตี้
ห้อง
แท็ก
คลับ
ห้อง
แก้ไขปักหมุด
ดูทั้งหมด
เกิดข้อผิดพลาดบางอย่าง
ลองใหม่
แท็ก
แก้ไขปักหมุด
ดูเพิ่มเติม
เกิดข้อผิดพลาดบางอย่าง
ลองใหม่
{room_name}
{name}
{description}
กิจกรรม
แลกพอยต์
อื่นๆ
ตั้งกระทู้
เข้าสู่ระบบ / สมัครสมาชิก
เว็บไซต์ในเครือ
Bloggang
Pantown
PantipMarket
Maggang
ติดตามพันทิป
ดาวน์โหลดได้แล้ววันนี้
เกี่ยวกับเรา
กฎ กติกา และมารยาท
คำแนะนำการโพสต์แสดงความเห็น
นโยบายเกี่ยวกับข้อมูลส่วนบุคคล
สิทธิ์การใช้งานของสมาชิก
ติดต่อทีมงาน Pantip
ติดต่อลงโฆษณา
ร่วมงานกับ Pantip
Download App Pantip
Pantip Certified Developer
อธิบายโค๊ดอันนี้ให้หน่อยนะ.....ด่วนสุดๆ
กระทู้คำถาม
Private Sub Command1_Click()
Dim x As Integer
x = 11
Do
Print x
x = x + 1
Loop Until x >= 10
End Sub
▼
กำลังโหลดข้อมูล...
▼
แสดงความคิดเห็น
กระทู้ที่คุณอาจสนใจ
excel,VBA กำหนดช่วง วน loop ให้ตัวแปร ?
ช่องใน excel A1 = 120 A2=200 A3=5 ---------------------------------------------- อันนี้พยายามลองเขียนดูค่ะ ไม่เป็นเลยค่ะ Public Sub Quantity() Dim x As Byte Dim y As Integer Do y = x * Range("A1
ส้มตำไก่ย่างข้าวเหนียว
ทำไหมมันผิดครับพอดีพึงหัดใช่ หาวิธีไม่เจอจริงๆ ใช่ Microsoft Visual Basic 6.0
Dim a, b, c, d, e, f, g, h, i As Integer Dim m As Integer Dim n As Integer Dim x As Integer Sub checkWnner() If a + b + c = 3 Then x = 10 If d + e + f = 3 Then x = 10 If g + h + i = 3 Then x =
สมาชิกหมายเลข 4211828
รบกวนเซียน excel หน่อยครับ
ผมอยากจะให้มีการจัด cell ดังรูป (before) ให้เป็นตามรูปแบบ (after) เป็นแบบอัตโนมัติ เขีัยนเป็นสูตร เงื่อนไข 1) เมื่อค่าเป็น +1 ให้เลื่อนขึ้นไป cell หนึ่ง 2) เมื่อค่าเป็น -1 ให้เลื่อนลงไป cell หนึ่ง พ
MeasureMind
ช่วยอธิบาย โค้ดเเมโคร พวกนี้หน่อยว่า มันหน้าที่อะไร
พอดีกำลังศึกษา เเต่ไม่รู้โค้ดในเเต่บะข้อมันทำหน้าที่อะไรบ้าง รบกวนผู้รู้ช่วยหน่อย T T __________________________________________ (1) Sub main() &nb
สมาชิกหมายเลข 6171673
อยากให้ช่วยแนะนำหน่อยครับ VB6 กับ Access เพิ่มข้อมูล
ตามโค้ดครับ เกิด เออเร่อ Current Recordset does not support updating. This may be limitation of the provider, or of the selected locked type. ช่วยชี้แนะทีครับ Option Explicit Dim Conn As ADODB.Co
สมาชิกหมายเลข 772709
เชื่อมต่อ VB 6.0 กับ MySQL ยังไง
รบกวนดู Code ให้หน่อยค่ะว่าผิดยังไง Run แล้วขึ้น Error ว่า Access Denied for user 'odbc'@'user' (using password : NO) Private Sub Command1_Click() Dim conDB As New ADODB.Connection Dim HostIP, Us
Thai_wa
ช่วยดูโค๊ด Vb6 ascii หน่อยครับ
Private Sub HighLightKey(ByVal parLetter As String, ByVal par_color As Long) Dim i As Integer If (Asc(parLetter) >= 65 And Asc(parLetter) <= 65 + 25) Or _ ตรงตัวหน่าอะครับ คือ 65 คืออักษร A-Z
สมาชิกหมายเลข 2875719
สอบถามพี่ๆ ที่เขียนโค้ดบน VB รบกวนช่วยด้วยคะ
รบกวนช่วยดูโค้ด บนVB ให้หน่อยคะ พยายามแก้แล้ว จะเขียนฟังก์ชั่นสำหรับ import excel เป็น text โดยให้มีเครื่องหมาย ," ตาม Default เดิมของ text แต่ ด้านขวาสุดของไฟล์ มันมีเครื่องหมาย ,","
Pattchy
Vb6.0 Picture ช่วยหน่อยครับ
ช่วยดู โค๊ดให้หน่อยครับ คือผมใช้ picture box ซึ่งผมได้เตรียมภาพมือไว้แล้ว เช่น ภาพ hand65 คือA ใหญ่ Hand66 คือ B ใหญ่ พอกดก็เปลี่ยนภาพใน picture box ต้องทำยังไงกับโค๊ดหรอครับ เหมือนในภาพนี้อะครับ htt
สมาชิกหมายเลข 2875719
บนสุด
ล่างสุด
อ่านเฉพาะข้อความเจ้าของกระทู้
หน้า:
หน้า
จาก
แชร์ :
โปรดศึกษาและยอมรับนโยบายข้อมูลส่วนบุคคลก่อนเริ่มใช้งาน
อ่านเพิ่มเติมได้ที่นี่
ยอมรับ
อธิบายโค๊ดอันนี้ให้หน่อยนะ.....ด่วนสุดๆ
Dim x As Integer
x = 11
Do
Print x
x = x + 1
Loop Until x >= 10
End Sub