Conceptos básicos de informática universitaria, acceso a bases de datos, programación VBA, como se muestra en la imagen
1.
sub Calcular factura de agua ()
dim x mientras,y mientras
x=Application.input(prompt:="Por favor ingrese el cantidad de agua utilizada." ,Tipo:=1)
si x>0 y x<=15 entonces
y=4x/3
de lo contrario
y=2.5x-17.5
end if
msgbox("La factura de agua de este mes es:" & y &."dólares.")
fin del sub
2.
seleccione caso a
caso "0"
dx="cero"
caso "1"
dx="uno"
caso "2"
dx="dos"
......
case else
dx=""
end select
msgbox("La capitalización del un solo dígito es: " & dx)
.