ＶＢ自动填写网页下拉框式的年月日

ＶＢ自动填写网页程序里 
１.填写一个网页下拉框式的年月日　网页代码如下： <table class="deTable" align="center" cellspacing="0"> 
             <tr> 
                     
       
      <td class="label" width="180" id="lbl_dobMonth"> 
<table border="0" width="180" cellpadding="0" cellspacing="0"> 
<tr> 
<td class="labelText" id="lblText_dobMonth" valign="middle">Birth Date: </td> 
<td align="right"> 
             <img class="q" src="/images/web/q.gif" onclick="uram.onQuestionClick('dobMonth')"> 
     <span id="spaHM_dobMonth" style="display:none;">We require that all Station members are at least 13 years 
  of age, in compliance with the Children's Online Privacy Protection Act 
  (COPPA). We require Birth Date to verify that you meet this requirement. </span> 
</td> 
</tr> 
</table> 
     </td> 
                 <td class="entry"> 
                     <select id="dobMonth" name="dobMonth"  onFocus="ml_autocomplete.populate(event)" onKeyDown="ml_autocomplete.setSelection(event)" onKeyPress="javascript:return false" > 
                         <option value="0"> 
                            - Month - 
                         </option> 
                                                     <option value="1"  >January </option> 
                                                     <option value="2"  >February </option> 
                                                     <option value="3"  >March </option> 
                                                     <option value="4"  >April </option> 
                                                     <option value="5"  >May </option> 
                                                     <option value="6"  >June </option> 
                                                     <option value="7"  >July </option> 
                                                     <option value="8"  >August </option> 
                                                     <option value="9"  >September </option> 
                                                     <option value="10"  >October </option> 
                                                     <option value="11"  >November </option> 
                                                     <option value="12"  >December </option> 
                                             </select>  
                     <select id="dobDay" name="dobDay" lblId="lbl_dobMonth"  onFocus="ml_autocomplete.populate(event)" onKeyDown="ml_autocomplete.setSelection(event)" onKeyPress="javascript:return false" > 
                         <option value="0"> 
                            - Day - 
                         </option> 
                     </select> 
                     <select id="dobYear" name="dobYear" lblId="lbl_dobMonth" onFocus="ml_autocomplete.populate(event)" onKeyDown="ml_autocomplete.setSelection(event)" onKeyPress="javascript:return false" > 
                         <option value="0"> 
                            - Year - 
                         </option> 
                     </select> 
                 </td> 
             </tr> 
             <tr> 
                     
       
      <td class="label" width="180" id="lbl_country"> 
<table border="0" width="180" cellpadding="0" cellspacing="0"> 
<tr> 
<td class="labelText" id="lblText_country" valign="middle">Country: </td> 
<td align="right"> 
             <img class="q" src="/images/web/q.gif" onclick="uram.onQuestionClick('country')"> 
     <span id="spaHM_country" style="display:none;">The Country you select will initially determine the 
  default currency associated with your Station Account. You can later change 
  your default currency at any time using the  <STRONG>Account menu &gt; Account 
  Info </STRONG> option. </span> 
</td> 
</tr> 
</table> 
     </td> 
                 <td class="entry"> 
                    
                 </td> 
             </tr> 
             </table> 填写语句如下： 
用doc.All.Item("").Value = ""的语句 
只能填写上月　但是日和年却不能填写上 
请教怎样能填写上呢 

解决方案 »

  1.   

    <select id="dobMonth" name="dobMonth"  onFocus="ml_autocomplete.populate(event)" onKeyDown="ml_autocomplete.setSelection(event)" onKeyPress="javascript:return false" >  
    这些函数没给啊，你没给全
      

  2.   

    网页有问题吧，
    你这里<option value="0">  
                                - Day -  
                              </option>  
    没有任何可选项阿
    如何用select
      

  3.   

    网页代码如下：
    <tr><th><label for="question"><i>*</i>密码保护问题：</label></th><td class="input"  > <select id="question" name="question" class="text" title="密码保护问题"> <option value=""  selected="selected"   >请选择一个问题</option> <option value="我就读的第一所学校的名称？"  >我就读的第一所学校的名称？</option> <option value="我最喜欢的休闲运动是什么？"  >我最喜欢的休闲运动是什么？</option> <option value="我最喜欢的运动员是谁？"  >我最喜欢的运动员是谁？</option> <option value="我最喜欢的物品的名称？"  >我最喜欢的物品的名称？</option> <option value="我最喜欢的歌曲？"  >我最喜欢的歌曲？</option> <option value="我最喜欢的食物？"  >我最喜欢的食物？</option> <option value="我最爱的人的名字？"  >我最爱的人的名字？</option> <option value="我最爱的电影？"  >我最爱的电影？</option> <option value="我妈妈的生日？"  >我妈妈的生日？</option> <option value="我的初恋日期？"  >我的初恋日期？</option><option value="我的自定义问题"  >我的自定义问题</option>
    </select><input id="myQuestion" name="myQuestion" type="text" class="text" value="" title="自定义问题" /><span></span></td> <td rowspan="2" class="desc">答案长度6～30位，字母区分大小写，一个汉字占两位。用于修复帐号密码</td> </tr> <tr><th><label for="answer"><i>*</i>您的答案：</label></th><td class="input" ><input id="answer" name="answer" type="text" class="text" value="" title="您的答案" /><span></span></td> </tr> </table> <div class="hr"></div>

    <table class="blur"> <tr><th><label><i>*</i>出生日期：</label></th>   <td class="input" >    <input type="text" name="year" id="year" " value="" title="出生日期年份" /><label for="year">年</label> <select id="month" name="month" title="月"> <option value="01" >1</option> <option value="02" >2</option> <option value="03" >3</option> <option value="04" >4</option> <option value="05" >5</option> <option value="06" >6</option> <option value="07" >7</option> <option value="08" >8</option> <option value="09" >9</option> <option value="10" >10</option> <option value="11" >11</option> <option value="12" >12</option> </select><label for="month">月</label> <select id="day" name="day" title="日"> <option value="01" >1</option> <option value="02" >2</option> <option value="03" >3</option> <option value="04" >4</option> <option value="05" >5</option> <option value="06" >6</option> <option value="07" >7</option> <option value="08" >8</option> <option value="09" >9</option> <option value="10" >10</option> <option value="11" >11</option> <option value="12" >12</option> <option value="13" >13</option> <option value="14" >14</option> <option value="15" >15</option> <option value="16" >16</option> <option value="17" >17</option> <option value="18" >18</option> <option value="19" >19</option> <option value="20" >20</option> <option value="21" >21</option> <option value="22" >22</option> <option value="23" >23</option> <option value="24" >24</option> <option value="25" >25</option> <option value="26" >26</option> <option value="27" >27</option> <option value="28" >28</option> <option value="29" >29</option> <option value="30" >30</option> <option value="31" >31</option> </select><label for="day">日</label><span></span></td>
    <td class="desc">用于修复帐号密码，请填写您的真实生日</td>