Red de conocimiento informático - Consumibles informáticos - Solicite la programación del enésimo bit.

Solicite la programación del enésimo bit.

¿privado? ¿Sub? Command1_Click()

¿Atenuar? ¿Dólar taiwanés? n%

t? =?InputBox("cadena de entrada")

n? =?InputBox("Entero de entrada")

MsgBox? ¿Medio(t,?n?+?1)?& amp? Izquierda(t,?n)

¿Fin? Submarino