well tell me how to do the foll. in VB6?
970446
Although i didn't understand your question correctly, I guess you need to make a form that have some question and some people would answer them.\n\nyou have two choices :\nfirst :\nyou may save their answers to a file then you call this file to get the answers\nsecond:\nyou may create a data base to get answers for each one who use ur program\n\nfor more Details contact me :\nm.zatari@yahoo.com
92611
Use the following syntaxis:\n\nLike *[#]*
367046
your question is not quite clear, may be you can explain it to me and i hope i could be a help to you, I been working with Data Reports in VB6 lately, and it works fine with me.
1146521
Private Sub SomeObject_KeyDown(KeyCode As MSForms.ReturnInteger, Shift As Integer)    \n    If KeyCode = vbKeyLeft Then 'left arrow = vbKeyLeft = 37\n         Call cmdLeft_click\n    End If\nEnd Sub\n\nyou may want to try other events pending on the app you're working on
26175
Without knowing the language you're programming in, I can't tell you.\n\nHere are a few common ones:\n\nC++:\ncout << "Text to display";\n\nC:\nprintf("Text to display");\n\nJava:\nSystem.out.println("Text to display");\n\nEDIT:\nAh, you want VB! Here you go:\nConsole.Write("Text to display")\nor\nConsole.WriteLine("Text to display")
500457
Dim objNet\non error resume next\n\nset objNet = CreateObject("WScript.Network")\n\nDim strInfo\nstrInfo = objNet.UserName &", "&objNet.ComputerName&", "&objNet.DomainName
155130
Chuck Easttom has a good tutorial on his website. Somehow, I have it all in one Word document. But you can get it Chapter by chapter on his site:\n\nhttp://www.chuckeasttom.com/vb/index.htm
37333
Assuming you are writing your macro in VbScript:\nsResult = Inputbox("Prompt", "Input box title")
361581
Create a form with textbox named 'txtDiamond' and give it the following settings: 'MultiLine = True', 'ScrollBars = 2 - Vertical'\n\nThen copy the following code within Either Form_Load() or another subroutine in which you would like to generate the row. The following code is dynamic, and allows you to create diamons with the amount of rows being odd or even. I expect alot of points cuz i had to write this myself ;).\n\nHere it is:\n\n    Dim RowCount As Long\n    Dim Row As Long\n    Dim Stars As Long\n    Dim MiddleRow As Long\n    Dim SpaceCount As Long\n    Dim X As Long\n    \n    RowCount = 11\n    MiddleRow = Round((RowCount / 2) + 0.1, 0)\n\n    Stars = 1\n    \n    For Row = 1 To RowCount\n        If Row = 1 Then\n            txtDiamond = String((RowCount + 1) - Stars, " ")\n        Else\n            txtDiamond = txtDiamond & vbCrLf & String((RowCount + 1) - Stars, " ")\n        End If\n        For X = 1 To Stars\n            txtDiamond = txtDiamond & "*"\n            txtDiamond = txtDiamond & " "\n        Next X\n        \n        If Row < MiddleRow Then\n             Stars = Stars + 1\n        ElseIf Row = MiddleRow Then\n            If InStr(1, (RowCount / 2), ".") > 0 Then\n                'Odd\n                Stars = Stars - 1\n            End If\n        Else\n             Stars = Stars - 1\n        End If\n        \n    Next Row
743647
Dim i, total As Integer\ntotal = 0\nFor i = 0 To Integer.Parse(TextBox1.Text) Step 2\n     total += i\nNext\nMsgBox(total.ToString())
670070
 Dim frmName As String\n   \n frmName = "form2"\n   \n Select Case frmName\n  Case "form1"\n   Form1.Show\n  Case "form2"\n   Form2.Show\n  Case "form3"\n   Form3.Show\n  Case Else\n   MsgBox "Invalid form name"\n End Select\n\n***EDIT***\nIn VB, you can't convert a string object into a form object.  This is why String.Show doesn't work.  However, you can use a "select case" on the string and if the string matches the form name (i.e. form2), then show the form.\n\nAnother alternative is to loop through the forms collection until you find a form with the same name as your string.\n\nIn any case, if you create a project with 2 forms (called form1 and form2).  Add a button to form1 and paste the above code into the click event of the button.  When pressed, form2 will be displayed.
438038
i would have a look at this site\n\nhttp://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=5120&lngWId=2
99226
http://www.functionx.com/vb/index.htm\nvisit this site, i hope it can help you. good luck
290269
'first of all you'll have to declare your variables\n'this is only mini code for you, i'll not do yer homework :P\nDim credit As Integer\n    Dim Days As Integer\n    'i'm not sure if you can case them aswell, i'm not building the app for ye, you can do it yourself\n    Private Sub RadioButton1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadioButton1.Click\n        If RadioButton1.Checked = True Then\n            credit = 0\n        End If\n    End Sub\n    Public Sub GradeSelector()\n        Dim TotalGrade As Integer = credit + Days\n        Dim FinalScore As Integer\n        'i'm going to take it groupbox 1 has 3 radio buttons\n        FinalScore = TotalGrade\n        'sorting out the final grade\n        Select Case FinalScore\n            Case TotalGrade = 0\n                textbox.text = "f"\n            Case TotalGrade = 3\n                textbox.text = "e"\n        End Select\n\ni've left out a lot of the code, but ye can probably see where its goin, enjoy coding\n\nR3dm0
638752
Put this in an asp page and try it.I jus did it and it worked. \n\n<%@ Language=VBScript %>\n<HTML>\n<HEAD>\n<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">\n</HEAD>\n<BODY>\n<form name="frmTest" method="post">\n<img src="Bluebar.gif" ></img>\n<br>\n<LABEL id="lblclick" onclick="ShowList()">Click on this</LABEL>\n<P> </P>\n<br>\n<LABEL id="lblShow" ></LABEL>\n</form>\n</BODY>\n</HTML>\n<script language="javascript">\nfunction ShowList()\n  {\n   window.document.getElementById('lblShow').innerHTML = "Hey ! you just viewed and clicked me :)"\n  }\n</script>\n\nDude.....the window.document.getElementById will show as .... I tried all methods and yahoo still sucks...\nSo here I will explain.  getElementBytId() .In this bracket you need to give the Label which is displaying the text, its id , i.e in this case getElementBytId('lblShow'), and after the close parenthesis we give ".innerHTML" and then "=" what value we want to give.\nhave issues still then, send me a mail at nigeljd@gmail.com
999231
use the Macro Recorder to code the procedure you want...then you can convert it to VBA (Visual BASIC for Applications) and edit it.
234455
Try PlanetSourceCode:\n\nhttp://www.planetsourcecode.com/vb/default.asp?lngWId=4