あまたとある、VBサンプルについて への返答
投稿で使用できる特殊コードの説明。(別タブで開きます。)
以下の返答は逆順(新しい順)に並んでいます。
投稿者 ぼく  (小学生)
投稿日時
2008/10/17 22:10:30
コピーすれば、数十万個のサンプルを自由に貼り付けれます。
例えば、オンラインhelpで"円"を検索します。
事務的な円グラフ作成とかに役にたちますよね。
円だけでも、数100以上のサンプルが見れます。
使いたいコードはコピーしてBASICに貼り付けるだけです。
例
こんな感じのサンプルとか。
Option Strict On
Public Class Form1
'スイカ
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Dim blackPen As New Pen(Color.Black, 3)
' Create coordinates of rectangle to bound ellipse.
Dim x As Single = 0.0F
Dim y As Single = 0.0F
Dim width As Single = 100.0F
Dim height As Single = 100.0F
' Create start and sweep angles on ellipse.
Dim startAngle As Single = 0.0F
Dim sweepAngle As Single = 180.0F
' Draw arc to screen.
e.Graphics.DrawArc(blackPen, x, y, width, height, startAngle, _
sweepAngle)
e.Graphics.DrawLine(Pens.Black, 0, 50, 100, 50)
End Sub
End Class
例えば、オンラインhelpで"円"を検索します。
事務的な円グラフ作成とかに役にたちますよね。
円だけでも、数100以上のサンプルが見れます。
使いたいコードはコピーしてBASICに貼り付けるだけです。
例
こんな感じのサンプルとか。
Option Strict On
Public Class Form1
'スイカ
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Dim blackPen As New Pen(Color.Black, 3)
' Create coordinates of rectangle to bound ellipse.
Dim x As Single = 0.0F
Dim y As Single = 0.0F
Dim width As Single = 100.0F
Dim height As Single = 100.0F
' Create start and sweep angles on ellipse.
Dim startAngle As Single = 0.0F
Dim sweepAngle As Single = 180.0F
' Draw arc to screen.
e.Graphics.DrawArc(blackPen, x, y, width, height, startAngle, _
sweepAngle)
e.Graphics.DrawLine(Pens.Black, 0, 50, 100, 50)
End Sub
End Class
投稿者 ぼく  (小学生)
投稿日時
2008/10/17 19:31:41
追加
ソースコードの取り込み方
1 マウスの左クリックを押したままソースを移動
2 コピーを使う
3 メモ帳を開き、そこに貼り付ける
4 テキスト(保存)にする、必要な情報をVisualBasicで貼り付けて使用する。
短いコードはこのやり方が楽です。
長いオンラインヘルプは、プリンターで印刷したほうが良いですね。
公文式の手書き写しは厳しいです。
指に豆ダコができます。
ソースコードの取り込み方
1 マウスの左クリックを押したままソースを移動
2 コピーを使う
3 メモ帳を開き、そこに貼り付ける
4 テキスト(保存)にする、必要な情報をVisualBasicで貼り付けて使用する。
短いコードはこのやり方が楽です。
長いオンラインヘルプは、プリンターで印刷したほうが良いですね。
公文式の手書き写しは厳しいです。
指に豆ダコができます。
投稿者 ぼく  (小学生)
投稿日時
2008/10/17 19:13:27
VisualBasic
サンプルは、山ほどある。
古いのもあるので注意も必要。
例(2005)
マイクロソフトサンプルのインベーダーgame公開(初心者用)
クルセイダーgame(初心者用)
テニスゲーム等
VBテクニックサンプル101個
普通のオンラインhelp(数十万個の例)←上級者の物は難しい。
売られている本
例
2005(5種類以上)
2008無料版対応(5種類以上)
いろいろな本屋をまわると良いです。
gameを作って遊びたいなら、SCCのgame作りで遊ぶがある
この本はoption strict offだが・・・
サンプルは、山ほどある。
古いのもあるので注意も必要。
例(2005)
マイクロソフトサンプルのインベーダーgame公開(初心者用)
クルセイダーgame(初心者用)
テニスゲーム等
VBテクニックサンプル101個
普通のオンラインhelp(数十万個の例)←上級者の物は難しい。
売られている本
例
2005(5種類以上)
2008無料版対応(5種類以上)
いろいろな本屋をまわると良いです。
gameを作って遊びたいなら、SCCのgame作りで遊ぶがある
この本はoption strict offだが・・・
投稿者 あ  (学生)
投稿日時
2008/10/17 09:22:19
そう言えばVisual Basic中学校さんでは識者からの投稿プログラムが
ソースコード付きで公開されていましたね。
http://homepage1.nifty.com/rucio/main/Toukou/Index_tou.htm
ソースコード付きで公開されていましたね。
http://homepage1.nifty.com/rucio/main/Toukou/Index_tou.htm
投稿者 あ  (学生)
投稿日時
2008/10/17 09:19:13
サンプルなんかではなく、生の.NETのソースコードを見てみてはどうでしょう。
http://www.atmarkit.co.jp/fdotnet/insiderseye/20080222sourcecode/sourcecode.html
VS2008の有償版が必要ですが。
http://www.atmarkit.co.jp/fdotnet/insiderseye/20080222sourcecode/sourcecode.html
VS2008の有償版が必要ですが。
投稿者 VBAしかわからんバカ  (社会人)
投稿日時
2008/10/17 08:39:39
ただ単純に自分のパソコンに取り込んで2005で開けるサンプルソフトってどこかで配布されてないかな?
本買って勉強してもモグラたたきとか。基礎勉強として必要なのはわかるが、業務でさくっと使える用に慣れればよい。技能研鑽は2の次と思っています。
インターネットでさがしたけどイマイチ自分では単語がわるいのか引っかかりませんでした。
ポータルサイトとかありそうですが、もしご存じなら教えてください。
勉強します
本買って勉強してもモグラたたきとか。基礎勉強として必要なのはわかるが、業務でさくっと使える用に慣れればよい。技能研鑽は2の次と思っています。
インターネットでさがしたけどイマイチ自分では単語がわるいのか引っかかりませんでした。
ポータルサイトとかありそうですが、もしご存じなら教えてください。
勉強します
オンラインhelpが見れない人に関して。
basicをアンインストールしてください。
アンインストールできない人は、ウイルス汚染の可能性があります。
ハードディスクを1~3回洗浄してから再SetUpが必要です。
修理屋のほうが安全だと思いますが。
明らかにBasicがオカシイと思う人。と言うことです。
ぼくのパソはkeyDownの処理が変でしたが、basicの再インストールで直りました。
では。