题目
二、 编写一个VB函数过程,用以判断一个数是奇数还是偶数
提问时间：2021-01-10
答案
Dim n As Integer
Private Sub Form_Click()
If n / 2 = 0 Then
Print "n是偶数"
Else
Print "n是奇数"
End If
End Sub
Private Sub Form_Load()
n = InputBox("请输入整数：")
End Sub
Private Sub Form_Click()
If n / 2 = 0 Then
Print "n是偶数"
Else
Print "n是奇数"
End If
End Sub
Private Sub Form_Load()
n = InputBox("请输入整数：")
End Sub
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
热门考点
- 1数学解答题17题等差数列{an}中,已知a3=3,a1+a4=5求数列{an}的通项公式 急急急!
- 2My friend,sijia,was in my room and she was just joking with you.
- 3it is bad manners to blow your nose（ ） ?
- 4Open the window.The fresh air can come into the room ___it A.on B.through C.past D.across
- 5化身孤岛的鲸这首歌讲了一个怎样的故事
- 6电荷与电子有什么关系
- 7向100mL 0.5 mol/L的硫酸铝溶液中加入 1.5 mol/L 的KOH溶液,要得到3.12 g氢氧化铝白色
- 8苹果是梨子的2倍,每天吃6个苹果和2个梨子当苹果吃完,梨子还剩下7个,原各几个?
- 9愁得押韵词是什么
- 10英语翻译