Vamos começar a por a mão na massa, desenhe um formulário dessa forma:

Itens do Formulário

• 2 TextBox
• 1 CommandButton
• 1 Label
• 1 Frame

Antes de começar a programar devemos criar um arquivo em TXT, com todos os caracteres possiveis para o gerenciador se basear, eu criei um arquivo e adicionei as seguintes informações:

ABCDEFGHIJKLMNOPQRSTUVXYWZabcdefghijklmnopqrstuvxyz1234567890!@#$%¨&*()_+{}/?[]\

Então o meu programa pode gerar uma senha com qualquer um desses caracteres, se você quiser inserir ou removes mais caracteres você pode.

Salve o arquivo como SENHAS.TXT

Agora sim vamos programar, abra o FORM CODE e crie as seguintes variáveis e o procedimendo abaixo:

Dim numero As Integer
Dim cases As String
Dim tamanho As Integer
Dim caminho As String

Public Sub le_txt()
On Error GoTo semarquivo

fnum = FreeFile
Open App.Path & "\senhas.txt" For Input As #fnum
Do While Not EOF(fnum)
Line Input #fnum, linha
caminho = linha
Loop
Close #fnum

semarquivo:
If Err.Number = 53 Then
MsgBox "A pasta de lição não foi encontrada no diretório Raiz", vbCritical, "Gerador"
cases = "A pasta de lição não foi encontrada no diretório Raiz"
End If
End Sub

O procedimento acima faz a procura do arquivo SENHAS.EXE e adiciona o seu conteúdo na variável caminho, agora crie mais dois procediementos.

Public Sub criar()
On Error GoTo semnumero
txtsenha.Text = ""
For i = 1 To txtqnt.Text
Me.alfabeto
Next

semnumero:
If Err.Number = 13 Then
txtqnt = 6
End If
End Sub

Este é o procedimento que vai gerar as senhas.

Public Sub alfabeto()
On Error GoTo num
tamanho = Len(caminho)
numero = Int(Rnd * tamanho)
txtsenha.Text = txtsenha.Text & Mid(caminho, numero, 1)
num:
If Err.Number = 5 Then
numero = Int(Rnd * tamanho)
End If
End Sub

O procedimento acima escolhe aleatoriamente, caracter por caracter que irá conter a senha.

Estamos quase no fim, então vamos lá ainda no FORM CODE vá no Form_load e chame o procedimento LE_TXT, e também chame uma função importantissima para o nosso programa, RANDOMIZE este procedimento faz com que o nosso software gere uma sequência aleatória toda vez que abrirmos ele, não entendeu né??? o problema é o seguinte o visual basic gera uma sequência aleatória para ser usada com o comando RND só que toda vez que iniciamos o programa esta seguencia não muda, e com isso os numeros aleatórios ficam previsiveis, pois sempre será a mesma sequencia aleatória, com o comando RANDOMIZE este problema é resolvido e toda vez que abrimos o programa é gerado uma nova sequencia aleatória.

Private Sub Form_Load()
Randomize
le_txt
End Sub

pronto agora é só chamar o procedimento CRIAR, então dê um click duplo sobre o botão Criar, e digite

Private Sub cmdcriar_Click()
Me.criar
End Sub

Bom pessoal é isso aí, dividas????

02. Pressione Ctrl+O novamente e abra a foto de uma pessoa, pressione Ctrl+A para selecionar seu conteúdo, Ctrl+C para copiar, volte ao documento da outra foto que foi aberta e pressione Ctrl+V para colar a imagem, agora retire o fundo da imagem da pessoa, neste tutorial foi usada a Pen Tool (letra P do teclado), mas você pode usar a ferramenta que achar mais fácil para a tarefa como a Lasso Tool, Quick Mask Tool etc, caso tenha feito com a Pen Tool, depois de criar o Path ao redor da imagem vá em Window> Paths e clique no ícone de Load Path As Selection no rodapé da paleta de Paths, depois vá em Layer> Layer Mask> Reveal Selection.

03. Agora vá em Edit> Transform> Scale para ajudar o tamanho da pessoa com o tamanho da imagem de Background, depois de redimensionado pressione Enter, no caso deste tutorial a figura foi rotacionada na horizontal por causa da direção da luz do sol indo em Edit> Transform> Flip Horizontal.

