
convercion
Publicado por juanjose (1 intervención) el 10/05/2008 03:52:02
**********************************************************
*******Estas declaraciones las tengo en VB6.0**************
***********************************************************
Propiedades:Esto esta en (general),(declaraciones)
***********************************************************
Option Explicit
Public Out_TTL As Byte
Public In_Port As Integer
Public Out_Port As Integer
************************************************
Private Sub Form_Load()
'Configura la COMBOLIST cmbLptSelect
cmbLptSelect.AddItem "0x378"
cmbLptSelect.AddItem "0x278"
cmbLptSelect.AddItem "0x3BC"
'Establece LPT1 como default
cmbLptSelect.ListIndex = 0
SetLPTAddress
Port_Reset
End Sub
*************************************************
ALguien me podria decir como quedaria esta declaracion en VB.net
*******Estas declaraciones las tengo en VB6.0**************
***********************************************************
Propiedades:Esto esta en (general),(declaraciones)
***********************************************************
Option Explicit
Public Out_TTL As Byte
Public In_Port As Integer
Public Out_Port As Integer
************************************************
Private Sub Form_Load()
'Configura la COMBOLIST cmbLptSelect
cmbLptSelect.AddItem "0x378"
cmbLptSelect.AddItem "0x278"
cmbLptSelect.AddItem "0x3BC"
'Establece LPT1 como default
cmbLptSelect.ListIndex = 0
SetLPTAddress
Port_Reset
End Sub
*************************************************
ALguien me podria decir como quedaria esta declaracion en VB.net
Valora esta pregunta


0