سلام دوستان چ جوری میتونم در بسکام ی عدد چند رقمی (5 یا 8) رقمی از ورودی بگیرم؟؟یک رقم اوکی هستش
کدهاش چجورین؟؟؟
کدهاش چجورین؟؟؟
W = W + String(1 , K1)
K2 = Val(w)
W = W + String(1 , K1)
K2 = Val(w)
Pass_07: K1 = Getkbd() If K1 > 15 Then Goto Pass_07 K1 = Lookup(k1 , Code) Select Case K1 Case 48 To 57: If N < 8 Then Incr N Lcd String(1 , K1) W = W + String(1 , K1) End If Goto Pass_07 Case 11 : K2 = Val(w) End Select Return
دیدگاه