Søg
Avatar billede blueeye97 Nybegynder
01. juni 2003 - 22:13 Der er 21 kommentarer og
1 løsning

Label uden ramme omkring

Jeg er ret newbee når det gælder vbcript. Jeg har lavet et lille script som viser et indtastet beløb i en anden valuta. Simpelt nok og også bare et eksempel. Men kan man ikke undgå, at resultatet vises med en ramme omkring ? Kig evt. på uret på www.bali.com
Avatar billede Slettet bruger
01. juni 2003 - 22:18 #1
Hvordan ser din kode ud?
Avatar billede Slettet bruger
01. juni 2003 - 22:21 #2
Hvis du skriver det ud i en tabel så er det noget med border=0
Avatar billede blueeye97 Nybegynder
01. juni 2003 - 22:23 #3
I scriptet skriver jeg:

res.value = resultat

HTML koden for feltet er:

    <td width="25%"><font face="Verdana"><Input type = "label" name = "res" value = "" Size = "10">
Avatar billede blueeye97 Nybegynder
01. juni 2003 - 22:24 #4
Men det er ikke rammen i tabellen jeg tænker på. Det er selve den label resultatet står i, som får en ramme. Lige som et tekst inputfelt...
Avatar billede Slettet bruger
01. juni 2003 - 22:28 #5
Den kender jeg ikke lige, prøv med border=0 eller border="none" og se om den vil "æde" det.
Avatar billede blueeye97 Nybegynder
01. juni 2003 - 22:31 #6
<Input type = "label" name = "res" value = "" Size = "10">
Avatar billede blueeye97 Nybegynder
01. juni 2003 - 22:32 #7
variablen res er defineret i vbscriptet og skrives blot i html lablen res..... Jeg syns ikke border 0 eller none  virker.,..
Avatar billede Slettet bruger
01. juni 2003 - 22:35 #8
Jeg leder men kan ikke finde noget, så jeg skyder fra hoften, hvad hvis du gør feltet readonly eller disabled:
<Input type = "label" name = "res" value = "" Size = "10" readonly="true">
<Input type = "label" name = "res" value = "" Size = "10" disabled="true">
Avatar billede blueeye97 Nybegynder
01. juni 2003 - 22:36 #9
</head>

<body>

<font face="Verdana">
</font>
<table border="0" width="237" bgcolor="#CDCDCD" cellspacing="0" cellpadding="0">
  <tr>
    <td width="236">
      <div align="left">
        <table border="0" width="236" cellspacing="1">
          <tr>
            <td width="228" bgcolor="#EDF2F8">
              <p align="left"><b><font face="Arial">Valutaberegner (test)</font></b></p>
            </td>
          </tr>
          <tr>
            <b>
            <td width="228" align="center" bgcolor="#FFFFFF">
              <p align="left"><font face="Arial"><img border="0" src="spacer.gif" width="1" height="2"></font></td>
            </b>
          </tr>
          <tr>
            <td width="228" bgcolor="#FFFFFF">
              <table border="0" cellpadding="0" cellspacing="0" width="75%">
                <tr>
                  <td width="124%"><font face="Verdana">Dkkr</font></td>
                  <td width="50%"><font face="Verdana"><INPUT type = "text" name = kr value ="" size="10">
                    </font></td>
                </tr>
                <tr>
                  <td width="124%"><font face="Verdana"><Input type="radio" name=valuta value = val_euro id = id_euro checked>
                    Euro&nbsp;<br>
<Input type="radio" name=valuta value = val_dollar id = id_dollar >  Dollar</font></td>
                  <td width="50%"></td>
                </tr>
                <tr>
                  <td width="124%"><font face="Verdana"><input type = "button" name = "knap" value = "Beregn">
                    </font></td>
                <td width="25%"><font face="Verdana"><Input type = "label" name = "res" value = "" Size = "10" border="0">

                    </font></td>
                </tr>
              </table>
            </td>
          </tr>
          <tr>
            <td width="228" bgcolor="#EDF2F8">
              <p align="left">&nbsp;</td>
          </tr>
        </table>
      </div>
    </td>
  </tr>
</table>
<p align="left">&nbsp;</p>




<script Language = "VBScript">

Private Sub Beregn()
Dim dkkr , kurs , promille
Dim resultat


If id_euro.checked Then
    kurs = 7.44
End If

If id_dollar.checked then
    kurs = 5
End If


dkkr = kr.value

resultat = dkkr / kurs


resultat = Formatnumber  (resultat,2)
res.value = resultat

end sub

Sub knap_OnClick
Beregn
End  Sub


</script>





</body>
Avatar billede blueeye97 Nybegynder
01. juni 2003 - 22:37 #10
Her er hele skidtet. Så kan du måske bedre se hvad jeg mener !
Avatar billede Slettet bruger
01. juni 2003 - 22:41 #11
Næ det hjælper ikke, jeg kan ikke finde noget der beskriver input type = "label" og jeg kan heller ikke finde en attribut til input tagget som angiver noget med en ramme så mit bedste bud er stadig at prøve sig frem med readonly og disabled.

