[表示 : 全て 最新50 1-99 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 2chのread.cgiへ]
Update time : 06/22 15:05 / Filesize : 273 KB / Number-of Response : 1002
[このスレッドの書き込みを削除する]
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧] [類似スレッド一覧]


↑キャッシュ検索、類似スレ動作を修正しました、ご迷惑をお掛けしました

VB.NET質問スレ (Part7)



1 名前:デフォルトの名無しさん [04/10/02 11:10:17]
VB.NETの質問全般です

過去スレ
VB.NET質問スレ (Part6)
pc5.2ch.net/test/read.cgi/tech/1088812165/
VB.NET質問スレ (Part5)
pc5.2ch.net/test/read.cgi/tech/1078134703/
VB.NET質問スレ (Part4)
pc2.2ch.net/test/read.cgi/tech/1065269043/
【老若】VB.net質問スレ【男女】 (Part3)
pc2.2ch.net/test/read.cgi/tech/1056281084/
【老若】VB.net質問スレ【男女】 (Part2)
pc2.2ch.net/tech/kako/1043/10436/1043629429.html
【老若】VB.net質問スレ【男女】
pc2.2ch.net/tech/kako/1025/10258/1025848458.html


962 名前:デフォルトの名無しさん mailto:sage [04/12/07 21:35:53]
Public Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim num As Integer

If num = 0 Then
num = 1
Else
num = 0

End If
MsgBox(num)

無理でした、MsgBoxに1しか出ません!

963 名前:デフォルトの名無しさん [04/12/07 21:42:45]
最近vb.net始めました。2つの質問です。お願いします。

(1)テキストファイルの指定行の値を変更するのに、

  ファイルの全部を読み出して配列に格納。
  変更したい行に相当する配列を変更
  配列を for で、vbcrlfを & して結合
  ファイルを元のファイルに書き出し

という手順でやっています。
でも何かもっといいやり方がありそうな気がして成りません。
もっといい方法はないのでしょうか。


(2)コンマで区切られた文字列を配列に格納するやりかたで、

str_ary(3)="1,2,3"
みたいにしたら
str_ary(0)←1 str_ary(1)←2 str_ary(2)←3
とコンマで区切られた文字列が自動的に配列に格納されるやり方を
どこかで見たような気がするのですが、見あたらなくなりました。
(もちろん上のやり方ではうまくいきません)
そのような方法がありましたらどうぞご教示願います。


   

964 名前:デフォルトの名無しさん mailto:sage [04/12/07 21:42:52]
Dim numをクラスのPublicだと思う

965 名前:デフォルトの名無しさん mailto:sage [04/12/07 21:43:45]
バカすぎ。

966 名前:デフォルトの名無しさん [04/12/07 21:44:47]
Public num As Integer

private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click


If num = 0 Then
num = 1
Else
num = 0

End If
MsgBox(num)


967 名前:デフォルトの名無しさん mailto:sage [04/12/07 22:06:19]
Ifの中にIfを書くことは不可能ですか?

968 名前:デフォルトの名無しさん mailto:sage [04/12/07 22:07:48]
可能

969 名前:デフォルトの名無しさん mailto:sage [04/12/07 22:08:07]
絶妙に意味不明です。
ていうか取りあえず試そうよ。

970 名前:デフォルトの名無しさん mailto:sage [04/12/07 22:23:15]
>>958
一文字しか処理してないから。

.NET的にエレガントに書くとこんな感じかね。
Dim i As Integer, re As String = "", c As Char
For Each c In Text1.Text
   re += Chr(Convert.ToInt32(c) - Integer.Parse(Text2.Text)).ToString()
Next
Text3.Text = re



971 名前:デフォルトの名無しさん mailto:sage [04/12/07 22:27:58]
StringBuilder使えよ

972 名前:967 [04/12/07 22:36:24]
>>968-969
Endifが無かっただけでした・・・。

973 名前:デフォルトの名無しさん mailto:sage [04/12/07 22:40:35]
>967
iiff

