快捷导航 上传作品

[VB] VB 输入技巧

[复制链接]
梅雷工具箱发表于 2015-6-25 13:42:27 | 显示全部楼层 |阅读模式
VB 输入技巧


内容 = """"
TEXT1=内容
TEXT1 显示为 "


'【"为特殊】

'/////////////////////////////////////////////////////////////////////
'vb代码 vbCrLf 另起一行
'vb代码 space(n) 空10格

Text3=Text1 & space(10) & Text2


模架参数 = Text1 & vbCrLf & Text2 &  _
vbCrLf & Text3 & vbCrLf & Text4

'两者效果一样

模架参数 = Text1 & vbCrLf & Text2 & vbCrLf & Text3 & vbCrLf & Text4

'/////////////////////////////////////////////////////////////////////


vbCrLf  '另起一行[回车]
Chr(10) '空格


Dim 内容, 内容1, 内容2, 内容3
内容1 = "${UGII_BASE_DIR}\NX_WG_ML_GJX\ml\men_xu"
内容2 = "${UGII_BASE_DIR}\NX_WG_ML_GJX\ml\tbr_shi"
内容3 = "${UGII_BASE_DIR}\NX_WG_ML_GJX\ml\tbr_xu"
内容 = 内容 & 内容1 & vbCrLf
内容 = 内容 & 内容2 & vbCrLf
内容 = 内容 & 内容3




End 结束程序运行
Stop 暂停程序执行进入中断模式
Goto 无条件转移
If then else 根据条件选择执行某一分支语句块
Select case 情况选择控制,选择执行某一语句块
Do…loop 循环控制
While wend 循环控制
For…next 计数循环控制
Exit for\exit do 退出循环控件  




_____________________________________________________________________________ _

中磊UG二次开发教程 梅雷著 qq1821117007
学UG就上UG网 http://www.9sug.com/
就上UG网淘宝直营店
回复

使用道具 评分 举报

您需要登录后才可以回帖 登录 | 注册UG网

本版积分规则