FoxPro/Visual FoxPro - Seleccionar un Item en Combobox

* Init del Formulario

* Buscar un nombre guardado y asignarlo a una variable

lcMiMedico=BuscarNombre()      && una supuesta función que recupera el último nombre

lcMiMedico=Evl(lcMiMedico,"JUAREZ JUAN BENITO")   && Médico inventado.

Thisform.Addproperty("mimedico",lcMiMedico)

select Tabla_de_Medicos

With Thisform.mskmedico.cmbmedico

	.BoundColumn=2

	.ColumnLines=.f.

	.ColumnCount=2

	.ColumnWidths="40,200"

	.ControlSource='Thisform.MiMedico'

	.RowSourceType=2

	.rowsource="codigo,nombre"      && ó  .RowSource="TablaMedicos.Codigo,nombre"

	.Requery

	.refresh

endwith

* Destroy del Formulario

GuardarNombre(thisform.MiMedico) && una supuesta función que te permita guardar

				 && en alguna tabla el nombre del último

                                 && utilizado.