如何使用vb求兩個數(shù)的最大公約數(shù)和最小公倍數(shù)？

程序代碼如下：最大公約數(shù)（zdgys）最小公倍數(shù)（zxgbs）

ainputbox(a)

binoutbox(b)

ifagtbthen

tmpab

tmpba

else

tmpaa

tmpbb

endif

最小公倍數(shù)

foritmpato1step-1

ifint(a/i)a/iandint(b/i)b/ithen

zdgysi

exitfor

endif

doevents

next

zxgbstmpb

dountilint(zxgbs/a)zxgbs/aandint(zxgbs/b)zxgbs/b

zxgbszxgbs1

doevents

loop

拓展資料：VB（VisualBasic）VisualBasic（簡稱VB）是Microsoft公司開發(fā)的一種通用的基于對象的程序設(shè)計語言，為結(jié)構(gòu)化的、模塊化的、面向?qū)ο蟮摹瑓f(xié)助開發(fā)環(huán)境的事件驅(qū)動為機(jī)制的可視化程序設(shè)計語言。是一種可用于微軟自家產(chǎn)品開發(fā)的語言。

“Visual”指的是開發(fā)圖形用戶界面(GUI)的方法——不需編寫大量代碼去描述界面元素的外觀和位置，而只要把預(yù)先建立的對象add到屏幕上的一點即可。“Basic”指的是BASIC(BeginnersAll-PurposeSymbolicInstructionCode)語言，是一種在計算技術(shù)發(fā)展歷史上應(yīng)用得最為廣泛的語言。

VisualBasic源自于BASIC編程語言。VB擁有圖形用戶界面（GUI）和快速應(yīng)用程序開發(fā)（RAD）系統(tǒng)，可以輕易的使用DAO、RDO、ADO連接數(shù)據(jù)庫，或者輕松的創(chuàng)建Activ

在vb中編寫一個程序,輸入一個一位數(shù),輸出對應(yīng)的英文單詞？

舉例來說：

PrivateSubCommand1_Click()

dimarr(1to9)asstring

arr(1)ah

arr(2)boy

arr(3)cow

arr(4)did

arr(5)egg

arr(6)fox

arr(7)gay

arr(8)hello

arr(9)im

dimxasstring

xinputbox(請輸入一個數(shù)字,提示)

ifisnumeric(x)truethen

如果len(x)1，則msgboxarr(x)elsemsgboxnumber只能輸入大于0小于10的整數(shù)，，warningendifelsemsgbox請輸入一個數(shù)字，，warningendifendsub簡稱:1。你要有字典，比如1對應(yīng)什么，2對應(yīng)什么。2.你應(yīng)該有一個輸入并檢查它。3.顯示輸入結(jié)果的和位置。