本來設計的表字段是大寫,後來要求用小寫,記錄下;
執行如下指令碼即可,快捷鍵是ctrl+shift+x
大寫轉小寫:
option explicit
validationmode = true
interactivemode = im_batch
dim mdl ' 當前模型
' 獲取當前模型
set mdl = activemodel
if (mdl is nothing) then
msgbox "沒有開啟乙個模型"
elseif not mdl.iskindof(pdpdm.cls_model) then
msgbox "當前模型不是乙個pdm"
else
'呼叫處理程式
processfolder mdl
end if
'呼叫的處理程式
private sub processfolder(folder)
dim tab '要處理的表
for each tab in folder.tables
' if not tab.isshortcut then
' tab.code = tab.name
'表名處理,前邊新增字首,字母小寫
tab.name= lcase(tab.name)
tab.code= lcase(tab.code)
dim col ' 要處理的列
for each col in tab.columns
'列名稱和code全部小寫,大寫詩ucase
col.code= lcase(col.code)
col.name= lcase(col.name)
next
'end if
next
' 處理檢視
' dim view 'running view
' for each view in folder.views
' if not view.isshortcut then
' view.code = view.name
' end if
' next
' 遞迴進入 sub-packages
dim f ' sub folder
for each f in folder.packages
if not f.isshortcut then
processfolder f
end if
next
end sub
小寫轉大寫
option explicit
validationmode = true
interactivemode = im_batch
dim mdl ' 當前模型
' 獲取當前模型
set mdl = activemodel
if (mdl is nothing) then
msgbox "沒有開啟乙個模型"
elseif not mdl.iskindof(pdpdm.cls_model) then
msgbox "當前模型不是乙個pdm"
else
'呼叫處理程式
processfolder mdl
end if
'呼叫的處理程式
private sub processfolder(folder)
dim tab '要處理的表
for each tab in folder.tables
' if not tab.isshortcut then
' tab.code = tab.name
'表名處理,前邊新增字首,字母小寫
tab.name= ucase(tab.name)
tab.code= ucase(tab.code)
dim col ' 要處理的列
for each col in tab.columns
'列名稱和code全部小寫,大寫詩ucase
col.code= ucase(col.code)
col.name= ucase(col.name)
next
'end if
next
' 處理檢視
' dim view 'running view
' for each view in folder.views
' if not view.isshortcut then
' view.code = view.name
' end if
' next
' 遞迴進入 sub-packages
dim f ' sub folder
for each f in folder.packages
if not f.isshortcut then
processfolder f
end if
next
end sub
大小寫轉換
小寫數值轉大寫 xieshuxu 傳入轉換字串 傳入整數單位 如 元 傳入小數點後一位單位 如 角 傳入小數點後兩位單位 如 分 public string xiaotoda string xiao,string one,string two,string tree if xiao.indexof ...
大小寫轉換
problem description x現在要學習英文以及各種稀奇古怪的字元的了。現在他想把一串字元中的小寫字母變成大寫字元,大寫字母變成小寫字母,其他的保持不變。input 輸入有多組。每組輸入乙個字串,長度不大於80,不包含空格。output 輸出轉換後的字串 sample input a b...
大小寫轉換
a b c d這樣的52個字母 包括大寫 在計算機中儲存時也要使用二進位制數來表示。標準ascii碼使用7位二進位制數 剩下的1位二進位制為0 來表示所有的大寫和小寫字母,如下圖所示,可以看出字母對應大小寫的差值為32。來進行大小寫轉換吧。請用程式實現 輸入乙個英文本母char,判斷它是 大寫字母 ...