04. Agora vá em Image> Adjustments> Curves, deixe a imagem um pouco mais escura para que tanto a imagem de Background quanto a imagem da pessoa tenham a mesma tonalidade.

05. Com a tecla Ctrl pressionada clique sobre a miniatura da imagem na layer que está na paleta de layers para ativar a seleção ao redor da imagem da pessoa, pressione Ctrl+Shift+Alt+N para criar uma nova layer, pressione a letra D do teclado para resetar as cores de Foreground e Background para preto e branco, pressione Alt+Backspace (a tecla acima do Enter) ou pressione a letra G do teclado para selecionar a Paint Bucket Tool e clique dentro da seleção para preencher com preto, vá em Edit> Transform> Distort e deite a imagem em preto afim de criar a sombra da pessoa, depois de editado pressione Enter, vá em Filter> Blur> Gaussian Blur e defina os valores abaixo, caso queira faça alguns ajustes na opacidade da layer para melhorar o efeito.

06. Pressione a letra U do teclado para selecionar a Ellipse Tool, certifique-se que na barra de opções da ferramenta no alto da tela a opção Paths está marcada, com a tecla Shift pressionada crie um círculo como na imagem abaixo, depois de criado pressione a letra A do teclado para selecionar a Direct Selection Tool, e modifique a parte de baixo do círculo como na foto seguinte.

07. Pressione Ctrl+Shift+Alt+N para criar uma nova layer, dê o nome de Clouds, vá em Filter> Render> Clouds, clique com o botão direito do mouse dentro do círculo criado e escolha a opção Make Selection, pressione Ok, isto irá criar uma seleção, clique no ícone de Add Layer Mask no rodapé da paleta de layers para criar uma máscara em sua layer, sua imagem deverá ficar como a da foto abaixo.

08. Agora vá em Filter> Liquify, pressione a letra B do teclado para selecionar a Bloat Tool, defina o valor de 550 pixels para Brush Size, 100 pixels para Brush Density, 100 pixels para Brush Pressure, 60 pixels para Brush Rate e 75 para Turbulent Jitter, clique na opção Show Backdrop para ver a imagem que está por baixo do efeito de Clouds, use a ferramenta no lugar certo como é mostrado na foto abaixo e clique algumas vezes e pressione Ok.

09. Mude o modo de blend da layer para Soft Light, pressione Ctrl+Shift+Alt+N para criar outra layer e dê o nome de Clouds 2, repita os passos 7 e 8 e ao final mude o modo de blend da layer para Multiply, novamente pressione Ctrl+Shift+Alt+N para criar outra layer, dê o nome de Clouds 3, repita novamente os passos 7 e 8, ao final mude o modo de blend da layer para Color Dodge, pressione a letra E do teclado para selecionar a Eraser Tool e passe em algumas partes para apagar detalhes indesejados.

10. Vá em Layer> Group Layers para criar uma pasta e agrupar a layer Clouds 3, depois vá em Layer> Layer Mask> Reveal All, pressione a letra B do teclado para selecionar a Brush Tool, escolha um brush de tamanho médio e pontas suaves, pressione a letra D do teclado para resetar as cores de Foreground e Background para preto e branco, passe o brush nas áreas marcadas com a letra X.

11. Clique na layer Clouds e vá em Filter> Sharpen> Sharpen More, repita o processo nas layers Clouds 2 e Clouds 3.

12. Pressione Ctrl+Shift+Alt+N para criar uma nova layer, dê o nome de Glow, pressione a letra X do teclado para inverter as cores de Foreground e Background, sua cor de Foreground de ve ser branca, pressione Alt+Backspace (a tecla acima do Enter) ou pressione a letra G do teclado para selecionar a Paint Bucket Tool e clique no documento para pintar a layer de branco, vá em Window> Paths, na paleta de Paths clique com a tecla Ctrl pressionada sobre a miniatura do Path que foi criado anteriormente para ativar a seleção ao redor do círculo, vá em Window> Layers para abrir a paleta de layers novamente, clique na layer Glow e logo após clique no ícone de Add Layer Mask no rodapé da paleta de layers para adicionar uma máscara na layer, vá em Layer> Layer Style> Outer Glow e defina os valores abaixo, logo após vá em Layer> Layer Style> Create Layer, isto irá criar uma layer a parte com as informações do Outer Glow que aplicamos, clique na layer que pintamos de branco e depois no ícone de Delete Layer no rodapé da paleta de layers para deletar a layer.

