変数 可変長文字列と固定長文字列-As_String_*_5

※より実装に近く表示させる為、コードの改行を避けています。スマホ等で閲覧される際は向きを変えてご覧ください。

※実装するバージョンによってはバージョンアップの仕様により動作しないコードもあります。実装には動作確認の上ご使用下さい。

Option Explicit


Sub VariableFixedString()
'*******************************************
'可変長文字列と固定長文字列-As_String_*_5
'*******************************************
'アスタリスク

Dim strST  As String        '可変長文字列宣言
Dim strST3 As String * 3    '固定長文字列宣言(3文字)
Dim strST5 As String * 5    '固定長文字列宣言(5文字)
Dim strST7 As String * 7    '固定長文字列宣言(7文字)

strST = "12345678"
strST3 = strST
strST5 = strST
strST7 = strST

Debug.Print strST
Debug.Print strST3
Debug.Print strST5
Debug.Print strST7

'strST  =12345678
'strST3 =123
'strST5 =12345
'strST7 =1234567

'固定長文字列宣言する場合Stringの後にアスタリスク(*)とその数値を付加する

End Sub

 

 

 

2000年01月01日|[VBサンプルコード]:[変数]