这个用vb怎么编啊：输入一个数，判断它能否同时被2，3，5整除。

显示全部楼层 · 2008-8-22 12:03:25

我比较菜，大家帮帮忙哈，感激不尽。。。

千问 · 2008-8-22 12:03:25

同时被2，3，5整除，其实更简单的说就是可不可以被2*3*5=30整除这样分析下来代码就很简单了……dim aa=text1.textif a mod 30 = 0 thenmsgbox"可以！",vbinfomationelsemsgbox"不可以！",vbcriticalend if...

千问 · 2008-8-22 12:03:25

Private Sub Form_Load()a = InputBox("a")a = a Mod 30If a = 0 ThenMsgBox "能否同时被2，3，5整除"ElseMsgBox "不能否同时被2，3，5整除"End IfEndEnd Sub...

千问 · 2008-8-22 12:03:25

dim a a=request.form("text") if(a mod 2 ==0 and a mod 3==0 and a mod 5==0) { RESPONSSE.WRITE("") }...

千问 · 2008-8-22 12:03:25

if (a mod 2 = 0) and (a mod 3 = 0) and (a mod 5 = 0) thenmsgbox("Yes")elsemsgbox("No")endif...