コメント |
フォームは必要なので、VB Express Edition 等の動くマシンで
フォームのテキスト定義だけは作成しておきます。
http://www.microsoft.com/japan/msdn/vstudio/express/maninstall/(2005)
http://www.microsoft.com/japan/msdn/vstudio/express/default.aspx(2008)
http://lightbox.on.coocan.jp/image/dotnet_vb_form.png
@DIV
vbc /t:winexe /main:Form1 /out:input formTest.vb
@END
そして、以下のようなソースを作って↑ビルド。
( この環境で [[vbc.exe]] は、C:\WINNT\Microsoft.NET\Framework\v2.0.50727 )
@C:black(formTest.vb)
@DIV
Public Class Form1
Private Sub Button1_Click( _
ByVal sender As System.Object, _
ByVal e As System.EventArgs _
) Handles Button1.Click
MsgBox(Me.TextBox1.Text)
End Sub
End Class
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form1
Inherits System.Windows.Forms.Form
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
MyBase.Dispose(disposing)
End Sub
Private components As System.ComponentModel.IContainer
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.TextBox1 = New System.Windows.Forms.TextBox
Me.Button1 = New System.Windows.Forms.Button
Me.SuspendLayout()
'
'TextBox1
'
Me.TextBox1.Location = New System.Drawing.Point(62, 37)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(152, 19)
Me.TextBox1.TabIndex = 0
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(104, 71)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(75, 23)
Me.Button1.TabIndex = 1
Me.Button1.Text = "OK"
Me.Button1.UseVisualStyleBackColor = True
'
'Form1
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(292, 117)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.TextBox1)
Me.Name = "Form1"
Me.Text = "Form1"
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
Friend WithEvents Button1 As System.Windows.Forms.Button
End Class
@END
※ <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> 以降は Studio が作成したものをコピー
※ 実行環境には、少なくとも .NET Framework ランタイムがインストールされている必要があります
http://www.microsoft.com/downloads/details.aspx?familyid=FE6F2099-B7B4-4F47-A244-C96D69C35DEC&displaylang=ja |