Visual Basic Programming
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
User Name:
Password:
Remember me
Go Back   Dev Shed ForumsProgramming Languages - MoreVisual Basic Programming

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread Dev Shed Forums Sponsor:
Stay one step ahead of the competition. Evaluate and give feedback on some of the hottest web development tools on the market today. Make your opinion heard! Click Here
  #1  
Old November 11th, 2003, 09:16 PM
jsKid's Avatar
jsKid jsKid is offline
Application is what Divides Us
Dev Shed Regular (2000 - 2499 posts)
 
Join Date: Dec 2002
Location: Titusville, FL
Posts: 2,145 jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level) 
Time spent in forums: 2 Weeks 2 Days 3 h 48 m 44 sec
Reputation Power: 51
Send a message via AIM to jsKid Send a message via MSN to jsKid
MySpace
how to apply a finished vb code i found...

PHP Code:
Private Sub Form1_Load(sender As ObjectAs EventArgsHandles MyBase.Load

Dim Fonts 
As New InstalledFontCollection()
Dim Family As FontFamily
For Each Family In Fonts.Families
  lstFonts
.Items.Add(Family.Name)
Next

Dim i 
As Integer
For 10 To 100
  lstSize
.Items.Add(i)
Next

  lstSize
.Text "50"
End Sub

Private Sub lstSize_SelectedIndexChanged(sender As ObjectAs Event ArgsHandles lstSize.SelectedIndexChanged

Me
.Invalidate()
End Sub

Private Sub Form1_Paint(sender As ObjectAs PaintEventArgsHandles MyBase.Paint

If lstFonts.SelectedIndex <> -1 Then
  
Try
      
e.Graphics.DrawString(lstFonts.Text, New Font(lstFonts.TextVal(lstSize.Text)), Brushes.Black1050)
      
StatusBar.Panels(0).Text ""

  
Catch err As Exception
   
' An error may occur if the font does not support the default normal style.
      StatusBar.Panels(0).Text = err.Message
  End Try
End If
End Sub 


any ideas how to apply this font viewing code...
__________________
Download [ Fx | Op ] Validate [ Markup | Css ]

Reply With Quote
  #2  
Old November 11th, 2003, 11:11 PM
Fisherman's Avatar
Fisherman Fisherman is offline
Inherits Programmer.Slacker
Dev Shed Regular (2000 - 2499 posts)
 
Join Date: Aug 2003
Location: Between my Id and your Ego
Posts: 2,171 Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level) 
Time spent in forums: 1 Week 1 Day 9 h 1 m 37 sec
Reputation Power: 110
Send a message via ICQ to Fisherman Send a message via AIM to Fisherman
well, this code was written in VB.NET. You could apply it by calling it against an object (like a table or a label, textbox...etc) by using the object name as the "sender" in the sub declaration. I'm not sure, however, whether it will work without an Aspx webform of some language.
__________________
Fisherman

"Any intelligent fool can make things bigger, more complex, and more violent. It takes a touch of genius -- and a lot of courage -- to move in the opposite direction." - A.Einstein

Reply With Quote
  #3  
Old November 12th, 2003, 01:26 PM
jsKid's Avatar
jsKid jsKid is offline
Application is what Divides Us
Dev Shed Regular (2000 - 2499 posts)
 
Join Date: Dec 2002
Location: Titusville, FL
Posts: 2,145 jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level) 
Time spent in forums: 2 Weeks 2 Days 3 h 48 m 44 sec
Reputation Power: 51
Send a message via AIM to jsKid Send a message via MSN to jsKid
MySpace
okay..

do you mean, make a form in a visual basic editor, or an HTML form?

I am limited to Microsoft Visual Basic Editor that comes on Windows 2000/NT

Reply With Quote
  #4  
Old November 12th, 2003, 10:46 PM
Fisherman's Avatar
Fisherman Fisherman is offline
Inherits Programmer.Slacker
Dev Shed Regular (2000 - 2499 posts)
 
Join Date: Aug 2003
Location: Between my Id and your Ego
Posts: 2,171 Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level)Fisherman User rank is First Lieutenant (10000 - 20000 Reputation Level) 
Time spent in forums: 1 Week 1 Day 9 h 1 m 37 sec
Reputation Power: 110
Send a message via ICQ to Fisherman Send a message via AIM to Fisherman
oh... well, forms in ASP.Net take on a whole new meaning. You no longer have HTML forms mixed in with server-side code mixed in with server.execute's and whatever else. Aspx pages have forms as a separate entity, from which a "code behind" page inherits it's events. In a sense, it's just like looking in the Visual Basic 6 IDE, where you have a form, and then the code that is associate with that form. The skinny is, I don't know how you could incorporate .NET code into an HTML or regular .asp file, short of compiling it into a dll, and then including that dll in your asp header.

Reply With Quote
  #5  
Old November 13th, 2003, 07:13 PM
jsKid's Avatar
jsKid jsKid is offline
Application is what Divides Us
Dev Shed Regular (2000 - 2499 posts)
 
Join Date: Dec 2002
Location: Titusville, FL
Posts: 2,145 jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level)jsKid User rank is Sergeant Major (2000 - 5000 Reputation Level) 
Time spent in forums: 2 Weeks 2 Days 3 h 48 m 44 sec
Reputation Power: 51
Send a message via AIM to jsKid Send a message via MSN to jsKid
MySpace
oh... okay.

thanks... really, I mean that.. i didn't understand how to incorporate the script into an HTML page and I don't know asp to a far enough extent for it to work...

anyways, thanks again...

Reply With Quote
Reply

Viewing: Dev Shed ForumsProgramming Languages - MoreVisual Basic Programming > how to apply a finished vb code i found...


Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump


Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 





© 2003-2008 by Developer Shed. All rights reserved. DS Cluster 3 hosted by Hostway