SoloCodigo

k tal a ver si me pueden ayudar en lo siguiente resulta k en fox pro estoy haciendo lo siguiente con el list traigo una columna y la presento en el con la propiedad rowsourcetype = 6  * fields
               rowsource = tabla.campo
ahora bien necesito k al seleccionar unos de esas lineas k me presentan el el list me aparezca en el edit los datos k estan al lado de ese en la tabla osea la 2da columna.

sé k esto no es fox pero como lo harian ustedes en vb solo para guiarme gracias

muchas gracias

k tal amigos miren si se puede de esta , tengo una pantalla con una base de datos
predeterminada, que con solo poner el nombre en un text me presenta la
tabla en un grid, bueno necesito por favor me ayuden en varios puntos:
1* necesito k ese grid no se pueda modificar los datos.
2* colok otros 2 text con un command y kiero poner en ese command, en el
text2 poner el campo de la busqueda y en el text3 poner lo que busque.
3* k ese grid al maximizar la pantalla se ajuste al ancho maximizado.
lo estoy haciendo asi pero no me sale
WITH thisform
LOCATE FOR allt(.text2.text) == ALLTRIM(.text3.text)
recordsource.grid
endwith

les agradezco mucho y saludos a todos

ah el primer dato lo llamo así
set defa to c:\\basedatos
sele 1
with thisform
thisform.label2.Visible = .t.
xtabla = allt(.text1.text)
use &xtabla  SHARED IN 0
thisform.grid1.Visible = .t.
thisform.label3.visible = .t.
thisform.label4.Visible = .t.
thisform.label5.Visible = .t.
thisform.command4.Visible = .t.
thisform.text2.Visible = .t.
thisform.text3.Visible = .t.
.grid1.recordsource = xtabla
.grid1.refresh
endwith

k tal amigos miren tengo un textbox k necesito ponerlo con un formato k es el siguiente   00-0000-00000  este es el formato. como puedo hacer para k el text solo me permite colocar en ese orden

la clave para ver el codigo es macros, y no se me alteren k eso es malo para el corazon, k pasa radical sonrie un rato  

k tal amigos conocen a jenifer lopez, bueno aki está una presentación hecha con objeto flash con macros. la chica está de alante buena.
sé k este foro no es para esto pero mucho trabajo es bueno de ves en cuando distraerse un poquito. bueno pongan sus opiniones de la presentación.

saludos,

con el boton derecho sobre cuadro de herramientas te saldra controles adicionales, bueno ahi está EL DTPicker y muchos màs.

k tal amigos miren tengo un codigo k le digo
P=  a >= X
y esto me trae un valor verdadero o falso dependiendo como sea el caso como hago para cambiar ese valor verdadero por una palabra k yo escoja?
saludos,

ok gracias RadicalEd esa es la intención, sugerencias.

k tal amigos tengo un libro k está blokeado al abrirlo, y para dar opcion para deshabilitarlo he puesto el siguiente codigo
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim pregunta1 As Integer
pregunta1 = MsgBox("¿Está usted autorizado para modificar?", vbQuestion + vbYesNo)
If pregunta1 = 6 Then
ActiveSheet.Unprotect
Else
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End If
End Sub
 bueno lo k necesito hacer es k al dar clipen "si" antes de k me habilite el libro me pida una clave, y para llevarlo un pco màs alla kiero ponerle de clave el nombre de cada usuario y asi poder llevar un control de kienes entraron, a ver si se puede y si conocen como hacerlo me pasan el dato por favor y gracias de antemano.

Saludos

k tal amigos he hecho está pantalla en excell, k por cierto como varios saben son mis primeros pasos, la coloco aki para k le sirve algunos como ejemplo y tambien akellos k vean k se le pueda añadir algo más, pueden hacerlo. y subirlo nuevamente para ver las modificaciones.
para ver el codigo tiene k entrar con la clave "macros".

saludos,

ah se me olvidaba esto está hecho para capturadores, de facturas o algo màs.
se lleva por mes donde dice la secuencia seria de 1 hasta que termine el mes.
la hora se trabaja militar si empiezas a registrar a las 09:15 y terminas a las 3:00 pm hay k colocar 15:00 k es la hora militar.

k tal amigos tengo un text box que guarda un resultado de la resta de otro ejm
Text1= (text2.value - text3.value) +1

lo que necesito hacer es k el text1 no permita k el valor k obtenga de esa operación se pueda modificar,
gracias de antemano, saludos

k tal amigos ya se más o menos como hacerlo pero me falta un detallito, haber si me ayudan en este
con el codigo:

GO BOTTOM
m.nValor = dainsumos.numero + 1
REPLACE dainsumos.numero with m.nValor

ok, necesito hacer k ese uno k aparece ahi siga una numeración por ejemplo el proxicmo registro nuevo pase a 2 y asi sucecivamente.
gracias y saludos