VB6のTYPE文をVB.NETのStructureに変えるとき
下記VB6のコードをVB.NETのStructureに変える場合
Type kouzou1
i As Integer
j As Integer
a As String * 20
b As String * 50
End Type
を下記にしてみたのですが *20,*50のところは、どのように表現するのでしょうか。
Structure kouzou1
Dim i As Integer
Dim j As Integer
Dim a As String * 20 <- ステートメントの終わりを示してくださいのエラーになる。
Dim b As String * 50 <- ステートメントの終わりを示してくださいのエラーになる。
End Structure
お教え下さい。
No.1ベストアンサー
- 回答日時:
私も詳しくは知らないのですが、以下などを参考にすると、
VBFixedStringAttribute属性を使用するといいようです。
[参考]
http://www.atmarkit.co.jp/fdotnet/vb6tonet2/vbne …
ありがとうございました。
下記でなりました。
Structure kouzou1
Dim i As Integer
Dim j As Integer
<VBFixedString(20)> Dim a As String
<VBFixedString(50)> Dim b As String
End Structure
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/15 15:48
- Visual Basic(VBA) 【前回の続き続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/24 20:49
- Visual Basic(VBA) 【前回の続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/16 16:44
- Excel(エクセル) このコードに追記事項の仕方を教えて下さい。 以下のコード内容に出てくる。セルH3が空白の場合、エラー 4 2023/08/03 00:22
- Excel(エクセル) フォルダ内のワードファイルをPDFに一括変換するVBA 3 2023/06/09 16:51
- Visual Basic(VBA) Excel vbaについての質問 3 2023/04/18 16:14
- Visual Basic(VBA) ExcelVBAに関する質問 3 2023/02/17 10:47
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
String""から型'Double'への変...
-
UserForm1.Showでエラーになり...
-
On ErrorでエラーNoが0
-
マクロで"#N/A"のエラー行を削...
-
お助けください!VBAのファイル...
-
VBでSQL文のUPDATE構文を使った...
-
【Access】Excelインポート時に...
-
Excel vbaについての質問
-
VBAでfunctionを利用しようとし...
-
【VBA】ワークブックを開く時に...
-
実行時エラー 438 の解決策をお...
-
ExecuteNonQueryメソッドの戻り値
-
ActiveCell.FormulaR1C1の変数
-
VB.NETでMessageBoxが表示され...
-
文字列内で括弧を使うには
-
エクセルVBAで今まで使えていた...
-
【VBAエラー】Nextに対するFor...
-
VBA データ(特定値)のある最...
-
Excel VBA のFunctionプロシー...
-
ApplicationとWorksheetFunctio...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
UserForm1.Showでエラーになり...
-
String""から型'Double'への変...
-
VBAでfunctionを利用しようとし...
-
【VBA】ワークブックを開く時に...
-
マクロで"#N/A"のエラー行を削...
-
文字列内で括弧を使うには
-
実行時エラー 438 の解決策をお...
-
On ErrorでエラーNoが0
-
お助けください!VBAのファイル...
-
VBA データ(特定値)のある最...
-
インポート時のエラー「データ...
-
実行時エラー'-2147467259(8000...
-
ACCESSで値を代入できないとは?
-
VB.net 重複チェックがしたいです
-
ActiveCell.FormulaR1C1の変数
-
ApplicationとWorksheetFunctio...
-
「実行時エラー '3167' レコー...
-
【VB.NET】 パワポ操作を非表示で
-
フランスの生年月日(jj/mm/aaaa)
-
【マクロ】 IFERROR関数をマク...
おすすめ情報