anybody to explain the meaning of the =?
$10-30 USD
Paid on delivery
Public Function Set_Price(nValue As Integer, bytbBuffer() As Byte)
If nValue = 30 Then
bytbBuffer(nIdx) = 0
bytbBuffer(nIdx + 1) = 94
bytbBuffer(nIdx + 2) = 208
bytbBuffer(nIdx + 3) = 178
Exit Function
End If
If nValue = 29 Then
bytbBuffer(nIdx) = 192
bytbBuffer(nIdx + 1) = 18
bytbBuffer(nIdx + 2) = 132
bytbBuffer(nIdx + 3) = 178
Exit Function
End If
If nValue = 299 Then
bytbBuffer(nIdx) = 128
bytbBuffer(nIdx + 1) = 199
bytbBuffer(nIdx + 2) = 55
bytbBuffer(nIdx + 3) = 178
Exit Function
End If
If nValue = 3005 Then
bytbBuffer(nIdx) = 64
bytbBuffer(nIdx + 1) = 169
bytbBuffer(nIdx + 2) = 28
bytbBuffer(nIdx + 3) = 179
Exit Function
End If
If nValue = 301 Then
bytbBuffer(nIdx) = 128
bytbBuffer(nIdx + 1) = 244
bytbBuffer(nIdx + 2) = 104
bytbBuffer(nIdx + 3) = 179
Exit Function
End If
If nValue = 3025 Then
bytbBuffer(nIdx) = 64
bytbBuffer(nIdx + 1) = 214
bytbBuffer(nIdx + 2) = 77
bytbBuffer(nIdx + 3) = 180
Exit Function
End If
If nValue = 4000 Then
bytbBuffer(nIdx) = 0
bytbBuffer(nIdx + 1) = 160
bytbBuffer(nIdx + 2) = 219
bytbBuffer(nIdx + 3) = 33
bytbBuffer(nIdx + 4) = 93
Exit Function
End If
If nValue = 5000 Then
bytbBuffer(nIdx) = 0
bytbBuffer(nIdx + 1) = 136
bytbBuffer(nIdx + 2) = 82
bytbBuffer(nIdx + 3) = 106
bytbBuffer(nIdx + 4) = 116
Exit Function
End If
vb6 code
Project ID: #6874667