![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?8acaa2e)
Q1
VB始めたばかりの超初心者です。クイズゲームを作成したく、構造体を用意したいのですが、同じ構造体を100個用意したい場合どのように宣言するのでしょうか?
Public Type mondai_REC
Question As String * 100
choice(5) As String * 30
justness(3) As Byte
End Type
↑の構造体を100個用意したいのです。
また100個用意して、その中のchoice()を参照したい場合どのように使うのでしょうか?
Q2
テキストファイルを読み込み、この構造体に格納したいと考えてます。ファイルをオープン・クローズドする、任意の文字(たとえば”。”)がみつかめまで読み込むなど、固定長でない文字列の入ったファイルを読み込むのに便利な関数を教えてください。
よろしくお願いいたします。
No.1ベストアンサー
- 回答日時:
Q1
dim mondais(100) as mondai_REC
mondais(0).choice(0) = "mondai"
Q2
「ファイル読み込み時に、特定の文字が見つかるまで読み込む」
という形式はVBでは向いていません。
VBはCのようにポインタを当ててその構造体のまま
格納することは(たぶん)出来ません。
ファイルの形式を決め
それにそって全て読み込み
それから識別して必要な情報を格納するしかないかと思われます。
>>固定長でない文字列の入ったファイルを読み込むのに便利な関数
line input が良いかと思います。
それからinstrなど使って任意の文字で区切れば良いかと思います。
参考URL:http://homepage2.nifty.com/sak/w_sak3/doc/sysbrd …
No.2
- 回答日時:
Q1についてはお答えがあがっているので、Q2について補足します。
ファイル全体を読み込んだ後、任意の文字(たとえば”。”)でsplitして配列に格納すれば区切り文字単位で文字列が格納された配列が出来ます。
(例)ファイル全体をstrに読み込んだとして…
str = "あいうえお。かきくけこ。さしすせそ。"
Dim rows() as String
rows = split(str,"。")
rows(0)→"あいうえお"
rows(1)→"かきくけこ"
rows(2)→"さしすせそ"
となります。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルのVBAについて とあるサイトのコードを参考に、CSVの文字化けを直すVBAを作成しているの 7 2022/11/04 14:15
- C言語・C++・C# c言語の問題です 2 2023/07/21 10:51
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/07/15 15:12
- C言語・C++・C# このプログラミング誰か教えてくれませんか 3 2022/05/13 17:27
- 大学受験 英語の勉強で読み込みをしています。その読み込む前に別のプリントに構文をふって、文全体がどのような構造 4 2022/07/31 21:10
- C言語・C++・C# C言語 2 2022/07/21 00:02
- Visual Basic(VBA) 【VBA】写真の縦横比を変えずに貼り付ける 5 2023/06/13 11:42
- C言語・C++・C# このプログラミング誰か教えてくれませんか 2 2022/05/14 09:45
- その他(プログラミング・Web制作) pythonでクラスで複数のメソッドを利用する方法 2 2022/04/15 04:17
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Cで2次元配列にCSVファイルを...
-
VBAでテキストファイルを複数開...
-
テキストファイルを後ろから読...
-
DXFファイルをVBで取り込み、図...
-
VBAでテキストファイルの改行を...
-
ファイル入力のデータを構造体...
-
ファイルをメモリに出力する方法
-
ファイル読み込みと構造体について
-
隣接行列プログラム
-
VBScriptの配列は、要素数を指...
-
ファイルのアクセス回数について
-
エクセルvbaでdocuworksprinter...
-
phpに関わる所での、form actio...
-
エクセルのプロパティーでセキ...
-
カンマ区切りのCSVファイルから...
-
バッチファイル 二つ上のディ...
-
エクセルで複数のコメントのサ...
-
VBA 最新のフォルダ取得
-
Excel csv保存 列数が異なる場...
-
エクセルVBAで開いているファイ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
DXFファイルをVBで取り込み、図...
-
バイト型のデータを16進表記で...
-
VBAでテキストファイルの改行を...
-
Cで2次元配列にCSVファイルを...
-
VBAでテキストファイルを複数開...
-
バイナリファイルでOutOfMemory...
-
テキストファイルを後ろから読...
-
[VBS] 16進数でバイナリファイ...
-
バイナリ読み込み時のデータ受...
-
ファイル入力のデータを構造体...
-
RGBのバイナリデータをCImageに...
-
VBでLOOKUP機能
-
Excel VBAで画像解析
-
バイナリ出力
-
VBScriptの配列は、要素数を指...
-
perl 特定の文字列をdatファイ...
-
バイナリファイルの一部分をカ...
-
awk getlineをもう一度ファイル...
-
CSVファイルによる検索の高速化
-
ファイル内の(&H0A)を(&H0D0A)...
おすすめ情報