|
Create Visual
Basic .Net Module - Module1.vb
|
Create Module
On the View
menu , click Solution Explorer
In Solution
Explorer,
right click the
work_VBNet, select
Add on the shortcut menu to open other shortcut menu,
click Add New Item, the Add New Item -
work_VBNet dialog box appears. |
 |
In the Add New Item -work_VBNet dialog box:
In the
Categories pane, select Local Project
Items
In the Templates
pane, select Module icon . A message appears
- (A file for storing groups of functions).
In the Name
box, type Module1.vb
Click Open, in
the Solution Explorer display new item -
Module1.vb
|
 |
|
|
Set new Startup object -
Sub Main
- On the
Project menu , click work_VBNet Properties
..., the work_VBNet Property Pages dialog box
appears
- In the Startup
object combo box, choose and select
Sub
Main
- Click
OK
| |
|
Module1.vb file, the codes
...
The
text
Code
is red color, the codes added manuel |
|
Module
Module1
Public
fagenda As New
agenda
Public
fagenda_appoint As New
agenda_appoint
Public
fagenda_task As New
agenda_task
Public
faganda_time As New
aganda_time
Public
fbooknote As New
book_note
Public
Title As String
= "work VB net, Message"
Public
Active_Flag As Boolean
Public
mang_Flag As Boolean
Public
current_form As String
Public
current_path As String
Public
agenda_desc As String
Public
task_type As String
Public
task_flag As Boolean
Public
task_prirority As String
Public
task_order As Integer
Public
appoint_type As String
Public
appoint_time As String
Public
appoint_date As Date
Public
appoint_flag As Boolean
Public
appoint_full As Boolean
Public
appoint_bookid As String
Public
time_flag As Boolean
Public
booknote_type As String
Public
book_recno As Integer
Sub
Main()
' Instantiate a
new instance of Form.
Dim
fMain As New
mainform
' Show the
instance of the form modally.
fMain.ShowDialog()
End Sub
End
Module | | |
|
|