VB中布尔型变量如何赋值？

可以用关键字True与False给Boolean变量赋值，写法如下：

Function IsInt(Num) As Boolean

If Int(Num) = Num Then

IsInt = True

Else

IsInt = False

End If

End Function

其中，Num就是要处理的o1，IsInt返回值就是布尔型的变量。

扩展资料：

注意事项

C语言中，本身没有bool（布尔型变量）。但是我们可以用其他方式来模拟。

#define true 1

#define false 0

//联合体(共用体) 定义

typedef union

  {

//使用位域

  struct

  {

  unsigned b0                 : 1;

  unsigned b1                 : 1;

  unsigned b2                 : 1;

  unsigned b3                 : 1;

  unsigned b4                 : 1;

  unsigned b5                 : 1;

  unsigned b6                 : 1;

  unsigned b7                 : 1;

  }bit_type;

  unsigned char byte;

   }FLAG;

 FLAG FLAG0; //结构变量声明

//结构类型变量位域宏定义

#define flag_0 FLAG0.bit_type.b0 

#define flag_1 FLAG0.bit_type.b1

#define flag_2 FLAG0.bit_type.b2

#define flag_3 FLAG0.bit_type.b3

#define flag_4 FLAG0.bit_type.b4

#define flag_5 FLAG0.bit_type.b5

#define flag_6 FLAG0.bit_type.b6

#define flag_7 FLAG0.bit_type.b7

可以通过使用关键字 True 与 False 可给 Boolean 变量赋值

Boolean 数据类型

Boolean 变量存储为 16 位（2
个字节）的数值形式，但只能是 True 或是 False。Boolean
变量的值显示为 True 或 False（在使用 Print 的时候），或者
#TRUE# 或 #FALSE#（在使用 Write # 的时候）。使用关键字 True 与 False 可将
Boolean 变量赋值为这两个状态中的一个。

Option Explicit

    Dim flag As Boolean

Private Sub Command1_Click()
    Debug.Print flag 'Boolean 变量初始值是False
    flag = True '给Boolean 变量赋值为True
    Debug.Print flag
    flag = Not flag '给Boolean 变量取反
    Debug.Print flag
End Sub

你是想要一个函数来判别o1这个变量吧，我给你写了一个：

Function IsInt(Num) As Boolean
If Int(Num) = Num Then
IsInt = True
Else
IsInt = False
End If
End Function

其中，Num就是你要处理的o1

IsInt返回值就是布尔型的变量

oa=True / False