update:
ok, i now have a completely working LCD program it runs in the background, needs some "jazzing" up, its usefull as long as you have the source -
http://members.optusnet.com.au/spamzor/FREE_LCD.zip
it displays CPU and RAM usage
its good for the basics a good starting point usefull if you need to start your own project
remember this was programmed for MY LCD and the source isnt to readable so let me know if you want to know something
Help with programming in VB6
Help with programming in VB6
Last edited by Spamzor on Thu Jun 05, 2003 8:16 am, edited 1 time in total.
ok, ive played around and worked out how it works, its a little confusing but heres what ive done now:
http://members.optusnet.com.au/spamzor/LCD_beta.zip
http://members.optusnet.com.au/spamzor/LCD_beta.zip
ok, im haveing troubles
i can turn my LCD backlight off
but not on
i think its got something to do with the last segment
what SHOULD be there ?
i can turn my LCD backlight off
Code: Select all
MSComm1.Output = Chr$(&HFE) & Chr$(&H46)
Code: Select all
MSComm1.Output = Chr$(&HFE) & Chr$(&H4F) & Chr$(&H0)
Code: Select all
Chr$(&H0)
I'm looking this thread and I'm confused about your Chr$ use... Why dont you use Chr$ like this (this code works OK) :Henry wrote:I think you have a mistake...
you said &H4F which is wrong, it should be &H42MSComm1.Output = Chr$(&HFE) & Chr$(&H4F) & Chr$(&H0)
Public Function Light_On(Optional Minutos As Byte)
With MSComm1
.Output = Chr$(254)
.Output = Chr$(66)
If Minutos < 1 Or Minutos > 255 Then
.Output = Chr$(0)
Else
.Output = Chr$(Minutos)
End If
End With
End Function