
Como introduzco a la matriz dos valores en una Posicion
Publicado por FreeMind (1 intervención) el 07/12/2014 18:55:09
Saludos! El problema es el siguiente: necesito insertar (a través del teclado) dos valores a una matriz. Los valores son: Nombre del Empleado y Horas trabajadas, por ejemplo: Karen - 8 (sin el guión). Las cuestión es que no se como es la sintaxis para insertar los dos valores a la matriz en una posición. Se como hacerlo con un valor mas no se como con dos. Mi otra duda reside en que no se si es posible agregar esos dos valores a una misma posición de la matriz, es decir, que yo pueda agregar : karen - 8 en la posición (1,1) de la matriz. O si debo agregar Karen en una posición y 8 en otra. Acá les dejare un fragmento del código: es el código del botón que agrega los datos a la matriz:
// Acá como declare la matriz
// Dim vecEmpHor(2, 2) As String
// Dim Nombre As String = ""
// Dim hora As Integer = 0
Private Sub cmbEmp_Click(sender As Object, e As EventArgs) Handles cmbEmp.Click
Dim m As Integer = 0 'indice fila
Dim n As Integer = 0 'indice columna
Nombre = txtEmp.Text
hora = txtHor.Text
txtEmp.Clear()
txtHor.Clear()
If (vecEmpHor(m, n) = Nothing) Then
vecEmpHor(m, n) = Nombre ' + hora // es aquí que no se como escribirlo ;(
Else
n += 1
m += 1
vecEmpHor(m, n) = Nombre ' + hora // es aquí que no se como escribirlo ;(
End If
MsgBox("Empleado Registrado!")
cmbEmp.Enabled = False
n += 1
m += 1
If (vecEmpHor(1, 1) <> Nothing) Then
MsgBox("Vector Lleno!", MsgBoxStyle.Information)
txtEmp.Clear()
txtEmp.Enabled = False
cmbEmp.Enabled = False
cmbMat.Focus()
End If
End Sub
// Por cierto estoy usando Visual Studio 2012
// Agradecido de antemano por cualquier ayuda que puedan darme.
// Acá como declare la matriz
// Dim vecEmpHor(2, 2) As String
// Dim Nombre As String = ""
// Dim hora As Integer = 0
Private Sub cmbEmp_Click(sender As Object, e As EventArgs) Handles cmbEmp.Click
Dim m As Integer = 0 'indice fila
Dim n As Integer = 0 'indice columna
Nombre = txtEmp.Text
hora = txtHor.Text
txtEmp.Clear()
txtHor.Clear()
If (vecEmpHor(m, n) = Nothing) Then
vecEmpHor(m, n) = Nombre ' + hora // es aquí que no se como escribirlo ;(
Else
n += 1
m += 1
vecEmpHor(m, n) = Nombre ' + hora // es aquí que no se como escribirlo ;(
End If
MsgBox("Empleado Registrado!")
cmbEmp.Enabled = False
n += 1
m += 1
If (vecEmpHor(1, 1) <> Nothing) Then
MsgBox("Vector Lleno!", MsgBoxStyle.Information)
txtEmp.Clear()
txtEmp.Enabled = False
cmbEmp.Enabled = False
cmbMat.Focus()
End If
End Sub
// Por cierto estoy usando Visual Studio 2012
// Agradecido de antemano por cualquier ayuda que puedan darme.
Valora esta pregunta


0