1.0Access [basics]https://access-basics.deAndré Minhorsthttps://access-basics.de/index.php/author/andreminhorst-comAccess VBA: Select Case - Access [basics]rich600338<blockquote class="wp-embedded-content" data-secret="GNfb1a163y"><a href="https://access-basics.de/index.php/Access_VBA_Select_Case.html">Access VBA: Select Case</a></blockquote><iframe sandbox="allow-scripts" security="restricted" src="https://access-basics.de/index.php/Access_VBA_Select_Case.html/embed#?secret=GNfb1a163y" width="600" height="338" title="„Access VBA: Select Case“ – Access [basics]" data-secret="GNfb1a163y" frameborder="0" marginwidth="0" marginheight="0" scrolling="no" class="wp-embedded-content"></iframe><script type="text/javascript">
/* <![CDATA[ */
/*! This file is auto-generated */
!function(d,l){"use strict";l.querySelector&&d.addEventListener&&"undefined"!=typeof URL&&(d.wp=d.wp||{},d.wp.receiveEmbedMessage||(d.wp.receiveEmbedMessage=function(e){var t=e.data;if((t||t.secret||t.message||t.value)&&!/[^a-zA-Z0-9]/.test(t.secret)){for(var s,r,n,a=l.querySelectorAll('iframe[data-secret="'+t.secret+'"]'),o=l.querySelectorAll('blockquote[data-secret="'+t.secret+'"]'),c=new RegExp("^https?:$","i"),i=0;i<o.length;i++)o[i].style.display="none";for(i=0;i<a.length;i++)s=a[i],e.source===s.contentWindow&&(s.removeAttribute("style"),"height"===t.message?(1e3<(r=parseInt(t.value,10))?r=1e3:~~r<200&&(r=200),s.height=r):"link"===t.message&&(r=new URL(s.getAttribute("src")),n=new URL(t.value),c.test(n.protocol))&&n.host===r.host&&l.activeElement===s&&(d.top.location.href=t.value))}},d.addEventListener("message",d.wp.receiveEmbedMessage,!1),l.addEventListener("DOMContentLoaded",function(){for(var e,t,s=l.querySelectorAll("iframe.wp-embedded-content"),r=0;r<s.length;r++)(t=(e=s[r]).getAttribute("data-secret"))||(t=Math.random().toString(36).substring(2,12),e.src+="#?secret="+t,e.setAttribute("data-secret",t)),e.contentWindow.postMessage({message:"ready",secret:t},"*")},!1)))}(window,document);
//# sourceURL=https://access-basics.de/wp-includes/js/wp-embed.min.js
/* ]]> */
</script>
Neben der If...Then-Bedingung gibt es noch eine weitere Bedingung unter Access VBA. Diese heißt Select Case und sie bietet in vielen Fällen eine praktische Alternative zur If...Then-Bedingung. Das gilt insbesondere, wenn auf der einen Seite des Vergleichsausdrucks immer die gleiche Variable oder der gleiche Wert steht, der mit anderen Werten verglichen werden soll. Auf den folgenden Seiten stellen wir die Select Case-Verzweigung mit allen Varianten und Möglichkeiten vor.