题目
vb编写判断奇,偶数的函数过程.从文本框输入一个正整数,调用函数过程判断奇偶函数,判断结果显示在标签中
vb2005
vb2005
提问时间：2021-02-22
答案
假设文本框为TEXT1,标签为LABEL1,函数代码如下：
public sub testnum()
dim x as long
x=cint(text1.text)
if x mod 2 = 1 then
label1.caption="奇数"
else
label1.caption="偶数"
end if
end sub
public sub testnum()
dim x as long
x=cint(text1.text)
if x mod 2 = 1 then
label1.caption="奇数"
else
label1.caption="偶数"
end if
end sub
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1天上圆月,人间月半,月月月圆缝月半；今夜年尾,明日年头,年年年尾接年头.
- 2西周时期实行了什么制度 内容是什么
- 3在这篇小短文里,作者为我们营造了一种怎样的家庭气氛,请谈谈你的观点,并用文中的关键词来支撑这一观点
- 4有9个小正方体,再添（ ）个小正方体才能拼成一个大正方体
- 52立方米这种木材约重25分之18吨,平均每立方米重多少吨?6立方米木材重多少吨?
- 6我自己这么大人了,这问题都反应不过来,想请知识份子帮我算算看.
- 7函数y=2sin(2x+π/3)(-π/6≤x≤π/6)的值域是
- 8先生何弃我甚耶?假而他人可从,从之久矣.翻译
- 9最小的合数与两位数中最小的质数的和是()它能同时被()和()整除
- 10二分之一x的三次方-x的平方+2y的平方这个多项式是关于字母y的几次几项式
热门考点
- 1已知2a=3，2b=6，2c=12，试判断a，b，c之间的关系．
- 2x减2的差的5被,等于它加3的和的4被.求X?
- 3在一块长5米,宽2米的铁板上截下一个最大的半圆,裁出半圆的面积是多少平方米
- 4I referred to my watch for the exact time.急,
- 5计算定积分∫(-1,1)x^2(sinx/(1+x^4)+√(1-x^2))dx
- 6图书角有书不超过95本,其中科技书占2分之1,故事书占5分之1,连环画占9分之1,其余是笑话书,笑话书有多少本?
- 7做学问应在不疑有疑,待人应在有疑处无疑的意思
- 8修改病句1、我们要运用和理解已学过的成语.2、多读好书,可以丰富和提高我们的知识!
- 9according to和depend on之间的区别
- 10立方米和毫米的进率是多少