Click here to Skip to main content
14,979,294 members
Home / Discussions / Visual Basic

Visual Basic

Questiondataset and datareader [modified] Pin
Sonia Gupta6-May-07 17:54
MemberSonia Gupta6-May-07 17:54 
AnswerRe: dataset and datareader Pin
Colin Angus Mackay6-May-07 23:12
MemberColin Angus Mackay6-May-07 23:12 
QuestionRe: dataset and datareader Pin
Sonia Gupta6-May-07 23:46
MemberSonia Gupta6-May-07 23:46 
AnswerRe: dataset and datareader Pin
Guffa7-May-07 0:03
MemberGuffa7-May-07 0:03 
QuestionRe: dataset and datareader [modified] Pin
Sonia Gupta7-May-07 0:25
MemberSonia Gupta7-May-07 0:25 
QuestionAdd records to MS Access Table Pin
IvanIT6-May-07 14:20
MemberIvanIT6-May-07 14:20 
AnswerRe: Add records to MS Access Table Pin
Guffa6-May-07 15:13
MemberGuffa6-May-07 15:13 
Questionpowerpoint automation via Microsoft.Office.Interop.PowerPoint Pin
uglyeyes6-May-07 14:09
Memberuglyeyes6-May-07 14:09 

I have posted this several times but this time. may be its not clear what i want so below is the code

Dim ppItem As Microsoft.Office.Interop.PowerPoint.Shape
If Len(Trim(dr.Item(Strings.Right(Trim(ppItem.TextFrame.TextRange.Text), Len(Trim(ppItem.TextFrame.TextRange.Text)) - 1)))) > 0 Then

Dim s As String = dr.Item(Strings.Right(Trim(ppItem.TextFrame.TextRange.Text), Len(Trim(ppItem.TextFrame.TextRange.Text)) - 1))
s = s.Trim
ppItem.TextFrame.TextRange.Text = s
'ppItem.TextFrame.TextRange.Font.Bold = Microsoft.Office.Core.MsoTriState.msoFalse

Dim a, b, looplen As Integer
looplen = s.Length

Dim hashWords As String()

Dim strWord As String
For a = 0 To looplen - 1

If s.Substring(a, 1) = "#" Then
a += 1
For b = 1 To looplen - 1
If s.Substring(a, 1) = "#" Then

ppItem.TextFrame.TextRange.Text = strWord
ppItem.TextFrame.TextRange.Font.Bold = Microsoft.Office.Core.MsoTriState.msoCTrue

strWord = ""

Exit For
End If
strWord += s.Substring(a, 1)
a += 1

ppItem.TextFrame.TextRange.Font.Bold = Microsoft.Office.Core.MsoTriState.msoFalse
End If


In above code i want all the strings send to powerpoint and make strWord bold.

could someone please help me or just give me a clue I am having really hard time to fix it


QuestionSyntaxiserror in updatecommand Pin
keninfo6-May-07 8:41
Memberkeninfo6-May-07 8:41 
AnswerRe: Syntaxiserror in updatecommand Pin
Colin Angus Mackay6-May-07 23:09
MemberColin Angus Mackay6-May-07 23:09 
QuestionReport Generation in VB Pin
Mohamad Kaifi6-May-07 7:43
MemberMohamad Kaifi6-May-07 7:43 
QuestionRe: Report Generation in VB Pin
Sachin Pimpale7-May-07 2:29
MemberSachin Pimpale7-May-07 2:29 
Questionmaking and recording call Pin
aapke_leeye6-May-07 2:53
Memberaapke_leeye6-May-07 2:53 
AnswerRe: making and recording call Pin
Dave Kreskowiak7-May-07 4:12
mveDave Kreskowiak7-May-07 4:12 
QuestionHow to detect if "My documents" or "Internet explorer" is dropped... Pin
re infecta5-May-07 23:47
Memberre infecta5-May-07 23:47 
QuestionC to VB6 Pin
Alex_735-May-07 22:13
MemberAlex_735-May-07 22:13 
AnswerRe: C to VB6 Pin
Christian Graus6-May-07 11:36
protectorChristian Graus6-May-07 11:36 
QuestionRe: C to VB6 Pin
Alex_736-May-07 21:02
MemberAlex_736-May-07 21:02 
AnswerRe: C to VB6 Pin
Christian Graus7-May-07 1:08
protectorChristian Graus7-May-07 1:08 
General[Solved]Re: C to VB6 Pin
Alex_738-May-07 6:11
MemberAlex_738-May-07 6:11 
QuestionLooping Problem - ArgumentOutOfRange - Processes Pin
InfectiousX5-May-07 20:55
MemberInfectiousX5-May-07 20:55 
AnswerRe: Looping Problem - ArgumentOutOfRange - Processes Pin
Dave Kreskowiak6-May-07 5:06
mveDave Kreskowiak6-May-07 5:06 
QuestionMySql Login Pin
LegionFX5-May-07 11:59
MemberLegionFX5-May-07 11:59 
AnswerRe: MySql Login Pin
Paul Conrad5-May-07 12:45
professionalPaul Conrad5-May-07 12:45 
GeneralRe: MySql Login Pin
LegionFX5-May-07 12:51
MemberLegionFX5-May-07 12:51 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.