Private Sub mnuSave_Click() If dlgCommon.FileName = "" Then dlgCommon.ShowSave End If If dlgCommon.FileName <> "" Then rtbEditor.SaveFile dlgCommon.FileName, rtfText End If End Sub
Private Sub btnSetAlarm_Click() If tmrAlarm.Enabled = False Then alarmTime = dtpAlarm.Value tmrAlarm.Enabled = True MsgBox "Alarm set for " & Format(alarmTime, "hh:mm") End If End Sub visual basic 6.0 projects with source code
Here are some interesting VB6 projects with source code: Private Sub mnuSave_Click() If dlgCommon
The IDE threw him into the code window. This was the part he secretly loved. While modern code was sleek, efficient, and often impersonal, Visual Basic 6.0 source code felt like reading a diary. It was verbose. It was human. "" Then rtbEditor.SaveFile dlgCommon.FileName