如何根據多個不同的值生成一個字符串？

我目前正在使用VBA在Excel上開發圖書館系統，我需要一個函數根據標題，作者和日期生成圖書的電話號碼。如何根據多個不同的值生成一個字符串？

這裏是我的編碼

dim title, author, date, callnumber as string 

title = "Book 1" 
title = UCase(title) 
author = "Author 1" 
author = UCase(author) 
date = NOW() 

'i'll need to generate the call number 
callnumber = ............??????????

使用上面的例子中的一個例子，該方案應生成基於作者，題書一個電話號碼和日期。我希望它有「作者」的前3個字母，連字符「 - 」，「標題」的前3個字母，連字符「 - 」和數字中的日期。

例如，如果日期是2011年3月3，產生的電話號碼是：「AUT-TIT-03032011」

對於日期=「2012年2月29日，標題= 「火柴人」，作者= 「約翰李」，生成的值應爲：「[約-THE-29022011」

可有人請幫助我非常感謝

來源

2011-03-16 KHORBS

callnumber = MID(author,1,3)&"-"&MID(title,1,3)&"-"&Format(date, "ddmmyyyy")

來源

2011-03-16 07:32:34

非常感謝它的工作原理？！！ – KHORBS 2011-03-16 07:36:30

如何根據多個不同的值生成一個字符串？

回答

相關問題