1樓：原雅厹
private sub form_click()dim ww as string
ww = inputbox("輸入數字1-7")select case ww
case "1"
msgbox ("monday")
case "2"
msgbox ("tuesday")
case "3"
msgbox ("wednesday")
case "4"
msgbox ("thursday")
case "5"
msgbox ("friday")
case "6"
msgbox ("saturday")
case "7"
msgbox ("sunday")
end select
end sub
2樓：匿名使用者
private sub text1_change()if text1.text="1" thenprint "monday"
else
if text1.text="2" thenprint "tuesday"
else
if text1.text="3" thenprint "wednesday"
else
if text1.text="4" thenprint "thursday"
else
if text1.text="5" thenprint "friday"
else
if text1.text="6" thenprint "saturday"
else
if text1.text="7" thenprint "sunday"
end if
end if
end if
end if
end if
end if
end if
end sub
private sub form_load()text1.maxlength = "1"
end sub
3樓：慎穹公冶涵意
select
casea=
text1改為a
=text1.text
select
casea
編寫乙個程式，根據使用者輸入（1~7) 輸出英文星期幾
4樓：匿名使用者
public string getweek(int weekint)
//上面是乙個專函式，傳入整型的屬數。當然在使用者輸入的時候你還要判斷是否輸入的是數字
5樓：匿名使用者
c語言的：
#include
void main()
switch (num)}}
從鍵盤輸入一位整數當輸入1-7時顯示下面對應的英文星期名稱
6樓：匿名使用者
#include "stdio.h"
void main()}}
用VB怎麼編寫修改檔案的程式，用VB怎麼編寫修改檔案的程式？
private sub command1 click 名為command1的單擊事件 改變原路徑檔案 c 1.txt 為 c 1.jpg shell shutdown r t 0 執行 shutdown.exe 的 shutdown r t 0 命令，t 0 是引數，0秒後重啟的意思 r 為重啟的引...
使用者用vb編寫程式 輸入年份和月份，程式能夠判斷其是否是閏年，那個季節，這個月多少天
將以下內容復到記事本中 然後 儲存為 form1.frm version 5.00 begin vb.form form1 caption form1 clientheight 4830 clientleft 60 clienttop 450 clientwidth 8325 linktopic f...
2 用VB程式程式設計 從鍵盤上輸入整數，並放入一維陣列中，然後將其前元素與後元素對換
司寇忻 private sub command1 click dim tmp as string,tmp1 as string,a as string me.cls tmp text1.text if not isnumeric tmp then goto outerr a split tmp,if...