Joined
Last Seen
0 Reputation Points
Unknown Quality Score
No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
0 Endorsements
Ranked #107.71K
1 Posted Topic
Public Class Form1 Dim x, y As Integer Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load x = 0 y = 0 cboOpacity.Items.AddRange(New Object() {"100%", "75%", "50%", "25%", "10%"}) cboOpacity.SelectedIndex = 2 Tmp = Application.StartupPath & "\New\" If Not Directory.Exists(Tmp) Then IO.Directory.CreateDirectory(Tmp) End Sub Dim Tmp …
The End.