下载此文档

VB2005记事本.doc

文档分类：IT计算机 | 页数：约6页举报非法文档有奖

1/6

下载提示

1.该资料是网友上传的，本站提供全文预览，预览什么样，下载就什么样。
2.下载该文档所得收入归上传者、原创者。
3.下载的文档，不会出现我们的网址水印。

同意并开始全文预览

(约 1-6 秒)

1/6 下载此文档

文档列表 文档介绍

Public Class Form1
Dim filename As String
Dim a As Integer
Private Sub NewNToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles ,
'新建
= ""
End Sub
Private Sub OpenOToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles ,
'打开
Dim open As New OpenFileDialog
If = Then
(, )
filename =
End If
End Sub
Private Sub SaveSToolStripMenuItem_Click(ByVal sender As , ByVal e As ) Handles ,
'保存
If filename = "" Then
Dim save As New SaveFileDialog
If = Then
(, )
filename =
End If
Else
(filename, )
End If
End Sub
Private Sub SaveAsAToolStripMenuItem_Click(ByVal sender As ,
ByVal e As ) Handles
'另存为
Dim save As New SaveFileDialog
If = Then
(s

VB2005记事本来自淘豆网m.daumloan.com转载请标明出处.