13. Vá em Layer> Group Layers, dentro da pasta criada deixe a layer com o Outer Glow que criamos, clique na layer de Outer Glow e vá em Layer> Layer Mask> Reveal All, pressione a letra B do teclado para selecionar a Brush Tool, pressione a letra D do teclado para resetar as cores de Foreground e Background para preto e branco, passe a Brush Tool nos pontos marcados na imagem.

14. Pressione Ctrl+Shift+Alt+N para criar uma nova layer, deixe esta layer abaixo do grupo de Clouds que havíamos criado antes, pressione a letra M do teclado para selecionar a Elliptical Marquee Tool, crie um elipse como a da foto abaixo, pressione Alt+Backspace (a tecla acima do Enter) ou pressione a letra G do teclado para selecionar a Paint Bucket Tool e clique dentro da seleção para pintar de preto, defina o valor de 40% para a opacidade.

15. Agora vá em Layer> Layer Mask> Reveal All, pressione a letra G do teclado para selecionar a Gradient Tool, defina um gradiente que vá do branco para o preto, clique no canto esquerdo e arraste até o direito afim de deixar sua imagem como a imagem abaixo.

16. Pressione Ctrl+J para duplicar a layer, vá em Layer> Layer Mask> Apply e depois em Edit> Transfom> Distort e aplique o mesmo método aplicado na sombra da pessoa usada na foto anteriormente.

17. Pressione Ctrl+Shift+Alt+N para criar mais uma layer, deixe esta layer acima da layer da foto da estrada, vá em Filter> Render> Clouds e depois em Filter> Distort> Zigzag, defina o valor de 100 pixels para Amount e 5 pixels para Ridges em Style escolha a opção Pond Ripples e pressione Ok.

18. Agora vá em Edit> Transform> Distort, tente deixa a layer rente a estrada da layer com a paisagem afim de dar a impressão de que o efeito está no chão, quando achar a posição correta pressione Enter, mude o modo de blend da layer para Overlay, caso seja ncessário pressione a letra E do teclado para selecionar a Eraser Tool e apague algumas partes para deixar o efeito mais realista.

19. Pressione a letra M do teclado para selecionar a Elliptical Marquee Tool e crie uma seleção eliptica pegando todo o efeito que foi aplicado no chão, pressione Alt+Backspace (a tecla acima do Enter) ou pressione a letra G do teclado para selecionar a Paint Bucket Tool e clique dentro da seleção para preencher com a cor preta, pressione Ctrl+D para retirar a seleção, crie outra seleção, desta vez no centro da elipse criada anteriormente e de tamanho reduzido, pressione Delete, pressione Ctrl+D para retirar a seleção, pressione a letra W do teclado para selecionar a Magic Wand Tool e clique na parte preta que resto da elipse para criar uma seleção como na imagem abaixo.

20. Clique na layer de Background e pressione Ctrl+J para duplicar, agora vá em Layer> Layer Mask> Reveal Selection, caso queira você pode deletar agora a layer com a elipse em preto, vá em Layer> Layer Style> Bevel And Emboss e defina os valores abaixo.

21. Agora vá em Layer> New Layer Fill> Gradient, defina os valores abaixo, para as cores use #ddc396 e #2f1e00, mude o modo de blend para Color Dodge.

22. Pressione Ctrl+O e abra uma outra imagem contendo uma textura qualquer, para este tutorial foi usada a imagem abaixo com algumas nuvens, pressione Ctrl+A para selecionar seu conteúdo e Ctrl+C para copiar, volte ao arquivo que estávamos trabalhando e pressione Ctrl+V para colar, deixe a layer acima de todas as outras, mude o modo de blend para Overlay.

23. Agora pressione a letra O do teclado para selecionar a Burn Tool, passe em algumas partes das costas da pessoa que está na foto e depois mude o modo de blend da layer com o efeito de ondas que foi aplicado no chão para Soft Light.

24. Agora crie uma nova pasta abaixo da layer da pessoa que está na foto, para isto vá em Layer> Group Layers, dê o nome de Power e mude o modo de blend desta layer para Color Dodge, pressione Ctrl+Shift+Alt+N para criar uma nova layer dentro desta pasta, pressione a letra X do teclado para alternar as cores de Foreground e Background, use a cor branca como cor de Foreground, pressione a letra B do teclado para selecionar a Brush Tool e crie alguns pontos de luz saindo das mãos da pessoa usada na imagem, após isso pressione Ctrl+Shift+Alt+N para criar outra layer, use outros tipos de brush para adicionar mais efeitos e depois vá em Layer> Layer Style> Outer Glow e defina os valores abaixo.

