求VB题的答案,请高手指教~
答案:2 悬赏:50
解决时间 2021-11-16 07:08
- 提问者网友:优雅ぉ小姐
- 2021-11-15 06:23
=======================
除数:
商(/):
整数商(\在文本框中输入除数和被除数,单击【执行除法运算】按钮时,在下面三个文本框里分别显示计算结果。
界面如下;):
被除数
最佳答案
- 二级知识专家网友:花一样艳美的陌生人
- 2021-11-15 07:21
#39.Text) '整数商
text5 = Val(Text1.Text) \ Val(Text2.Text) / Val(Text2;text1为被除数 text2为除数
Private Sub Command1_Click() '.Text) Mod Val(Text2;执行除法运算
text3 = Val(Text1.Text) '商
text4 = Val(Text1
text5 = Val(Text1.Text) \ Val(Text2.Text) / Val(Text2;text1为被除数 text2为除数
Private Sub Command1_Click() '.Text) Mod Val(Text2;执行除法运算
text3 = Val(Text1.Text) '商
text4 = Val(Text1
全部回答
- 1楼网友:错过的是遗憾
- 2021-11-15 08:31
private sub command1_click() for i = 1 to 7 x = val(inputbox("输入星期" & i & "温度")) sum = sum + x next i msgbox "平均温度为:" & sum / 7 end sub ====================== private sub command1_click() print 公约数(35, 14) end sub function 公约数(a as long, b as long) dim x as long, y as long, k as long x = iif(a >= b, a, b) y = iif(a <= b, a, b) do k = x mod y: if k = 0 then exit do x = y: y = k loop 公约数 = y end function
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