當前位置:編程學習大全網 - 電腦編程 - 用vfp編程,請寫出答案,謝謝!!!

用vfp編程,請寫出答案,謝謝!!!

x=Val(Inputbox("請輸入壹個數:","測試"))

If x>0

Y=x*x

Endif

If x=0

Y=100

Endif

If x<0

Y=x*10

Endif

Messagebox("Y="+Transform(Y),0+64,"輸出")

將這段代碼粘貼到prg文件中就可執行出妳要的結果了,呵呵~

  • 上一篇:vi用什麽打開
  • 下一篇:慧編程社團名稱怎麽取
  • copyright 2024編程學習大全網