「VB6」の版間の差分
ナビゲーションに移動
検索に移動
(ページの作成:「==Visual Basic 6.0== {{amazon|4881357077}} 思えばVBの本いっぱい買ったなぁ。この本が最良。 ==文法== *[http://www.cs.cmu.edu/~bam/uicourse/630sp…」) |
|||
| (同じ利用者による、間の5版が非表示) | |||
| 1行目: | 1行目: | ||
| + | {{amazon|4881357077}} | ||
| + | [[Excel VBA]] | ||
==Visual Basic 6.0== | ==Visual Basic 6.0== | ||
| − | |||
思えばVBの本いっぱい買ったなぁ。この本が最良。 | 思えばVBの本いっぱい買ったなぁ。この本が最良。 | ||
| + | |||
==文法== | ==文法== | ||
*[http://www.cs.cmu.edu/~bam/uicourse/630spring04/VB_quick_reference.htm Quick Reference] | *[http://www.cs.cmu.edu/~bam/uicourse/630spring04/VB_quick_reference.htm Quick Reference] | ||
| + | ===配列=== | ||
| + | <pre> | ||
| + | Dim text(0 to 5) as String 'index 0 - 5 の配列 | ||
| + | </pre> | ||
| + | |||
===制御構文=== | ===制御構文=== | ||
====If..Then..Else==== | ====If..Then..Else==== | ||
| − | If A | + | If A>5 Then Print "A is a bit number!" |
====For...Next - Loops ==== | ====For...Next - Loops ==== | ||
For i = 1 to 5 | For i = 1 to 5 | ||
| 15行目: | 22行目: | ||
Next X | Next X | ||
====While...Wend==== | ====While...Wend==== | ||
| − | While i | + | While i < 5 |
i = i +1 | i = i +1 | ||
Wend | Wend | ||
| 24行目: | 31行目: | ||
End select | End select | ||
====Do...Loop==== | ====Do...Loop==== | ||
| − | Do while i | + | Do while i < 5 |
i = i + 1 | i = i + 1 | ||
Loop | Loop | ||
| 38行目: | 45行目: | ||
====Stop==== | ====Stop==== | ||
Stop | Stop | ||
| − | |||
===TIPS=== | ===TIPS=== | ||
| − | *VB ファイルを読む | + | *[[VB ファイルを読む]] |
| − | *Perl VBのプロパティプロシージャを生成 | + | *[[Perl VBのプロパティプロシージャを生成]] |
| − | *VB 有効期間に含まれるデータを判定 | + | *[[VB 有効期間に含まれるデータを判定]] |
| − | ===Excel VBA=== | + | ===[[Excel VBA]]=== |
| − | *Excel VBA | + | *[[Excel VBA]] |
| + | |||
| + | [[category:プログラミング言語]] | ||
2021年11月27日 (土) 14:48時点における最新版
目次
Visual Basic 6.0
思えばVBの本いっぱい買ったなぁ。この本が最良。
文法
配列
Dim text(0 to 5) as String 'index 0 - 5 の配列
制御構文
If..Then..Else
If A>5 Then Print "A is a bit number!"
For...Next - Loops
For i = 1 to 5
print #1, i
next i
For Each ... Next
For Each X in Form1.controls Next X
While...Wend
While i < 5 i = i +1 Wend
Select Case
Select case i Case 1 : print "it was a 1" Case 2 : print "it was a 2" End select
Do...Loop
Do while i < 5 i = i + 1 Loop
Choose
Choose (index, "answer1", "answer2", "answer3")
With
With textbox1 .Height = 100 .Width = 500 End With
End
End
Stop
Stop
TIPS
Excel VBA
© 2006 矢木浩人