Sorry men jeg har ikke flere bud.
Avatar billede blueeye97 Nybegynder
01. juni 2003 - 22:42 #12
ok, pænt af dig at forsøge...
Avatar billede Slettet bruger
01. juni 2003 - 22:43 #13
Håber du finder ud af det :-)
Avatar billede blueeye97 Nybegynder
01. juni 2003 - 22:45 #14
Jeg har hævet indsatset af samme grund *G*
Avatar billede blueeye97 Nybegynder
01. juni 2003 - 22:47 #15
indsatsen...
Avatar billede medions Nybegynder
02. juni 2003 - 07:47 #16
blueeye97> Hvad er det for en ramme du snakker om? Er det en synlig ramme eller?

//>Rune
Avatar billede blueeye97 Nybegynder
02. juni 2003 - 12:26 #17
Feltet hvor resultatet står i har en lille ramme omkring. Lige som indtastningsfelterne har
Avatar billede blueeye97 Nybegynder
02. juni 2003 - 12:27 #18
I F.eks. VB 6.0. Der er der jo forskel på en textbox og en label. Det er det samme jeg gerne vil have her. Resultatet skal være som en label og ikke fremstå som en textbox.
Avatar billede medions Nybegynder
02. juni 2003 - 15:52 #19
ahh okay, i HTML hedder det så en DIV.

Her har du et eksempel på hvordan du gør:

<script type="text/vbscript">
        Sub tester
            document.getElementById("tt").innerHTML = "testttttt"
        End Sub
</script>

<div onclick="tester" id="tt" name="tester">test</div>

//>Rune
Avatar billede medions Nybegynder
02. juni 2003 - 16:21 #20
Sådan her fx.

</head>

<body>

<font face="Verdana">
</font>
<table border="0" width="237" bgcolor="#CDCDCD" cellspacing="0" cellpadding="0">
  <tr>
    <td width="236">
      <div align="left">
        <table border="0" width="236" cellspacing="1">
          <tr>
            <td width="228" bgcolor="#EDF2F8">
              <p align="left"><b><font face="Arial">Valutaberegner (test)</font></b></p>
            </td>
          </tr>
          <tr>
            <b>
            <td width="228" align="center" bgcolor="#FFFFFF">
              <p align="left"><font face="Arial"><img border="0" src="spacer.gif" width="1" height="2"></font></td>
            </b>
          </tr>
          <tr>
            <td width="228" bgcolor="#FFFFFF">
              <table border="0" cellpadding="0" cellspacing="0" width="75%">
                <tr>
                  <td width="124%"><font face="Verdana">Dkkr</font></td>
                  <td width="50%"><font face="Verdana"><INPUT type = "text" name = kr value ="" size="10">
                    </font></td>
                </tr>
                <tr>
                  <td width="124%"><font face="Verdana"><Input type="radio" name=valuta value = val_euro id = id_euro checked>
                    Euro&nbsp;<br>
<Input type="radio" name=valuta value = val_dollar id = id_dollar >  Dollar</font></td>
                  <td width="50%"></td>
                </tr>
                <tr>
                  <td width="124%"><font face="Verdana"><input type = "button" name = "knap" value = "Beregn">
                    </font></td>
                <td width="25%"><font face="Verdana"><div id="result"></div>

                    </font></td>
                </tr>
              </table>
            </td>
          </tr>
          <tr>
            <td width="228" bgcolor="#EDF2F8">
              <p align="left">&nbsp;</td>
          </tr>
        </table>
      </div>
    </td>
  </tr>
</table>
<p align="left">&nbsp;</p>




<script Language = "VBScript">

Private Sub Beregn()
Dim dkkr , kurs , promille
Dim resultat


If id_euro.checked Then
    kurs = 7.44
End If

If id_dollar.checked then
    kurs = 5
End If


dkkr = kr.value

resultat = dkkr / kurs


resultat = Formatnumber  (resultat,2)
document.getElementById("result").innerHTML = resultat

end sub

Sub knap_OnClick
Beregn
End  Sub


</script>





</body>

//>Rune
Avatar billede blueeye97 Nybegynder
02. juni 2003 - 18:05 #21
Fjong Rune... Takker !!!
Avatar billede medions Nybegynder
02. juni 2003 - 18:19 #22
Anytime ;o)
Thx 4 Poinz

//>Rune
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra VBscript kategorien

Titel Indlæg Oprettet Seneste aktivitet
Ændre navn på folder Af bsn i VBscript 12 07/07/202312:45 09/07/202307:04
Outlook makro Af Webnoob i VBscript 6 09/02/202313:32 16/02/202315:51
Sti / Filname med mellemrum ??? Af ksor i VBscript 10 07/10/202200:43 07/10/202215:40
GetLastRow - Google spreadsheet Af rickiegrayholm i VBscript 2 22/04/202213:23 22/04/202214:55
Batch fil Af BDV i VBscript 1 12/01/202210:00 12/01/202210:05
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
13/0614:56 Kan ikke ændre drevbogstav Af mort1 i Windows
12/0612:46 får fejl ved at følge et link i Chrome Af Erik Hovedskou i Browsere
11/0618:29 Leak-bot gratis tilbud fra Alm. brand Af nu_igen i Apps til iOS
11/0612:02 Proceslinje pludselig lodret til venstre i Win 11 Af ErikHg i Windows
10/0621:27 Vise billeder på skærm Af 1Dorte i Fjernsyn & projektorer
White papers
Flere white papers »