25. Agora pressione Ctrl+O e abra a imagem de algum carro ou caminhão capotando, use alguma ferramenta para selecionar apenas o veículo, no caso deste tutorial foi usada a Magic Wand Tool (letra W do teclado), o fundo foi deletado, a imagem do caminhão copiada (Ctrl+C) e colada (Ctrl+V) no documento que estávamos trabalhando antes, depois de adicionada, vá em Edit> Transform> Flip Horizontal, pressione Enter, pressione a letra V do teclado para selecionar a Move Tool e posicione o veículo no lugar que desejar.

26. Agora vá em Image> Adjustments> Curves e deixe o caminhão um pouco mais escuro clicando e arrastando a curva do gráfico um pouco para baixo, pressione Ok, pressione a letra M do teclado para selecionar a Rectangular Marquee Tool e crie uma seleção retângular como na foto abaixo, vá em Filter> Blur> Radial Blur, defina os valores abaixo e pressione Ok, vá em Filter> Blur> Motion Blur e defina os valores abaixo.

27. Para criar a sombra do caminhão clique com o botão direito do mouse sobre a miniatura do caminhão na layer que está na paleta de layers e escolha a opção Select Pixels para ativar a seleção ao redor do caminhão, pressione Ctrl+Shift+Alt+N para criar uma nova layer, pressione a letra D do teclado para resetar as cores de Foreground e Background para preto e branco, pressione Alt+Backspace (a tecla acima do Enter) ou pressione a letra G do teclado para selecionar a Paint Bucket Tool e clique dentro da seleção para pintar de preto, coloque esta layer abaixo da layer do caminhão e vá em Edit> Transform> Distort, distorça a sombra como foi feito anteriormente com as outras sombras e depois vá em Filter> Blur> Gaussian Blur, defina a opacidade da layer em 60%.

28. Ao final sua imagem estará como a da foto abaixo, alguns outros detalhes foram adicionados como pode-se ver usando a mesma técnica desenvolvida no decorrer do tutorial.

02. Pressione Ctrl+O e abra uma foto qualquer para ser usada como modelo para a saia de água, neste tutorial iremos usar a imagem abaixo, separe a imagem do fundo usando a técnica que achar mais fácil, neste tutorial foi usada a Pen Tool e o filtro Extract (Filter> Extract ou Ctrl+Alt+X) para os cabelos, porém este trabalho também pode ser feito com a Lasso Tool, Quick Mask ou outras técnicas, o importante é separar o fundo da modelo, depois de separada do fundo pressione Ctrl+A para selecionar a modelo, Ctrl+C para copiar, volte ao documento que criamos e pressione Ctrl+V para colar, dê o nome de Lady para a layer.

03. Para que pareça que a saia feita de água pareça estar sobre um corpo nú, clique com a tecla Ctrl sobre a miniatura da layer Lady para ativar a seleção ao redor do corpo da modelo, pressione a letra S do teclado para selecionar a Clone Stamp Tool, selecione a opção Sample All Layers na barra de opções da ferramenta no alto da tela, pressione Ctrl+Shift+Alt+N para criar uma nova layer e vá carimbando toda a área onde existe roupa até que fique como na foto abaixo, dê o nome de Lady Panties Mask para a layer.

04. Para criar a saia de água o ideal é usar uma foto de água respingando como na foto abaixo para isto procurem pro "Splash Water" em buscadores de imagens, pressione Ctrl+O e abra uma foto como a da imagem abaixo, a única parte que será necessária nesta foto será a parte de cima, então pressione a letra M do teclado para selecionar a Rectangular Marquee Tool, crie uma seleção ao redor da parte que desejamos copiar, pressione Ctrl+C para copiar,

05. Volte ao documento onde estavamos trabalhando e pressione Ctrl+V para colar, pressione Ctrl+T para ativar a caixa de Free Transform e ajuste a imagem afim de que fique de acordo com o corpo da modelo como na foto abaixo, quando estiver na posição correta pressione Enter, dê o nome de Dress para a layer, pressione Ctrl+G ou vá em Layer> Group Layers para criar uma nova pasta, dê o nome de Water Dress para esta pasta.

