VB Select Case

最新推荐文章于 2024-01-08 10:54:18 发布
最新推荐文章于 2024-01-08 10:54:18 发布
阅读量1.5k 收藏
点赞数
分类专栏： VB
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/always007/article/details/78582380
版权
Sub gantest()


   rr = 10
    ir = 2
 MsgBox ("OK")
 i = Sheets("Sheet1").Cells(rr, 2).Value
  Select Case Sheets("Sheet1").Cells(rr, 2).Value
Case Is < 50
'Print i
MsgBox ("こちらは設置1のデータ")
Case 50 To 60
'Print i ^ 2
MsgBox (i ^ 2)
'MsgBox (i)
MsgBox ("test2です")
Case Is > 60
'Print "wrong!"
MsgBox ("wrong!")




End Select
End Sub
always007
关注
专栏目录
Select Case 语句(VBA)
04-23 1万+
Select Case testexpression [Case expressionlist-n [statements-n]] ... [Case Else [elsestatements]] End Select
VB中如何使用select case语句
qq_39800695的博客
01-04 8608
近来，在网上找了一些关于VB选择语句的代码样例讲解，不过可惜关于Select case的讲解甚少（可能是查找方向有误），遂，作此，如有不足还望评论去添补 语法 Select Case <指示变量或表达式> Select Case不是循环语句，是条件选择语句，与IF...ELSEIF...ELSEIF...END IF类似 <默认语句组，以上语句组都因情形不符合实际时执...
select case
PHP5的专栏
11-18 837
select match.*,(case when chipset=0 then 甲赢 else 乙赢 end)as chipset,(case when result is null then 未知  when result=0 then 甲赢 else 乙赢 end)as gameresult,(stake.chip+stake.costs) as money from
select case 语句
小蔡哥的专栏
01-04 1271
SELECT ID,       (CASE WHEN tj = 2 THEN -- + FolderName WHEN tj = 3 THEN --- + foldername ELSE foldername       END) AS new_foldername, TS, TN, TJFROM KS_Class 
探讨SQL Server中Case 的不同用法
ξσ Dicky's Blog σξ
04-09 1628
CASE 可能是 SQL 中被误用最多的关键字之一。虽然你可能以前用过这个关键字来创建字段，但是它还具有更多用法。例如，你可以在 WHERE 子句中使用 CASE。 首先让我们看一下 CASE 的语法。在一般的 SELECT 中，其语法如下： SELECT myColumnSpec> = CASE WHEN A> THEN somethingA> WHEN B> THEN somethingB
Select...Case 语句 (Visual Basic)
chinaherolts2008的博客
05-29 1408
根据表达式的值，运行若干组语句中的某一组。 复制 Select [Case] testexpression [Case expressionlist [statements] ] [Case Else [elsestatements] ] End Select 部件 术语 定义 testexpression 必选。 表达式。 计算结果必须为某个基本数据类型（Bo...
可视化编程VB Select Case语句 案例.pdf
10-01
可视化编程VB Select Case语句 案例.pdf
VB6.0 Select Case语句
热门推荐
sessboumaru的博客
09-12 4万+
注明：我也参与了百度百科上『Select Case语句』这一词条的编辑，哼！没过多久语法部分被人改成英文语法，轻微破坏了文章“信达雅”的“达”这一方面，有点郁闷但勉强还能接受吧。 语法 Select Case <指示变量或表达式> Case <情形1> <语句组1> Case <情形2> <语句组2> .... Case <情形n> <语句组n> Case Else <默认语句组，以上语句组都因情形不符合实际时执行
ASP中用select case代替其他语言中的switch case, default用case else
01-20
在ASP (Active Server Pages) 编程中，由于其基于VBScript，不支持像其他一些编程语言（如C#、Java）那样的`switch`语句，而是使用`Select Case`结构来实现类似的功能。`Select Case`语句是一种条件控制结构，它允许...
【转载】理解VB中选择语句Select Case结构的最好例子
欢迎访问,Viola的博客!
12-23 1万+
1.Select Case结构格式：       Select Case e         Case  e1               A组语句         Case  e2              B组语句         ……         Case  Else             n组语句     End Select 2.说明  ?e为测试表达式，可以是算术表达式或字符表
条件语句 Select Case
07-12 4992
Select Case Tim Case 7 to 10 　　msg = "morning" Case 11,12 　 msg = "noon" End Select 摘抄： 本帖最后由 香川群子 于 2015-9-24 22:09 编辑Select Case 语句结构例子如下： Select Case变量 Case 1 ...
select case 语句详解
最新发布
yongshiqq的博客
01-08 3105
Case Else 子句用于指明 elsestatements，当 testexpression 和所有的 Case 子句中的 expressionlist 都不匹配时，则会执行这些语句。其形式为 expression，expression To expression，Is comparisonoperator expression的一个或多个组成的分界列表。如果 testexpression 匹配一个以上的 Case 子句中的 expressionlist 表达式，则只有第一个匹配后面的语句会被执行。
select case 用法
t_y_c的专栏
03-06 4968
判断是否为null: select  case when 字段名  is null  then '自定义值' else 字段名 end as "别名"  from table 判断 int 类型： select  case  when 字段名  = 条件   then 自定义值1  when 字段名  = 条件   then 自定义值
select case语句
yax405的专栏
07-18 623
"select id,name,discount,author,price,type ,image=case when(not Cover is null) then ' varchar(10))+' Border=1 width=80 height=120>' else ' ' end from book where type="+BookTypeId strsql="select t
SELECT CASE 写法
故乡的云
03-03 1229
select case when 1=1 then Y else N end as column_aselect case affasn when 1 then a1 when 2 then a2 else a3 end as column_b
php中的select case
wmnmtm的专栏
12-26 996
在 switch 语句中，条件只求一次，然后和每个 case 比较，而在 elseif 语句中，条件会再次求值。如果你的条件比较复杂，或者是多次循环，用 switch 语句速度会更加快些。 在asp中是这样用的 select case csvalue        case "123"           '执行语句     case "456"     '执行语句 end s...
if……elseif……else……end if 的用法
金炎凤凰
03-10 3011
Public Class Form1     Private Sub btnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnok.Click         If txtName.Text = "1" Then             txtName.Text = "Madras
Select CASE
lou320726的专栏
08-22 558
VB编程：Select Case语句详解及示例
重点介绍了Select Case语句作为多分支结构的一种表示形式，以及赋值语句和数据输入输出的相关知识。" 在VB编程中，控制结构是程序设计的基础，它们决定了代码的执行流程。本章主要涵盖了4个部分：顺序结构、选择...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值