VB中if函数的使用方法?

178 2024-12-09 06:57

一、VB中if函数的使用方法?

首先你的目的是在数字串十位和个位同时满足=B1/C1/D1时返回“是”这里可以用IF套用OR函数

可以先将十位和个位都提出来使用,在这里我用的是LEFT和RIGHT函数,然后加上VALUE函数使其格式改为数值。

然后用IF函数就行了,即IF(单元格个位满足条件,"是",IF(单元格十位满足条件,"是","否")

分析至此,实例如下

函数前半段为单元格个位满足条件,后半段为单元格十位满足条件

完整公式如下

=IF(OR(VALUE(RIGHT(A3,1))=$B$1,VALUE(RIGHT(A3,1))=$C$1,VALUE(RIGHT(A3,1))=$D$1),"是",IF(OR(VALUE(LEFT(RIGHT(A3,2),1))=$B$1,VALUE(LEFT(RIGHT(A3,2),1))=$C$1,VALUE(LEFT(RIGHT(A3,2),1))=$D$1),"是","否"))

57246个位十位都满足 返回是

57255个位十位都不满足 返回否

6464854个位满足 十位不满足 返回是

123465十位满足 个位不满足 返回是

希望能帮到你

二、VB中Scroll的使用方法?

Private Sub Form_Load()Timer1.Interval = 100 '设置Timer1执行的时间间隔为100msEnd SubPrivate Sub Form_Resize() '滚动条位置随窗体变化而变化VScroll1.Left = Form1.ScaleWidth - VScroll1.WidthVScroll1.Top = 0VScroll1.Height = Form1.ScaleHeightEnd SubPrivate Sub Timer1_Timer() '利用Timer控件来监控窗体状态If Form1.WindowState = 2 Then 'windowstate属性你可以去看看窗体的属性窗口VScroll1.Visible = FalseElseIf Form1.WindowState = 0 ThenVScroll1.Visible = TrueEnd IfEnd Sub

三、vb中static函数的使用方法?

我感觉这个回答很好. 定义静态变量,相对的用“dim”定义一般变量。 如果是定义静态变量的话,当事件结束后,变量的值依然是保存了过程结束时的值。

譬如: 动态变量的话:

PrivateSubCommand1_Click() DimnAsInteger n=n+1 Printn EndSub (每次进入的时候n的值都刷新为0,所以每次打印的结果都是1)

如果是静态变量的话:

PrivateSubCommand1_Click() StaticnAsInteger n=n+1 Printn EndSub (每次完成单击事件后,值被保存了,所以每次打印的结果都增加1)

四、vb中case函数的使用方法?

vb中case 函数是聚合函数的一种,为统计函数。

case表达式:

CASE selector

WHEN value1 THEN action1;

WHEN value2 THEN action2;

WHEN value3 THEN action3。

Case具有两种格式:简单Case函数和Case搜索函数。

需要注意的是,Case函数只返回第一个符合条件的值,剩下的Case部分将会被自动忽略。

五、vb中choose函数的使用方法?

Choose函数从参数列表中选择并返回一个值。语法Choose(index,choice-1[,choice-2,...[,choice-n]])

index必要参数,数值表达式或字段,它的运算结果是一个数值,且界于1和可选择的项目数之间。choice必要参数,Variant表达式,包含可选择项目的其中之一。说明Choose会根据index的值来返回选择项列表中的某个值。如果index是1,则Choose会返回列表中的第1个选择项。如果index是2,则会返回列表中的第2个选择项,以此类推。可以使用Choose来查阅一个列表中的项目。例如,如果index所指定的值为3,而choice-1="one"、choice-2="two"、且choice-3="three",那么Choose将返回"three"。当index代表一选项组中的值时,则这项功能将会特别有用。即使它只返回一个选项值,Choose仍然会计算列表中的每个选择项。所以应该注意到这项副作用。

六、vb6中Edit使用方法?

先下载一个软件DosBox,将软件安装好后,把edit.com复制到D盘,然后打开DosBox,出现一个跟cmd类似的程序,在里面输入mount c D:\后按回车,再输入C:\后按回车,再输入edit.com后按回车,就可以运行cmd里的edit操作界面,不过只能编辑D盘里面的文件,你可以将要编辑的文件在打开DosBox之前复制到D盘再打开DosBox。

七、vb中len函数的使用方法及实例?

LEN函数是返回文本串的字符数。

LENB返回文本串中所有字符的字节数。

语法:LEN(text)或LENB(text)

注意:此函数用于双字节字符,且空格也将作为字符进行统计。

实例1:如果A1=我爱编程,则公式“=LEN(A1)”返回4。

if len(a)=0 then ...

用于判断a变量的长度是否为0。

假设a是字符串变量,那么上述语句判断字符串变量是否是空串,即""。

假设a是字符串变量,以上语句可以用if a="" then ...来替代。

八、vb6.0中cells函数使用方法?

Cell估计很多人最常见到的场景应该是编写VBA代码。在VBA代码中常用CELLS函数进行单元格的定位。其实,CELL还可以作为函数使用,是一个比较冷门但是有独特作用的函数。它可以用来得到单元格地址、设置类型、文件存储路径等内容。

九、VB中or的用法?

在VB中Or有两种用法:1)在逻辑表达式执行“或"运算。在Or的左右两侧各有一个逻辑表达式,只要两个表达式中有一个为真(True),则整个逻辑表达式为真;换句话说,只有两个逻辑表达式都为假(False),整个逻辑表达式才为假。Dim x As Integer, y As Integer

Dim b As Boolean

x = 1

y = 2

b = (x > 10) Or (y < 10) ' x>10 为假; y<10 为真。因此 b = True

Print b '输出:True

b = (x > 10) Or (y > 10) ' x>10 为假; y>10 为假。因此 b = False

Print b '输出:False2)实现二进制位“或”运算Dim x As Integer, y As Integer, r As Integer

x = 5 'x的二进制表达 0000 0000 0000 0101

y = 10 'y的二进制表达 0000 0000 0000 1010

z = x Or y '位或运算,z的二进制表达 0000 0000 0000 1111,即十进制15

Print z '输出:15

十、VB中的.BAS?

.BAS 是用于VB写标准模块代码的,最好还是用.INI保存..

顶一下
(0)
0%
踩一下
(0)
0%
相关评论
我要评论
点击我更换图片