06. Mais uma vez escolha a ferramenta que tiver mais afinidade para recortar as áreas desnecessárias na saia de água, no caso as áreas que estão sobrando na imagem abaixo, neste tutorial foi usada a Magic Wand Tool (letra W do teclado), mas é possível usar a Eraser Tool (letra E do teclado), Máscaras etc, o intuito é apagar as partes que estão sobrando e deixar apenas o que será a saia.

07. Mude o modo de blend da layer Dress para Luminosity, vá em Filter> Liquify, pressione a letra W do teclado para selecionar a Forward Wrap Tool e modifique as bordas da saia afim de deixar com uma aparência mais natural como na foto abaixo.

08. Pressione Ctrl+J para duplicar a layer, mude o modo de blend da layer para Overlay e defina a opacidade em 40%, agora clique na layer Lady com a tecla Ctrl pressionada para ativar a seleção ao redor do corpo da modelo, pressione a letra O do teclado para selecionar a Burn Tool e pinte suas pernas afim de conseguir um maior contraste e melhorar o efeito como na foto abaixo.

09. Clique na layer Dress, pressione a letra R do teclado para selecionar a Sharpen Tool e vá passando sobre algumas partes da saia de água afim de deixar o efeito mais contrastado.

10. Ao final sua imagem estará como a da foto abaixo.

você pode criar controles no visual basic de várias maneiras uma delas é:

Private Sub Form_Load()
  Me.Controls.Add "VB.TextBox", "minha_textbox"
  Me.Controls("minha_textbox").Visible = True
End Sub

simples não? porém você não tem a flexibilidade de programar os eventos deste controle, como Click, MouseMove e etc, para termos a flexibilidade do rabo da lagartixa precisamos declarar os objetos antes de usá-los.

vamos lá, digite isso aqui:

Dim WithEvents minha_label As Label

Private Sub Form_Load()
  Set minha_label = Controls.Add("VB.Label", "minha_label")With minha_label .Caption = "Adeus mundo cruel"
  ' E na propriedade caption é onde vai aparecer o texto que queremos
  ' pense em top e left como sendo os eixos X e Y
  ' então o top é o eixo Y e o left é o eixo X
  .Top = 10
  ' top define a posição do objeto
  .Left = 10
  ' top define a posição do objeto
  .Visible = True
  ' a propriedade visible é impressindível se
  'você não colocar seu controle não apareceEnd With

depois clique aqui.

Pronto agora é só programar

agora digite:

Private Sub minha_label_Click()
  MsgBox "hahkuahu té peguei", vbCritical
End Sub

enfim pessoal é tudo automático quando você declara a variável lá em cima

Dim WithEvents minha_label As Label

O visual basic de lambuja (camaradagem) já te dar todos os eventos deste controle então é só programar normalmente.

Esses dias esqueci de uma coisa simples...

E que perdi um bom tempo (tá! alguns minutos, +- 20 min)  pra lembrar!

Eu queria gerar um pacote da aplicação pelo eclipse! O negócio era tão simples (era pra ser!) que nem fiz questão de abrir o browser pra pesquisar!

Hehehehe que coisa! mas então!

Pros esquecidos como eu:

Para gerar o pacote no Eclipse, é só selecionar o projeto e com o botão direito do mouse clique em:

Export...   ->   opção Java  ->  Jar File

Selecione tudo que você quer para o pacote, escolha o arquivo e pronto.

Também tem a opção de configurar a classe principal (que possuí um método main) .

Para poder executar a aplicação utilizando apenas o comando "java -jar pacote.jar ". Sem necessidade de especificar o caminho e a classe.

Bom! é isso! Até!

Cuando uno lee Génesis 25:23, no puede menos que pensar que Dios ha predestinado el futuro tanto de Esaú como de Jacob.

“Y el Señor le dijo: Dos naciones hay en tu seno, y dos pueblos se dividirán desde tus entrañas; un pueblo será más fuerte que el otro, y el mayor servirá al menor” (Gen. 25:23 LBLA)

Esta declaración de Dios puede entenderse básicamente de dos maneras:

1. Dios ¿predestina o predetermina? (debemos comprender la diferencia)
2. Dios es omnisapiente

Analicemos las posibilidades y definamos algunos términos.