974 名前:デフォルトの名無しさん mailto:sage [04/12/07 22:51:09]
>>973
エレガントだ。(w

975 名前:デフォルトの名無しさん [04/12/07 22:57:28]
そろそろ1000取り

976 名前:963 mailto:sage [04/12/07 23:53:43]
>>971さん
それは私(>>963)に対するレスですね?
ちょいと調べてみます。
ありがとうございます。


977 名前:デフォルトの名無しさん [04/12/08 11:46:52]
すみません、VB自体の質問ではないのですが

PC98で動かしてたベーシックのプログラムは
VBで動かすことは可能なのでしょうか?

978 名前:デフォルトの名無しさん mailto:sage [04/12/08 11:48:21]
>>977
N88Basicね。
部分的に流用するぐらいならなんとか可能だけど
そのまんまは無理だよ。

979 名前:デフォルトの名無しさん mailto:sage [04/12/08 11:56:19]
>>978
レスありがとうございます

そうなのですか
父がN88Basicで作ったプログラムをPC98を使用していて、古くていよいよ壊れそうなので
移植できるならVBでも買ってあげようかなと思いまして

980 名前:デフォルトの名無しさん mailto:sage [04/12/08 12:01:41]
>>979
PC98エミュレータとかなかったっけ?



981 名前:デフォルトの名無しさん mailto:sage [04/12/08 12:02:26]
つかN88BasicのWindows用インタプリタがなかったっけ?

982 名前:デフォルトの名無しさん [04/12/08 12:06:16]
DataGridに関する質問です。
VB.netでDataGridにデータを表示するのに、DataSetを作成して、
そいつをSetDataBindingでDataGridに表示しています。

そのGridについて、列幅や列ヘッダ名称をDataGridTextBoxColumn、
GridColumnStylesを利用して設定し、TableStyles.Addとしているの
ですが、表示が変わらずにDataSetの項目名が列ヘッダーに表示
されたままです。

変更するにはどうすればよいのでしょうか

983 名前:デフォルトの名無しさん mailto:sage [04/12/08 12:43:22]
>981
ある。普通にググれば見つかるはず。

984 名前:デフォルトの名無しさん mailto:sage [04/12/08 12:44:40]
>982
HeaderTextは設定しているの?

985 名前:デフォルトの名無しさん [04/12/08 12:45:09]
vb.netで同じLAN内でファイル転送をしたいのですが全く分かりません。教えてください。

986 名前:デフォルトの名無しさん mailto:sage [04/12/08 12:50:44]
>985
ファイルコピーすれば?

987 名前:デフォルトの名無しさん mailto:sage [04/12/08 12:51:35]
>985
System.IOクラスでファイル操作は色々できる。

988 名前:デフォルトの名無しさん [04/12/08 13:06:10]
>984

989 名前:デフォルトの名無しさん [04/12/08 13:06:41]
>984
下記のように設定しています。
Dim TSAuthors As New DataGridTableStyle
TSAuthors.MappingName = "Authors"

Dim TCFirstName As New DataGridTextBoxColumn
TCFirstName.MappingName = "PROJECT_CODE"
TCFirstName.HeaderText = "First Name"
TCFirstName.Width = 120
TSAuthors.GridColumnStyles.Add(TCFirstName)

grdProject.TableStyles.Add(TSAuthors)

990 名前:デフォルトの名無しさん mailto:sage [04/12/08 13:10:06]
>989
これでヘッダに「First Name」って出ないの?



991 名前:デフォルトの名無しさん mailto:sage [04/12/08 13:11:40]
>989
よさそうだけどな。DataGridの概要のページのサンプルがあるから
比較してみたら?

992 名前:デフォルトの名無しさん mailto:sage [04/12/08 13:36:26]
次スレは?

993 名前:デフォルトの名無しさん mailto:sage [04/12/08 13:56:27]
>>992
次スレ
pc5.2ch.net/test/read.cgi/tech/1065535118/

994 名前:デフォルトの名無しさん [04/12/08 17:44:09]
Part8まーだー? C#に行こうかな

995 名前:デフォルトの名無しさん mailto:sage [04/12/08 22:46:05]
VB.NET質問スレ (Part8)
pc5.2ch.net/test/read.cgi/tech/1102512868/

次スレ

996 名前:デフォルトの名無しさん [04/12/08 23:38:04]
982=989です。

DataSetをBindした後、下記のようにDataGridTableStyleと
マッピングさせたらうまく行きました。

Dim dt As DataTable = dsPrjList.Tables(0)
Dim DGTS As New DataGridTableStyle
DGTS.MappingName = dt.TableName


997 名前:デフォルトの名無しさん mailto:sage [04/12/09 00:08:46]
なんか、開始押すといきなりフリーズするんだが。。
原因不明で、やっぱこういうときってやり直すべきなのだろうか


998 名前:デフォルトの名無しさん mailto:sage [04/12/09 00:13:49]
そうしたいんならそうすれば。

999 名前:デフォルトの名無しさん [04/12/09 00:26:12]
銀河鉄道

1000 名前:デフォルトの名無しさん mailto:sage [04/12/09 00:35:39]
の夜。



1001 名前:1001 [Over 1000 Thread]
このスレッドは1000を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。






[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

前100 次100 最新50 [ このスレをブックマーク! 携帯に送る ] 2chのread.cgiへ
[+板 最近立ったスレ&熱いスレ一覧 : +板 最近立ったスレ/記者別一覧]( ´∀`)<273KB

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef