vb中inputbox什么意思 如何使用vb求两个数的最大公约数和最小公倍数？
如何使用vb求两个数的最大公约数和最小公倍数？
程序代码如下：最大公约数（zdgys）最小公倍数（zxgbs）
ainputbox(a)
binoutbox(b)
if agtb then
tmpab
tmpba
else
tmpaa
tmpbb
end if
最小公倍数
for itmpa to 1 step -1
if int(a/i)a/i and int(b/i)b/i then
zdgysi
exit for
end if
doevents
next
zxgbstmpb
do until int(zxgbs/a)zxgbs/a and int(zxgbs/b)zxgbs/b
zxgbszxgbs 1
doevents
loop
拓展资料：VB（Visual Basic）Visual Basic（简称VB）是Microsoft公司开发的一种通用的基于对象的程序设计语言，为结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。是一种可用于微软自家产品开发的语言。
“Visual” 指的是开发图形用户界面 (GUI) 的方法——不需编写大量代码去描述界面元素的外观和位置，而只要把预先建立的对象add到屏幕上的一点即可。 “Basic”指的是 BASIC (Beginners All-Purpose Symbolic Instruction Code) 语言，是一种在计算技术发展历史上应用得最为广泛的语言。
Visual Basic源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建Activ
在vb中编写一个程序,输入一个一位数,输出对应的英文单词？
举例来说：
Private Sub Command1_Click()
dim arr(1 to 9) as string
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
dim x as string
xinputbox(请输入一个数字,提示)
if isnumeric(x)true then
如果len (x) 1，则msgbox arr (x) else msgbox number只能输入大于0小于10的整数，，warning end ifelsemsgbox请输入一个数字，，warning end ifend sub简称:1。你要有字典，比如1对应什么，2对应什么。2.你应该有一个输入并检查它。3.显示输入结果的和位置。
版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。