1. Dios ¿predestina y/o predetermina?

Bíblicamente debemos entender que Dios PREDESTINA…. para salvación. He aquí los textos:

Romanos 8: 29-30 “Porque a los que de antemano conoció, también los predestinó a ser hechos conforme a la imagen de su Hijo, para que El sea el primogénito entre muchos hermanos; y a los que predestinó, a ésos también llamó; y a los que llamó, a ésos también justificó; y a los que justificó, a ésos también glorificó.”

Efesios 1:5 “nos predestinó para adopción como hijos para sí mediante Jesucristo, conforme al beneplácito de su voluntad,”

Efesios 1:11 “también hemos obtenido herencia, habiendo sido predestinados según el propósito de aquel que obra todas las cosas conforme al consejo de su voluntad,”

En estos textos es claramente visible como la predestinación divina tiene que ver con el propósito o finalidad del hombre. Dios creó al hombre para que tenga vida eterna, para ser conforme a la imagen de Jesús, como hijos suyos y todo esto según su propio beneplácito y voluntad.

¿Significa esto que TODOS sin excepción seremos salvados? No existe ningún argumento Bíblico (fundamento coherente y sistemático) para llegar a la conclusión de que TODOS sin excepción serán salvados. La salvación es una REALIDAD CONDICIONAL.

Si la salvación no fuera condicional, no tendrían sentido alguno los cientos de textos que hacen referencia a la necesidad de que el ser humano CREA PARA SER SALVO, tal como lo indica Pablo en el siguiente versículo.

Romanos 10:9-10 “que si confiesas con tu boca a Jesús por Señor, y crees en tu corazón que Dios le resucitó de entre los muertos, serás salvo porque con el corazón se cree para justicia, y con la boca se confiesa para salvación.”

Para comprender esto debemos entender que PREDESTINACIÓN no es lo mismo que PREDETERMINACIÓN. Si bien Dios ha predestinado, ha marcado un rumbo, finalidad o razón de ser para el Hombre (tal como hemos visto en los textos anteriores), NO PREDETERMINA al Hombre para la salvación, sino que respeta la decisión y libertad de cada uno de nosotros para aceptar la predestinación que nos ofrece desde el nacimiento.

La predeterminación, a diferencia de la predestinación, establece y marca todo tipo de comportamiento y resultado antes de que sucedan, por lo tanto, la predeterminación imposibilita cualquier tipo de libertad humana (no así la predestinación como intención sin excepción por parte de Dios para toda la raza humana).

Por tanto podemos concluir que, en materia de salvación del Hombre, Dios nos ha predestinado a todos para salvación (Efesios 1:5), pero NO nos ha predeterminado para que aceptemos ese destino, sino que respeta nuestra decisión y voluntad (Romanos 10:9-10).

Retomando nuestro estudio e historia

Recordemos el versículo que nos ha motivado a realizar esta primera parte del análisis:

“Y el Señor le dijo: Dos naciones hay en tu seno, y dos pueblos se dividirán desde tus entrañas; un pueblo será más fuerte que el otro, y el mayor servirá al menor” (Gen. 25:23 LBLA)

Como se puede comprobar, en el versículo en cuestión no se está hablando de la salvación de ninguno de los dos. Por lo tanto, hasta aquí, podemos concluir que este versículo (Génesis 25:23) está fuera del contexto de la predestinación para la salvación, dado que está hablando de una relación entre hombres o naciones. En otras palabras, desde un punto de vista Bíblico, tanto Jacob como Esaú fueron predestinados para salvación (al igual que toda la raza humana) y de la misma manera, no han sido predeterminados para aceptarla en contra de sus propias voluntades. Por tanto, como este versículo no se relaciona con la salvación de ninguno de los dos, el marco teórico-bíblico queda relegado a otra explicación.

2. Dios es Omnisapiente

La otra opción Bíblica, que podría explicar Génesis 25:23, está relacionada con otro atributo o característica divina: la omnisciencia.

La omnisciencia explica Génesis 25:23 sin alterar el libre albedrío del Hombre. El hecho de que Dios conozca todas las cosas, no implica necesariamente una predeterminación en el comportamiento de las personas.

“Tú conoces mi sentarme y mi levantarme; desde lejos comprendes mis pensamientos. Tú escudriñas mi senda y mi descanso, y conoces bien todos mis caminos. Aun antes de que haya palabra en mi boca, he aquí, oh SEÑOR, tú ya la sabes toda” Salmos 139:2-4 (LBLA)

