VB Help

Closed Thread
Results 1 to 36 of 36

Thread: VB Help

Hybrid View

  1. - 30th May 2011, 23:52 #1
    gadelhas's Avatar
    gadelhas
    gadelhas is offline Contributor
    Join Date
    Aug 2008
    Location
    Portugal
    Posts
    240

    Did you find this post helpful? Yes | No

    Default Re: VB Help

    Quote Originally Posted by cncmachineguy View Post
    Well not saying its is the best way by any means, but this seems to work:
    Code:
    Dim i AsInteger
Dim t AsUShort
Dim datain AsByte
Dim data(20) AsByte
Dim sign AsString

 
t = (data(0) * 256) + data(1)
If t > 32767 Then
t = (Not t) + 1
sign = "-"
Else : sign = " "
EndIf
gxhb.Text = sign & t.ToString
    Thanks for the help guys, for now this will cover my needs

    Yeh, that works, and if it works...GooD
    Thanks and Regards;
    Gadelhas
  2. - 30th May 2011, 23:54 #2
    cncmachineguy's Avatar
    cncmachineguy
    cncmachineguy is offline Senior Member
    Join Date
    Aug 2010
    Location
    Maryland, USA
    Posts
    869

    Did you find this post helpful? Yes | No

    Default Re: VB Help

    Seems like it should be much easier.
    -Bert

    The glass is not half full or half empty, Its twice as big as needed for the job!

    http://foamcasualty.com/ - Warbird R/C scratch building with foam!
« Previous Thread | Next Thread »

Members who have read this thread : 0

You do not have permission to view the list of names.

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Forum Rules