Entrevista con la fuente de Strlen
Pregunta 4, errores potenciales Los errores aquí no son errores normales, sino el tipo de errores que sólo se conocen durante la operación:
Capturar ex como una excepción
MsgBox (por ejemplo, seguimiento de pila)
Nunca busca errores a continuación.
Capturar ex como ArgumentNullException
MsgBox("El cuadro de prueba de entrada no puede estar vacío.")
Capturar ex como excepción de desbordamiento
MsgBox("¡El cuadro de prueba de entrada 2 no puede ser cero!")
Capture ex como FormatException
MsgBox("¡El cuadro de prueba de entrada debe estar en formato numérico!")
El manejo estructurado de errores nunca llega aquí porque Catch ex As Exception ya maneja todos los errores.
Pregunta 5:
00123
1000 60,50
2000 60,00
3500 59,50
- -
6500 60,00
00124
3000 60,50
- -
3000 60,50 p>
00125
2000 59,50
1000 58,00
- -
3000 58,75
Sí Para la clasificación por Ref_ID, un método es agrupar por Ref_ID, que consiste en utilizar el lenguaje SQL, pero aquí se requiere mucho.
No lo necesito, por lo que es un poco más complicado usar el método FIND, pero debes prestar atención a que el REF_ID debe estar ordenado, porque en la base de datos,
Ya está arreglado, así que no necesito arreglarlo.
Atenuar primero como ADODB. Recordset
atenuar refID como cadena
Rst = GetRecordset
No se apresure, actúe con prontitud. Fin del archivo
refid=rst(0)
Console.writeline(rst.Field(" Ref_ID ")
Hacer
Consola .writeline primer campo("cantidad") ampvbcrlf amrst.field("precio"))
primero. MoveNext()
Bucle cuando rst(0)=refid
Bucle
Pregunta 6: Es un problema de tomar elementos de una colección y generarlos.
Una forma más sencilla es utilizar la recursividad.
Lo siguiente es cómo usar VB (se puede trasplantar a VB.NET, porque no sé mucho sobre las matrices de VB.NET hasta ahora, así que me conformé con eso).
Atenuar bUse() como booleano
Atenuar lStr() como cadena * 1
Atenuar nCount como bytes
-
Subcombinación pública (lstStr como cadena)
Representar I como bytes
Atenuar j como bytes
Representar cadena Anotar como bytes
StrLen = Len(lstStr)
Redefinir bUse(1 a StrLen) como un valor booleano
ReDim lStr(1 a StrLen) para String * 1
Para i = 1 a StrLen
lStr(i) = Mid(lstStr,I,1)
Entonces
Para i = 1 a StrLen
nCount = i
GoWith StrLen,1,0,""
Luego
finalizar conector
-
Public Sub GoWith(ECount es bytes, nStart es bytes, Deep es bytes, lastStr es cadena)
Representa I es bytes
Si Deep = nCount, entonces
Depurar. Imprimir lastStr
Salir del conector
Finalizar si...
For i = nStart To ECount
Si no, entonces
bUse(i) = True
GoWith ECount, I, Deep 1, lastStr amplStr(i)
bUse(i) = False
Terminará si...
Entonces
Conector final
-
Subform_Load privado()
Combinado "wxyz"
Conector final
-
Donde GOWITH es una función recursiva real que utiliza combinación para preprocesar caracteres.
Variables globales:
BUSE: se utiliza para determinar si el elemento ha sido utilizado.
LSTR: se utiliza para guardar elementos de carácter.
NCOUNT: se utiliza para limitar la profundidad de la función recursiva, es decir, el número de elementos en el grupo de elementos de salida.
La prueba real fue exitosa. Estoy muy interesado en las tres primeras preguntas y espero que me las pasen.