Cómo funciona la omnisciencia divina es algo que no nos ha sido revelado. Sin embargo, nos es suficiente entender que el hecho de que Dios conozca anticipadamente lo que sucederá con cada uno de nosotros, incluidos los pensamientos, acciones, relaciones, etc. no está, desde un punto de vista Bíblico, en contradicción u oposición al ejercicio de nuestra voluntad y libre albedrío.

Una historia que debe entenderse conceptualmente

Comprendiendo que Dios nos predestina a todos para salvación, pero que no predetermina el comportamiento o decisiones de las personas, y que en este caso concreto, decide revelar a Rebeca parte de ese conocimiento en relación al “problema” que ella sentía en su vientre (Gen. 25:22), estamos en condiciones de comprender los siguientes aspectos de la historia:

1. Rebeca no supo administrar correctamente ese conocimiento, dado que por saber anticipadamente la relación que tendrían uno con otro, utilizó el engaño (a su marido) y la manipulación (de su hijo) para que las cosas sucedieran como se le había revelado (Génesis 27).
Fijaos bien que Dios en ningún momento le pidió a Rebeca que hiciera algo al respecto, simplemente le explicó y le anticipó parte de lo que sucedería como respuesta a una duda personal, y estrictamente relacionada con la promesa del pacto con Abraham.

2. Cualquiera podría pensar, si no tuviera el contexto anterior, que Dios pasa por alto el engaño y la manipulación de Rebeca, dado que “gracias a ello” Isaac recibe finalmente la primogenitura y bendición. Sin embargo, un estudio más concienzudo nos descubrirá que en realidad Dios cumplió SU PALABRA, A PESAR del comportamiento de Rebeca e incluso del de Isaac mismo, que se prestó al engaño.

Otro tema posibles de reflexión:

Transmisión de errores de generación en generación

Podemos comenzar, tal como lo hace el autor de Escuela Sabática, con las experiencias o sucesos que Isaac y Rebeca han REPETIDO de Abraham y Sara.

1) Isaac reclamó las promesas del pacto que Dios le había hecho a Abraham.
2) Tanto Sara como Rebeca fueron estériles durante un tiempo relativamente largo
3) Ambas familias soportaron disputas acerca de la propiedad de pozos con los habitantes locales.
4) Tanto Abraham como Isaac llevaron a sus familias a países extranjeros para soportar el hambre.
5) Abraham informó a la gente de Gerar que Sara, su mujer, era su hermana. Isaac le dijo a la misma gente, una generación más tarde, que Rebeca, su mujer, era su prima.
6) Ambas familias tuvieron que tratar con la rivalidad entre hermanos.

Reflexión:

Alguno puede verse motivado a pensar que la repetición de actos (sobre todo, los errores) se repiten generación tras generación por una cuestión “genética”. Sin embargo, no podemos deducir esta teoría de la historia de Isaac y Rebeca.

En primer lugar debemos entender que las promesas que Isaac “reclama”, en realidad fueron ofrecidas por Dios a “todas las generaciones después de Abraham”. Por tanto era correcto y legítimo que Isaac “reclamara” dicha promesa. En segundo lugar la esterilidad de Sara y Rebeca son circunstancias (que están fuera del dominio de dichas personas) coincidentes (que nada tiene que ver con sus errores o comportamientos). En tercer lugar, las disputas por los pozos es más una cuestión de los problemas típicos de la época cuando los derechos de propiedad privada eran parte de una ley “natural” (poco legislada), y por tanto un problema para cualquiera que tuviera grandes posesiones. En cuarto lugar, si ambas familias tuvieron que llevar a sus familias a países extranjeros fue porque Dios así lo pidió. En quinto lugar la “mentira” de la parentela familiar de sus bellas esposas, era una estrategia en defensa de sus vidas frente a los malos hábitos y costumbres de la época de desear e incluso matar por tener mujeres ajenas. Sin necesidad de justificar la “media mentira”, deberíamos comprender que esta estrategia, quizá, podía evitar mayores males para la familia. Y por último, en sexto lugar, la rivalidad entre hermanos es más una cuestión de relaciones dentro del propio sena familiar, y nada tiene que ver nuevamente la “genética” en todo esto.