包含vb.net表示负0的词条

编写判断一个输入数是为正数,负数还是0的程序

'这个很简单啊，大于0正数，小于0负数，=0那就是0了。

on error resume next

n=inputbox("请输入一个数：","提示")

if n=false then wscript.quit

if n0 then

if err then

msgbox "输入错误":err.claer:wscript.quit

end if

msgbox "负数"

elseif n0 then msgbox "正数"

else msgbox "零"

end if

相关问答

Q1: vb.net 字节数组补0

         '写入

        Dim bytes() As Byte = {34, 23, 43, 43, 55, 3}

        Dim items = (From item In bytes Select item.ToString("000")).ToArray()

        System.IO.File.WriteAllLines("c:\test.txt", items)

        '读取

        Dim items2 = System.IO.File.ReadAllLines("c:\test.txt")

        Dim bytes2 = (From item In items2 Select Byte.Parse(item)).ToArray()

        For Each item In bytes2

            Console.WriteLine(item.ToString())

        Next

Q2: 在VB中,0是false,负数也是ture吗

是的，若是数值则非0即真，只有0是假 若是字符串，空串为假，其它都是真。 反正每种类型的默认值都是假，因为逻辑值默认为假

满意请采纳

Q3: VB.net中 Cint(True )为何为-1 不是1吗？

原则上是-1,但是如果是Cint(True)转Boolean,只要是非0的,都可以表示True...0表示False

新手不容易记忆,倒底是0是False还是-1是False还是别的,你可以这样记

整数型的变量定义后默认为0,而布尔定义变量后默认为False,因此0表示False,非0则表示True..

Q4: 输入一个数如果大于0输出为正数如果小于0输出为负数如果等于0输出为0 vb程序

Private Sub Command1_Click()

Dim n As Double

n = Val(InputBox("请输入一个数！"))

If n  0 Then

MsgBox "正数"

ElseIf n  0 Then

MsgBox "负数"

Else

MsgBox "0"

End If

End Sub

扩展资料：

注意事项

1、对于正整数而言vb.net表示负0，可以带+号vb.net表示负0，第一个数字不能为0。

2、 对于负整数而言vb.net表示负0，必须带负号，第一个数字也不能为0。

3、对于整数而言，实际是由0，正整数和负整数组成的，用前两个方法一起判断。

4、对于正小数而言，可以考带+号，并考虑两种情况，第一个数字为0和第一个数字不为0，第一个数字为0时，则小数点后面应该不为0，第一个数字不为0时，小数点后可以为任意数字。

5、对于负小数而言，必须带负号，其余都同上。

6、对于小数，可以带正负号，并且带小数点就行vb.net表示负0了，但是至少保证小数点有一边不为空。

7、实数比较简单，，要么是整数，要么是小数。

Q5: VB怎么取一个数的负值,什么函数?

a=iif(a0,-a,a)

意思是：如果a大于0，则取负值，如果本身是负数，就取本身。

vb.net表示负0的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于、vb.net表示负0的信息别忘了在本站进行查找喔。