text1text=text2text
then
text3text=text1text
以上代码可以实现您的要求,如果text1以及text2是用来让人手动输入的,请将以上代码放置在text1以及text2的keyup事件中,如果是用来给程序赋值的,请将以上代码放置在text1以及text2的change事件中。希望对您有所帮助!关键是后面的<指示变量或表达式>
示例:
Select Case <指示变量或表达式>
Case <情形1>
<语句组1>
Case <情形2>
<语句组2>
Case <情形n>
<语句组n>
Case Else
<默认语句组,当指示变量不符合以上任何情形时执行>
End Select
实例(根据值处理结果):
Dim i as long
i = 1
Select Case i
Case 1
Print "1"
'执行相应的程序
Case 2
Print "2"
'执行相应的程序
Case Else
Print "未找到对应的处理"
End Select
根据 i 值不同,可以进行不同的处理。根据表达式的值有条件地执行一组语句。
语法:
If condition Then [statements][Else elsestatements]
或者,可以使用块形式的语法:
If condition Then
[statements]
[ElseIf condition-n Then
[elseifstatements]
[Else
[elsestatements]]
End If
IfThenElse 语句的语法具有以下几个部分:
部分描述:
condition 必要参数。一个或多个具有下面两种类型的表达式:
数值表达式或字符串表达式,其运算结果为 True 或 False。如果 condition 为 Null,则 condition 会视为 False。
TypeOf objectname Is objecttype 形式的表达式。其中的 objectname 是任何对象的引用,而 objecttype 则是任何有效的对象类型。如果 objectname 是 objecttype 所指定的一种对象类型,则表达式为 True,否则为False。
statements 在块形式中是可选参数;但是在单行形式中,且没有 Else 子句时,则为必要参数。一条或多条以冒号分开的语句,它们在 condition 为 True 时执行。
condition-n 可选参数。与 condition 同。
elseifstatements 可选参数。一条或多条语句,它们在相关的 condition-n 为 True 时执行。
elsestatements 可选参数。一条或多条语句,它们在前面的 condition 或 condition-n 都不为 True 时执行。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)