หน้าแรก
คอมมูนิตี้
ห้อง
แท็ก
คลับ
ห้อง
แก้ไขปักหมุด
ดูทั้งหมด
เกิดข้อผิดพลาดบางอย่าง
ลองใหม่
แท็ก
แก้ไขปักหมุด
ดูเพิ่มเติม
เกิดข้อผิดพลาดบางอย่าง
ลองใหม่
{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
ส้มตำไก่ย่างข้าวเหนียว
ทำไหมมันผิดครับพอดีพึงหัดใช่ หาวิธีไม่เจอจริงๆ ใช่ 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
สมาชิกหมายเลข 4211828
รบกวนเซียน excel หน่อยครับ
ผมอยากจะให้มีการจัด cell ดังรูป (before) ให้เป็นตามรูปแบบ (after) เป็นแบบอัตโนมัติ เขีัยนเป็นสูตร เงื่อนไข 1) เมื่อค่าเป็น +1 ให้เลื่อนขึ้นไป cell หนึ่ง 2) เมื่
MeasureMind
ช่วยอธิบาย โค้ดเเมโคร พวกนี้หน่อยว่า มันหน้าที่อะไร
พอดีกำลังศึกษา เเต่ไม่รู้โค้ดในเเต่บะข้อมันทำหน้าที่อะไรบ้าง รบกวนผู้รู้ช่วยหน่อย T T __________________________________________ (1) Sub main() Dim i As Integer
สมาชิกหมายเลข 6171673
รบกวนช่วยดู Code VB ให้หน่อยคะ
พอดีว่าจะทำระบบ E-Lerning แบบง่ายๆ ที่ใช้ภายในบริษัทฯ โดยทำ VB ใน Powerpoint จขกท.เขียนโค้ดตามสื่อการสอนใน Internet https://www.blwsc.ac.th/imath/TeachPowerPoin
error_wa
ขายสินค้าเกิน Stock แล้วติดลบ ต้องการตรวจเชค ดู Code ให้ทีครับ
อันนี้เป็น Code ที่ผมใช้ตรวจเชค เมื่อคลิกปุ่มขาย ก่อนตัดสต๊อก Private Sub chkQty() Dim comSave As New SqlCommand Dim comUpdate As New SqlCommand Dim NumRows, i
สมาชิกหมายเลข 1291441
กดปุ่ม Save แล้วขึ้น Error "@title" ค่ะ
ขึ้น Error : Must declare the scalar variable "@title". โค้ด Private Sub ButtonSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
สมาชิกหมายเลข 1076638
เชื่อมต่อ VB 6.0 กับ MySQL ยังไง
รบกวนดู Code ให้หน่อยค่ะว่าผิดยังไง Run แล้วขึ้น Error ว่า Access Denied for user 'odbc'@'user' (using password : NO) Private Sub Command1_Click() Dim conDB As
Thai_wa
ทำไงให้ขึ้นชื่อเพื่อนทุกคนครับ
Public Class Form1 Dim Stu_Score(6) As Integer Dim Begin, Last As Integer Dim IP$ Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Hand
สมาชิกหมายเลข 4790152
ช่วยดูโค๊ด 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 _
สมาชิกหมายเลข 2875719
บนสุด
ล่างสุด
อ่านเฉพาะข้อความเจ้าของกระทู้
หน้า:
หน้า
จาก
แชร์ :
โปรดศึกษาและยอมรับนโยบายข้อมูลส่วนบุคคลก่อนเริ่มใช้งาน
อ่านเพิ่มเติมได้ที่นี่
ยอมรับ
อธิบายโค๊ดอันนี้ให้หน่อยนะ.....ด่วนสุดๆ
Dim x As Integer
x = 11
Do
Print x
x = x + 1
Loop Until x >= 10
End Sub