ab.com コミュニティ

ありがとうございます。あれは補完機能の特性なんですね。

Dim AccelTable[10] As ACCEL
With AccelTable[0]
    ～
End With

Dim AccelTable[10] As ACCEL
With AccelTable[0]
    ～
.End With

ご報告ありがとうございます。

[quote="Toshi"]・構造体配列の場合に補完されない
↓こういう場合です。
[code]
Dim AccelTable[10] As ACCEL
With AccelTable[0]
.fVirt=FVIRTKEY or FCONTROL
.key=Asc("N")
.cmd=IDM_NEW
End With

[/code][/quote]

こちらでもWithステートメントに構造体配列を指定したとき、コード補完が正常に働かないバグを確認できました。次回のバージョンアップで修正しますので、今しばらくお待ちください。

[quote="Tosho"]・End Withを記述した行でピリオドを入力しても補完される[/quote]

こちらは、

[code]Dim AccelTable[10] As ACCEL
With AccelTable[0]
～
End With[/code]

などというコードで、

[code]Dim AccelTable[10] As ACCEL
With AccelTable[0]
～
.End With[/code]

と入力した場合にコード補完機能が働いてしまうということを仰っているのでしょうか？？もしそうであれば、コード補完機能の特性であると解釈していただければよいかと思います。

	Dim AccelTable[10] As ACCEL
	With AccelTable[0]
		.fVirt=FVIRTKEY or FCONTROL
		.key=Asc("N")
		.cmd=IDM_NEW
	End With

With - End With内で補完機能が有効になっていることを4.10.00で確認しました。
迅速な対応ありがとうございました。

しばらくそれを使用してみて、少し不具合かも知れない部分がありましたので報告します。

・構造体配列の場合に補完されない
↓こういう場合です。
[code]
Dim AccelTable[10] As ACCEL
With AccelTable[0]
.fVirt=FVIRTKEY or FCONTROL
.key=Asc("N")
.cmd=IDM_NEW
End With

[/code]

・End Withを記述した行でピリオドを入力しても補完される
これはほとんど問題にはならないと思いますけど...